|
程度面:MA(CLOSE,89),COLORFFA2FF;4 z" n9 Z, [. z1 Z; r: W1 }5 ~5 m
BBI MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4;
) ^, {: a. k; Z1 q$ LIF(BBI>REF(BBI,1),BBI,DRAWNULL),COLORRED,LINETHICK2;
0 L1 H4 p3 H8 e; c$ I |IF(BBI=1,O,C,2,0),COLORYELLOW;
9 N, Z' \ O6 O# \MA13:=MA(CLOSE,13);6 O$ N$ Q8 i6 v* j( s
X1:=(C+L+H)/3;0 x# x% E2 x/ G$ v* g( w
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
4 S( R* j5 ]6 c3 z6 _9 @EMA8:=EMA(C,8);
; y; G. m& v* H WA1:=MIN(O,C);
- W$ n- ~% ~" i9 `. b" {B1:=ABS(O-C);
1 g) \- m, ?$ i/ L) lT1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);. E, S v$ {' j8 P, n" ]9 @) `
STICKLINE(T1,A1,A1+B1/4,2,0),COLOR007575;
5 ~1 X) C8 z8 a! SSTICKLINE(T1,A1+B1/4,A1+B1/2,2,0),COLORFF0000;
7 f0 T9 s/ ^3 K& \' tSTICKLINE(T1,A1+B1/2,A1+B1*3/4,2,0),COLOR007575;9 S+ C/ v! b! r+ x, k, ]
STICKLINE(T1,A1+B1*3/4,A1+B1,2,0),COLORFF0000; o# L( h2 y! W- T4 }( n# B
LC:=REF(CLOSE,1);
" j) `0 ^; k- M; K1 KRSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
0 i. h5 k" P6 wFF:=EMA(CLOSE,3);
/ N' h+ c1 K4 B% ]9 @3 {. f5 `MA15:=EMA(CLOSE,21);0 n' p+ \( p( p; L
{DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),'底背离'),COLORA6E500;& ~* F% l- q2 m8 j, S
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF;}. S+ [. @6 `! v- d/ ~5 w. R/ `+ U
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),COLOR7F017F;
& v( b5 A o% Z2 r3 PSTICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),COLORGREEN;
( e z) z/ ^: U2 x: TT2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);6 J: F( n4 l# G+ u, @
DRAWTEXT(T2,H*1.05,'反转'),COLORWHITE;2 f. B- D3 r/ n& q( A. n
STICKLINE(T2,O,C,2,0),COLORRED;
+ Y: b( g- t/ M1 ^4 U$ ^T12:=V2>=1;
C7 I, o! t8 u1 yT0:=BARSLAST(T12);
, ^1 Q, r4 i' D5 \; H5 ]$ } F; yL1:=REF(L,T0);/ O) u5 t. r3 W- T( Y8 t$ i
H1:=REF(H,T0);( _% Q5 D4 J: N
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),H1,H1,4,-1),COLORWHITE;% l2 y; X8 G' q9 O9 l/ b
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),L1,L1,4,-1),COLORWHITE;* i, `3 w0 c1 L C9 t
{T11:=REF(T12,3) AND COUNT(LH1,4)>1;- j' r5 c7 `$ Z0 g
DRAWTEXT(T11,H*1.05,'三天'),COLORWHITE;% r5 Q& G$ d' k* G. M T w* F
STICKLINE(T11,O,C,2,0),COLORFF00FF;}4 V Z1 X9 d! j! |4 t# \
{(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) };
, I9 a* J. p. |3 dL11:=MIN(REF(L,1),L);9 m3 D; U: n# ^% y9 i- D( Q
L10:=MIN(L11,REF(L,2));" f% i/ f" R4 r. B3 ^6 x" P4 I, R
L21:=MAX(REF(L,1),L);* R: M; j3 L1 S
L20:=MAX(L21,REF(L,2));
& F# E; K3 ]8 m% ^! ?6 IT111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND / c1 w* M! D0 U) a- Z7 w3 M3 G" T3 U
((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1));0 `9 P# e' ?# X' j M; I
T11:=T111 AND REF(T111,1)=0;; E. M7 u" k! f# K. h% z K+ ~
STICKLINE(T11,O,C,2,0),COLORFF00FF;, F; T9 D5 N( P! {
高:=REF(HHV(H,N),M);
- R. H, [# W R2 z% r0 g" P低:=REF(LLV(L,N),M);( t& _. ` I) I5 T6 Y9 p2 z2 q
H19:=高-(高-低)*0.191;
4 g$ G0 W6 ^1 o( DH38:=高-(高-低)*0.382; 4 F' o6 S9 D5 o7 ~6 }
H中:=高-(高-低)*0.5;
( `% [: [$ B: Y" g& H' k, v5 XH61:=高-(高-低)*0.618;
1 S8 Y. u! ^ _% A4 {# v/ m$ jH80:=高-(高-低)*0.809;+ n4 \+ l* U; i; t$ s
极点:REFDATE(高,DATE),POINTDOT,LINETHICK2,COLORWHITE;
0 ?, m4 W' f3 W7 M4 Y3 b%19.8:REFDATE(H19,DATE),POINTDOT,LINETHICK2,COLORYELLOW;
5 y3 U( [8 c# b! @- L) C# Q2 a%38.2:REFDATE(H38,DATE),POINTDOT,LINETHICK2,COLORGREEN;
( H( t! ?( F. N% W& S# }%50:REFDATE(H中,DATE),POINTDOT,LINETHICK2,COLORRED;
: m+ `! P( t9 D# d%61.8:REFDATE(H61,DATE),POINTDOT,LINETHICK2,COLORMAGENTA;
, L$ L Q+ O5 ~* k& v2 Z$ ^5 _%80.9:REFDATE(H80,DATE),POINTDOT,LINETHICK2,COLORBLUE;* C9 L: h. w! l/ x
低点:REFDATE(低,DATE),POINTDOT,LINETHICK2,COLORWHITE;2 J- u& }# d X: p
DRAWTEXT(ISLASTBAR,极点,'极点'),COLORWHITE;8 V% C# J2 {$ E S" C
DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE;
- @8 e! @% t- N) Y+ [STICKLINE(T1,A1,A1+B1/2,2,0),COLOR007575;) d0 J% K! d9 k* ~0 a& @. \9 H
STICKLINE(T1,A1+B1/2,A1+B1,2,0),COLORBLUE;4 o1 l, p9 ?7 N+ X
STICKLINE(T11 AND T12,A1,A1+B1/2,2,0),COLORFF00FF;
! Y' Y+ i+ a5 O$ N! @' W0 _3 D) QSTICKLINE(T11 AND T12,A1+B1/2,A1+B1,2,0),COLORYELLOW;& o0 M; y- H4 M# \: E1 P
STICKLINE(T1 AND T12,A1+B1/3,A1+B1,2,0),COLORYELLOW;) q; }0 _, a. S% H5 C8 f
STICKLINE(T1 AND T12,A1,A1+B1/3,2,0),COLOR007575;3 m7 ^ [1 v1 Z
STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),COLORBLUE;: s% [, k/ g/ q8 H l
STICKLINE(T2 AND T12,A1+B1/2,A1+B1,2,0),COLORRED;
2 F0 W8 _+ {" [STICKLINE(T2 AND T12,A1,A1+B1/2,2,0),COLORYELLOW; |