|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
' E, D) V" O; I hVAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
* j9 @' k; y \" HVAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));# m/ Y, z! Y! w0 |# z
DIR1:=ABS(CLOSE-REF(CLOSE,5));6 @/ ?$ B' w4 e1 J% x' G! y
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
! B5 Y- R; V* w! oER1:=DIR1/VIR1;% e% p6 e5 H' p6 `
CS1:=ER1*(0.8-2/8)+2/8;
1 \2 ` r3 e/ R+ o: A& e7 w6 qCQ1:=CS1*CS1;
* e: ~; @9 h# d8 }+ @, T& D% MAMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;
* J; [3 W2 {2 X6 W0 wDIR2:=ABS(CLOSE-REF(CLOSE,10));5 z/ K( S3 P: m" W/ u
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
9 g$ c, u! y: @" LER2:=DIR2/VIR2;8 ~ \ d8 C; _; [5 b. p
CS2:=ER2*(0.8-2/24)+2/24;
4 p2 Y, r2 ^: E4 |3 p/ Y% VCQ2:=CS2*CS2;
* L$ G$ K3 D8 Q8 Z% `# Z+ F4 JAMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;9 L) {6 _1 U/ l1 T( W
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;
) M) O$ ]$ x- _! EAMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;) H4 Z3 a0 Z" h. A
STICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;! j2 s8 _1 v( g, N
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;
1 @% t5 m4 r- p( j. C( D7 ^STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;, O `* ~. d, }. w4 T3 O
STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;
n |: p( f9 ?6 SSTICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;
* H E' I" d) Z. O7 h' @DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);
, l% h$ z5 ]$ G# F w/ k: lDRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);
- Y5 i& E: V% P' ePT:=REF(H,1)-REF(L,1);
# K6 I. s& b( W! @CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;- J& D5 \8 A# K! L# c& `# T$ J4 n
AH:=CDP+PT;
: }8 W: i. E' M5 M4 @$ f: c$ S4 Q" OAL:=CDP-PT;
8 w! V( Q$ T% }NH:=CDP*2-REF(L,1);
9 ^; E/ l- u' ?; b0 S7 ?) gNL:=CDP*2-REF(H,1);
$ I9 y' u8 ~0 ^, f' U1 z3 E0 S4 t强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
( |5 M# ^# [! l4 `阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;' k5 H1 D* e: s& n' ]
M:=IF(AL |