程度面:MA(CLOSE,89),COLORFFA2FF;( \8 r* V6 b2 l4 j, I
BBI MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4;
' Z" t9 J8 W; a# |3 e6 u# Q7 t4 B% g0 rIF(BBI>REF(BBI,1),BBI,DRAWNULL),COLORRED,LINETHICK2;
% P5 b. H: z7 c' gIF(BBI=1,O,C,2,0),COLORYELLOW;
3 \/ \: w0 Y# G5 J3 f* }0 sMA13:=MA(CLOSE,13);8 {. S) U- E. k' R! w
X1:=(C+L+H)/3;
: Q2 Y1 W" \2 u- `5 v8 I7 I* S ]BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
1 H9 P0 [2 D( n; ^. ?3 j+ ~" y% WEMA8:=EMA(C,8);& T5 j7 P3 E# _0 o3 b1 b0 R7 O9 Q
A1:=MIN(O,C);( ?$ @/ H( }0 w: D( y9 l
B1:=ABS(O-C);
& I4 e: M; I, S0 I, UT1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);
5 M" x* |/ x6 |' HSTICKLINE(T1,A1,A1+B1/4,2,0),COLOR007575;* k! B r3 m8 W* d3 @* V( [
STICKLINE(T1,A1+B1/4,A1+B1/2,2,0),COLORFF0000;
( f* m( K' o j" ASTICKLINE(T1,A1+B1/2,A1+B1*3/4,2,0),COLOR007575;
6 X6 p% o _* H$ @% QSTICKLINE(T1,A1+B1*3/4,A1+B1,2,0),COLORFF0000;' D7 n! K$ w; c
LC:=REF(CLOSE,1);4 k! D5 S2 `( D ~$ x
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);& I9 Q7 v9 g, \8 E. d# J3 `
FF:=EMA(CLOSE,3);# t4 u c$ E5 T, R: v: I
MA15:=EMA(CLOSE,21);
* [+ U/ m3 d; j8 Q{DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),'底背离'),COLORA6E500;
! b& t; n. P. P6 M* e/ SDRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF;}
8 t' A0 }# n" ^9 H4 ?( v7 U1 S9 KSTICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),COLOR7F017F;
1 ?) R1 Y# j8 f+ e, A0 ~STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),COLORGREEN;. |" ^6 g& j+ r0 i4 A3 y
T2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);$ Q6 t1 `9 |( _. j# P2 u _; l* R, f
DRAWTEXT(T2,H*1.05,'反转'),COLORWHITE;
% V$ W" H0 s; l6 Z1 ?5 ?STICKLINE(T2,O,C,2,0),COLORRED;
. w7 o+ s q& u I( n5 bT12:=V2>=1;3 C8 {1 H- f( W8 T+ V
T0:=BARSLAST(T12);: j7 P. p4 L3 a& T* E, R y
L1:=REF(L,T0);
6 L. D) l* \3 O0 }9 P6 FH1:=REF(H,T0);/ \. T1 X2 j+ \6 S: B& Q
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),H1,H1,4,-1),COLORWHITE;& c4 U0 u" L* j$ k! [. w
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),L1,L1,4,-1),COLORWHITE;
" K1 X: K& N2 ]' {9 Z4 s4 c, c1 y{T11:=REF(T12,3) AND COUNT(LH1,4)>1;- [" F2 f9 H+ B
DRAWTEXT(T11,H*1.05,'三天'),COLORWHITE;7 I8 |1 R- E& i( \( @: j
STICKLINE(T11,O,C,2,0),COLORFF00FF;}
0 Y; c; Z) D: F1 L{(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) };
% R2 y0 ]/ s7 M" {3 t7 R' JL11:=MIN(REF(L,1),L);
5 E) h2 e9 X% a) F2 g7 l+ p: vL10:=MIN(L11,REF(L,2));
: J0 Y- ~2 E& R: A n5 f& YL21:=MAX(REF(L,1),L);' l6 j5 j9 L, b2 S
L20:=MAX(L21,REF(L,2));% S8 K$ b- l3 X, V3 ]0 b7 v
T111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND
& L: P" i2 f' M((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1));
" w4 z2 c) w& I, d& l, t7 p7 GT11:=T111 AND REF(T111,1)=0;
/ K F! L, i3 R- e% LSTICKLINE(T11,O,C,2,0),COLORFF00FF;1 \4 N* Z; s4 ]- R3 `
高:=REF(HHV(H,N),M); 5 L4 n" S; R1 q( }
低:=REF(LLV(L,N),M);1 e: v: j4 @( P9 z0 s3 q
H19:=高-(高-低)*0.191; : ?" `7 s! a: f
H38:=高-(高-低)*0.382; : W! K- {7 D. D" S
H中:=高-(高-低)*0.5;
9 w9 U1 b. v8 T3 y# p) v$ N: y# j2 q _H61:=高-(高-低)*0.618;
6 v$ k7 z" @+ c- c! bH80:=高-(高-低)*0.809;6 c) y; n( t; l* S4 ^
极点:REFDATE(高,DATE),POINTDOT,LINETHICK2,COLORWHITE;- k. B0 w/ J0 ?* o l. m" ]
%19.8:REFDATE(H19,DATE),POINTDOT,LINETHICK2,COLORYELLOW;
0 v8 L# I8 O, g* C2 l, J# v%38.2:REFDATE(H38,DATE),POINTDOT,LINETHICK2,COLORGREEN;4 a7 C; a7 k2 z$ \/ D( x
%50:REFDATE(H中,DATE),POINTDOT,LINETHICK2,COLORRED;
: \" I$ F; d0 L$ [4 h. o1 j/ P6 V%61.8:REFDATE(H61,DATE),POINTDOT,LINETHICK2,COLORMAGENTA;
: c8 i% a$ X, }%80.9:REFDATE(H80,DATE),POINTDOT,LINETHICK2,COLORBLUE;
) E) u" T, a0 @ {2 j低点:REFDATE(低,DATE),POINTDOT,LINETHICK2,COLORWHITE;
& ^6 A- C/ Z( c9 k: y7 N, XDRAWTEXT(ISLASTBAR,极点,'极点'),COLORWHITE;% D& |6 q6 x) ?
DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE; * C% r8 m' _4 C* U9 |+ S
STICKLINE(T1,A1,A1+B1/2,2,0),COLOR007575;. U" D8 Y; u- Y* z6 z! V/ f
STICKLINE(T1,A1+B1/2,A1+B1,2,0),COLORBLUE;
; r& g3 y% ?) CSTICKLINE(T11 AND T12,A1,A1+B1/2,2,0),COLORFF00FF;
/ n9 O# N8 a1 D- d3 K* b2 {STICKLINE(T11 AND T12,A1+B1/2,A1+B1,2,0),COLORYELLOW;
" O# T% F0 S# B$ c( YSTICKLINE(T1 AND T12,A1+B1/3,A1+B1,2,0),COLORYELLOW;
; X+ S$ _+ f8 n, n& e5 `4 T9 r% G! qSTICKLINE(T1 AND T12,A1,A1+B1/3,2,0),COLOR007575;/ i& T6 Q( c8 c4 E2 N
STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),COLORBLUE;
. t% e, F9 D& W) w$ rSTICKLINE(T2 AND T12,A1+B1/2,A1+B1,2,0),COLORRED;9 ~ ^; t; c0 U1 D1 L$ i
STICKLINE(T2 AND T12,A1,A1+B1/2,2,0),COLORYELLOW; |