|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));* N& [) u; i$ y8 d6 [
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
+ T" D6 U$ M2 jVAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));6 c7 _" s8 ]4 K/ n# s5 Q+ x
DIR1:=ABS(CLOSE-REF(CLOSE,5));
* E' g- ?# a7 ^3 H9 r+ T. @# vVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
5 Q9 i) x" ^- g" K: k6 jER1:=DIR1/VIR1;& i9 h, j' @6 \8 J1 P
CS1:=ER1*(0.8-2/8)+2/8;
* k& O) w$ ~' @6 `CQ1:=CS1*CS1;; d7 T# @, l8 u ^. x2 M0 l
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;, ^6 {5 H% ]: n+ l1 V9 T6 C6 P
DIR2:=ABS(CLOSE-REF(CLOSE,10));
" V+ a# d, P5 K1 O; V! M" EVIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
3 @* _( K7 Y% G) ? _ER2:=DIR2/VIR2;
3 Z7 m# O( J2 P+ oCS2:=ER2*(0.8-2/24)+2/24;5 ^) b1 }, R3 ~) U! I- ] A
CQ2:=CS2*CS2;3 }) e& y: n+ W0 h4 C9 t
AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;
, W/ p9 g$ `) pAMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;/ y3 x: z; C6 R# G0 v
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;
+ ^( p6 D5 A- k" F' HSTICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;$ R7 f2 \. y5 }) p' I$ z
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;( Y- \' a# D4 F' K* d2 N1 K
STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;
" e8 i, ?# E: X$ w" {* VSTICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;% x1 f/ L5 V# S4 ]5 G- K
STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;
% }+ u; @4 Z, D& s$ ODRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);2 {, r. p: P; U( N0 z ]3 \
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);
5 z f% |7 I* v- V+ xPT:=REF(H,1)-REF(L,1);1 e$ B! M7 W. N( p7 ]) P
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
7 o5 N" Z6 I# \9 t' R& P, wAH:=CDP+PT;2 E) x& W* E+ H9 d+ x# J8 H
AL:=CDP-PT;
; ^; f+ f, k t' r1 XNH:=CDP*2-REF(L,1);7 D6 h' _: O7 I& x
NL:=CDP*2-REF(H,1);6 R; a1 K: z" Q4 K
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;7 {, `5 ^' {9 o) a
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;' \2 z# H9 Q% y* l" _
M:=IF(AL |