|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
' z) O2 L" B" v* I$ ~) h2 EVAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));9 l$ l! Z4 c4 V! h( M+ J$ b
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));5 D- {- ]! v4 W* @' I' [: G5 w" g
DIR1:=ABS(CLOSE-REF(CLOSE,5));
' K* q) J# Z* U; ^) |0 YVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
8 \# \ w7 K; P4 W* o6 ]5 F- m2 pER1:=DIR1/VIR1;
$ l; \, V" e& f3 w. Y3 aCS1:=ER1*(0.8-2/8)+2/8;
* w7 k" q8 m; u$ ~& t: G' FCQ1:=CS1*CS1;# [$ v0 P6 M6 N& b, X
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;" }8 a/ V7 {& R; ?% F8 e
DIR2:=ABS(CLOSE-REF(CLOSE,10));
3 R$ z' Y( |" ^* j0 s- |VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);( V, E" I5 q; o5 h! H* q1 D# o2 f2 T
ER2:=DIR2/VIR2;
) E6 z1 @# q6 u1 I& ?1 GCS2:=ER2*(0.8-2/24)+2/24;
% b4 C' A" B& B0 m! mCQ2:=CS2*CS2;
: m9 u7 e7 s0 b$ o+ D. Y" k& UAMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;
5 Z. P9 l$ J% b5 r' N5 zAMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;
0 {# y. n7 h' u0 }9 ?AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;6 u8 u5 R( \1 _4 X
STICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;- D: A6 I$ d! z# w
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;
5 V; n( P$ x! DSTICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;
4 F6 O- T5 J3 ?" G0 pSTICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;
2 ~9 ?6 y+ d) V3 x2 ^STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;
) {0 J" {. r7 l1 }3 s3 `DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);; ~, U3 {# v, i: r2 }/ z
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);& C0 f* U0 J* h/ j5 |
PT:=REF(H,1)-REF(L,1);
! O+ r' Y0 W: l hCDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
' S1 K8 y. u CAH:=CDP+PT;
& Y4 D8 ?1 d, j) l* jAL:=CDP-PT;
# I, i9 e& M7 T4 jNH:=CDP*2-REF(L,1);& ]8 h. y1 Y8 O% e8 c
NL:=CDP*2-REF(H,1);+ ^, z+ s8 `3 |; B4 ^5 y! ?, C) k
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
- C! I8 |3 |( Q, X2 H& I% h( E! G# B阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
: b! V. t! [# @* ^9 dM:=IF(AL |