|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
# B7 p9 M0 T" [VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
0 g0 F3 a5 j; D' {+ h5 @VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));0 h0 M; x: E( m8 V# g$ C# g
DIR1:=ABS(CLOSE-REF(CLOSE,5));
. @; ~/ A; S: lVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);; c4 H1 Q3 A9 e/ w7 t9 @0 A+ N
ER1:=DIR1/VIR1;
, [2 \. \4 a3 Q) h/ {' D6 JCS1:=ER1*(0.8-2/8)+2/8;
H/ i, X4 G# {: `7 n6 {' T5 ^- d5 W: uCQ1:=CS1*CS1;( f3 Y) j& b9 R) T
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;
$ z; J* P: A; Z. x4 ?DIR2:=ABS(CLOSE-REF(CLOSE,10));( U: f1 T5 Y! c+ a
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
2 K& W' `. G$ U6 i5 H( u" N$ WER2:=DIR2/VIR2;
& `4 u i% _% V3 p- i$ kCS2:=ER2*(0.8-2/24)+2/24;( O6 F" c9 T/ x( }/ \* y# T
CQ2:=CS2*CS2;
' z6 ]& m2 |0 C, wAMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;
" F4 T1 e) w+ F2 u& ~; I0 V$ VAMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;& r1 {5 Y0 e6 N
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;
* `7 ^8 S3 W, ^- T7 O3 d* U( wSTICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;6 X2 f# U, T3 x) }5 H
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;% v+ k; ~) n4 N$ K4 B
STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;9 P0 o; B6 f' w6 Z9 n9 o
STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;, C& a. j1 y q' {7 Q& x
STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;4 C% t3 T( {6 G9 I
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);1 P3 Z( y$ }4 [3 p& w- @
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);3 v8 K# G u" l" b( x
PT:=REF(H,1)-REF(L,1);
. T0 r g: Q) L' BCDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
4 W6 S) P/ a4 }$ T- JAH:=CDP+PT;
+ Q( P% E# [8 u! a) WAL:=CDP-PT;$ B' ~$ ?$ J0 K" \5 _ i# [
NH:=CDP*2-REF(L,1);; j. K4 V/ |3 p z8 [: ]8 Q+ ]# u
NL:=CDP*2-REF(H,1);: r! U+ u5 x/ L# i9 h
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
0 ?% V; [, ?% {- Y& d' R6 P阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
- w0 V, `2 R1 P! e+ U6 |M:=IF(AL |