|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
1 s+ `" R, X. O/ Y% W$ q9 K& @VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
7 j" F" `) X: P) \' _VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));) n8 q1 L* P a/ p4 \3 n" B
DIR1:=ABS(CLOSE-REF(CLOSE,5));
' d t3 L( P/ V0 c9 p" tVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);4 o0 k: D" Q1 e6 H9 t+ X, V4 d
ER1:=DIR1/VIR1;
5 ~* u0 p# z+ d+ HCS1:=ER1*(0.8-2/8)+2/8;
) g) S, g' ?3 c) M$ f7 Y/ ACQ1:=CS1*CS1;2 B- B9 r8 X3 {% R8 N k6 t$ _( Y
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;
' F; g# \! P: U' pDIR2:=ABS(CLOSE-REF(CLOSE,10));. V6 Z% V0 Z9 b- P/ s t
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);0 m! o' O3 @( r
ER2:=DIR2/VIR2;/ n. `/ J0 ~; n8 M- s9 f
CS2:=ER2*(0.8-2/24)+2/24;
# ~$ o! s% n7 s) [, S; e. \0 aCQ2:=CS2*CS2;+ z. W7 Z/ {0 F/ |7 N- e
AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;
5 d- X8 j, T. P& XAMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;% Q- x/ t! S: H3 Y
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;
) A# M1 Z" X2 ^* C6 ^ y% i0 ]STICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;6 a/ b( c# x0 c' U
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;
6 \/ P5 ?( U0 s! c" [2 N- CSTICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;- @4 c/ n9 P; [! S6 u! }
STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;
# ?$ E" O3 K. w$ G* pSTICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;$ n: Z" H+ w5 i6 k! _6 {
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);5 ^8 s. j8 j6 V( H# ?
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);! b W1 a: h" V# o) P0 ^1 I
PT:=REF(H,1)-REF(L,1);
' `) w, z4 O a$ n# \4 r6 aCDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
5 k7 ?: r% a* z2 N2 _' H: VAH:=CDP+PT;* }4 a: k3 J* X8 w# ?3 Q3 W
AL:=CDP-PT;7 y) i u" S6 ^
NH:=CDP*2-REF(L,1);
, R/ Y0 e9 k* }7 s6 B* wNL:=CDP*2-REF(H,1);/ B. Z' S* p0 t7 K1 W3 t/ a8 C
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;- ]( e: M( z( ]0 P
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;+ c& Y0 j3 w- m' q$ h) y
M:=IF(AL |