|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));' N; z2 c! L/ i0 a
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
+ t% w' j4 s: ? O- uVAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
! ~1 q7 I0 M8 WDIR1:=ABS(CLOSE-REF(CLOSE,5));
. X: ^( [" Q8 Z# `0 a; TVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);- C! g# Z1 E3 m
ER1:=DIR1/VIR1;
! ?, h9 K- O2 e( A8 DCS1:=ER1*(0.8-2/8)+2/8;
" f, j8 u( f2 [, q }CQ1:=CS1*CS1;
' M6 r( u3 {- U. Y2 h0 zAMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;
6 r8 z) @4 M4 P0 uDIR2:=ABS(CLOSE-REF(CLOSE,10));, ? ^4 U+ k' N) ~9 e3 a8 t C/ A) U
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);) n5 t% u4 U0 G( H! ?
ER2:=DIR2/VIR2;
+ d3 P2 b: F3 q( RCS2:=ER2*(0.8-2/24)+2/24;
! f2 U/ D& Q+ z8 y! wCQ2:=CS2*CS2;2 K3 s$ L1 D# E1 P0 y5 R% S4 y _
AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;7 c6 z% U+ }2 S! \6 z# C
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;: F/ e( d5 I& w; f- V
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;
) j/ w' t+ E; C5 x) sSTICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;
2 p! e2 y6 Z) x* ]& m. T2 g) OSTICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;
5 W8 C' [, q9 g2 p$ n8 k. mSTICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;
, M% I# ~/ N6 Y6 \( K5 D% cSTICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;7 @! F8 H2 @' h& s, u! Q6 G
STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;% l, E s) C# ~
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);
. t" M0 M/ V$ k. J5 B4 f$ X* UDRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);% L/ ^. _7 M0 `$ p! Q1 T5 u8 M
PT:=REF(H,1)-REF(L,1);1 D5 k8 v( E }) _& Y$ k
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;% [% q# M% j2 a
AH:=CDP+PT;
# w$ y4 C8 P* t& P# fAL:=CDP-PT;) ]$ r$ X$ L. _: n4 |
NH:=CDP*2-REF(L,1);) X( c- A/ R, P+ j
NL:=CDP*2-REF(H,1);4 W# G! F( A" d! ?
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
" k) ?- x% ~! V$ V) o' [# E阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN; }; `9 o* C- Z, n& s! A; s
M:=IF(AL |