|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
2 t# Q* R% ~, K2 ?' w- tVAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
6 @* j$ r0 b/ d$ C& ]VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));$ O7 e6 _" m# }( X2 g
DIR1:=ABS(CLOSE-REF(CLOSE,5));4 e$ Z; {/ `2 Z# @5 h6 o
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
( H: G" J+ m! R) P% LER1:=DIR1/VIR1;" ~( f C) L& C. U' J
CS1:=ER1*(0.8-2/8)+2/8;+ G0 x) K$ Q: t
CQ1:=CS1*CS1; F/ p3 l' y5 f: @4 f0 a" S B
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;) D0 J4 c$ P, A4 g# _4 g5 S2 S
DIR2:=ABS(CLOSE-REF(CLOSE,10));& b, C0 s6 s8 [0 g1 e
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);# h* a9 M* M" w R$ n
ER2:=DIR2/VIR2;* B! z+ v: H! _( { F
CS2:=ER2*(0.8-2/24)+2/24;& s F: J5 E0 M; K2 c$ u$ L& U- h7 x
CQ2:=CS2*CS2;
! s% _) d& K) @9 j8 o# F( xAMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;
1 J w( R. s% W0 {AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;4 }! V7 w- n, p# `: N6 b
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;5 v0 r5 A# U) h6 I$ F' d
STICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;( {1 D6 K3 Q- `5 w
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;1 |: J! o: M _: A
STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;
, H4 Z6 s) V) L& G$ lSTICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;
% W/ H" R( p% U$ S- y# kSTICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;: v* L3 @$ U$ @
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);
3 R# e9 m1 y5 G$ @" B# R1 B) DDRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);# H0 }3 L& `9 U9 t. Y7 ]9 c& a3 V* J* ~
PT:=REF(H,1)-REF(L,1);
! s J4 y k1 B( {9 J! qCDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
' h" t3 d W. ^1 EAH:=CDP+PT;% T5 i. t: v$ s8 F" ~( Y9 `
AL:=CDP-PT;
9 |. W+ D. J- d: M l4 _NH:=CDP*2-REF(L,1);
7 V, @2 O, d8 N8 H+ iNL:=CDP*2-REF(H,1);
3 Z$ q3 w+ ?) z B强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;6 K/ Q9 [$ X( y- s
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;" D7 @1 U' K) M# J( s1 T% x
M:=IF(AL |