程度面:MA(CLOSE,89),COLORFFA2FF;
+ D6 {* F1 X+ ?7 ]( z8 iBBIMA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4;
) v' s: y3 P" R; wIF(BBI>REF(BBI,1),BBI,DRAWNULL),COLORRED,LINETHICK2;+ u+ s# | b4 S% O- z
IF(BBI=1,O,C,2,0),COLORYELLOW;
9 p6 r/ D3 h5 M; GMA13:=MA(CLOSE,13);
' I3 [) @2 b; j0 JX1:=(C+L+H)/3;8 K9 Y" A6 E+ l; v+ N8 Y
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;" j* e) J& P, h4 x" m
EMA8:=EMA(C,8);2 w5 c, C0 \$ H' a
A1:=MIN(O,C);7 b7 c# `+ j R
B1:=ABS(O-C);
% R' t7 i- x& r: G) _7 `3 wT1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);/ ]+ Y. E$ k# c4 A
STICKLINE(T1,A1,A1+B1/4,2,0),COLOR007575;+ D& K" {1 D0 L
STICKLINE(T1,A1+B1/4,A1+B1/2,2,0),COLORFF0000;/ `' Z' l; o5 }4 ]+ J0 @# o
STICKLINE(T1,A1+B1/2,A1+B1*3/4,2,0),COLOR007575;
1 q, {' m& |; ]: sSTICKLINE(T1,A1+B1*3/4,A1+B1,2,0),COLORFF0000; R; F0 ]! V5 E4 m/ A2 f
LC:=REF(CLOSE,1);. ^5 n9 j6 F( B# ]6 G( }, l
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
( B& v; U% T% ?+ ZFF:=EMA(CLOSE,3);: D( J3 l- k Y: N" m, s
MA15:=EMA(CLOSE,21);
, h6 ?$ N( B% C) U* o{DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),'底背离'),COLORA6E500;7 h( c0 q% ^3 P/ A8 Y$ l" }8 q
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF;}* t6 k/ w0 S, [3 j- w6 k+ V* J5 R9 Y
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),COLOR7F017F;. y: h s3 o* [6 u2 Q5 h
STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),COLORGREEN;; \( a; H$ S( E' f
T2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);
( u" W/ ^5 f6 j- Q* k+ ]8 ]" W/ D: u5 XDRAWTEXT(T2,H*1.05,'反转'),COLORWHITE;
3 {! D2 K8 q: a. l7 l- XSTICKLINE(T2,O,C,2,0),COLORRED;
0 z0 k" S8 C5 V/ hT12:=V2>=1;
2 L5 f8 D. C9 L! w% X% f' c7 \T0:=BARSLAST(T12);
- y; C5 O, R5 e7 @( ]' NL1:=REF(L,T0);! X( B. c5 p" C4 b }4 ^- v
H1:=REF(H,T0); E3 z' D/ _. Y: \# a
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),H1,H1,4,-1),COLORWHITE;0 P; t4 g, F( d1 b* _% a
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),L1,L1,4,-1),COLORWHITE;
0 U4 G ]. ~# ?2 _{T11:=REF(T12,3) AND COUNT(LH1,4)>1;
* q' }: u' d6 }$ |: c$ V* }DRAWTEXT(T11,H*1.05,'三天'),COLORWHITE;+ _ g8 C+ S! y: d( Y
STICKLINE(T11,O,C,2,0),COLORFF00FF;}6 a% X3 B5 ?: l' v" m) I
{(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) };
; G- K. Q7 t. VL11:=MIN(REF(L,1),L);
6 T3 }2 r" Q) }, x1 D5 hL10:=MIN(L11,REF(L,2));
) d9 K5 o m6 p; j+ ]L21:=MAX(REF(L,1),L);
' Q) q' F, {/ d, H: g! C3 w, ], iL20:=MAX(L21,REF(L,2));+ T8 w k) p2 I
T111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND
9 h) j, a3 L9 N& w2 p% I$ G1 \((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1));* R5 I* r( y1 c8 ` o' y, p( I
T11:=T111 AND REF(T111,1)=0;
4 v( ~2 P; j, Z4 O. iSTICKLINE(T11,O,C,2,0),COLORFF00FF;8 Y: Z U8 U. e6 A/ H V4 H+ |% W! f
高:=REF(HHV(H,N),M); : J# I# K, I8 C, l+ z) ^
低:=REF(LLV(L,N),M);
2 w3 d4 o( Y6 d6 q. [. WH19:=高-(高-低)*0.191;
# V' @1 p# t0 @H38:=高-(高-低)*0.382; & N% h; G! V0 g0 Y) |
H中:=高-(高-低)*0.5; & i' N$ Q& E* k& x( u
H61:=高-(高-低)*0.618;
) N* L/ p! G z. \+ p* c* P; S4 R- NH80:=高-(高-低)*0.809;
3 G* e0 d( W' ^& [% r r极点:REFDATE(高,DATE),POINTDOT,LINETHICK2,COLORWHITE;
( T) Y! E* Z2 C* Q3 T% ^7 E%19.8:REFDATE(H19,DATE),POINTDOT,LINETHICK2,COLORYELLOW;; \2 t0 O% e+ |& U5 a
%38.2:REFDATE(H38,DATE),POINTDOT,LINETHICK2,COLORGREEN;" ^# n: Y% K; d6 h. }
%50:REFDATE(H中,DATE),POINTDOT,LINETHICK2,COLORRED;
7 k3 N0 z4 o6 e$ w. P%61.8:REFDATE(H61,DATE),POINTDOT,LINETHICK2,COLORMAGENTA;; q5 v: p6 l/ \4 v* Z. M
%80.9:REFDATE(H80,DATE),POINTDOT,LINETHICK2,COLORBLUE;
! l! Z9 b& W! M8 T, z. h低点:REFDATE(低,DATE),POINTDOT,LINETHICK2,COLORWHITE;& X3 n* K6 c$ K4 ]% N3 e. }3 W
DRAWTEXT(ISLASTBAR,极点,'极点'),COLORWHITE;6 r# B8 k f% g& ^# Z: x ]
DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE;
/ B1 s" \4 a' @' d) h: c. }) Z OSTICKLINE(T1,A1,A1+B1/2,2,0),COLOR007575;) x. p" M k( a: K0 t( }5 N
STICKLINE(T1,A1+B1/2,A1+B1,2,0),COLORBLUE;
7 ]3 u4 F6 J1 P) tSTICKLINE(T11 AND T12,A1,A1+B1/2,2,0),COLORFF00FF;
2 n9 v' r Y7 Y. W- {STICKLINE(T11 AND T12,A1+B1/2,A1+B1,2,0),COLORYELLOW;0 }/ v7 q" g, {, H; G
STICKLINE(T1 AND T12,A1+B1/3,A1+B1,2,0),COLORYELLOW;3 |* p& G. ], _& a9 W/ j, n4 R9 M
STICKLINE(T1 AND T12,A1,A1+B1/3,2,0),COLOR007575;' T$ V8 j K2 Z6 R. K! ^4 \3 `
STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),COLORBLUE;7 Z- d7 j4 @& |, q$ Q- N/ [0 K# ^4 U
STICKLINE(T2 AND T12,A1+B1/2,A1+B1,2,0),COLORRED;
0 w% E9 R$ B+ n& g& y7 qSTICKLINE(T2 AND T12,A1,A1+B1/2,2,0),COLORYELLOW; |