|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
! ]% x' S( |# {. S, }. k$ J; aVAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
- H4 s8 A' p) T Q4 T: ^: vVAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));1 W9 g3 T O7 q+ A
DIR1:=ABS(CLOSE-REF(CLOSE,5));
Q) ^5 D% e$ o2 y2 t' U3 jVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);6 d- R, m% B. j! U9 w; ?
ER1:=DIR1/VIR1;
8 f* ?, G; O% [% m3 m1 F- g0 x* }CS1:=ER1*(0.8-2/8)+2/8;8 L+ V2 }4 z3 X" _1 Y0 y
CQ1:=CS1*CS1;5 I9 I8 r# p; o5 Y
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;
* Q. b! Z- W$ P+ I. J8 }0 Z/ oDIR2:=ABS(CLOSE-REF(CLOSE,10));& K) a' }* c2 B4 w$ O
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
" t2 L' M7 l3 C5 x5 H; e& ^& LER2:=DIR2/VIR2;4 l$ T- O9 ]5 I- @1 q$ v/ _& t6 D& b
CS2:=ER2*(0.8-2/24)+2/24;0 L6 v2 G8 F1 }7 d
CQ2:=CS2*CS2;
) o, w. J/ M9 v6 ~4 j/ y2 l& D2 G5 |AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;3 b5 S+ {8 E) o* G; ~1 P
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;+ F$ k3 K6 j- l2 h
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;" T, `3 g. z1 [, R! c& |
STICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;
( f. r, ?* H( u9 BSTICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;7 n- T, }" I9 m+ P
STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;9 ?) b6 ^: l4 k2 k; @% {+ ]
STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;
2 \1 |+ {) |& C* {6 c/ S1 VSTICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;8 ~! m$ u) r5 }4 {0 R
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);% P0 A1 H; M) P9 E: }- X
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);* B9 l0 {5 Z8 Y! R
PT:=REF(H,1)-REF(L,1);, F- }+ O" a; V& w0 |# a* K; l
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;7 O, _0 f9 M2 ?
AH:=CDP+PT;; Y# u0 d) |. `, M2 X5 `% F Y/ Z
AL:=CDP-PT;
; ^+ O- [# C" |9 K# J* BNH:=CDP*2-REF(L,1);1 X% B9 N8 J3 L3 Z# i
NL:=CDP*2-REF(H,1);( R' l; p3 m% U, A+ U I1 z! c6 e
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
4 @) m7 S( g9 F c' l阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
8 p6 \2 v4 D9 v9 H& x) W7 ]. XM:=IF(AL |