|
程度面:MA(CLOSE,89),COLORFFA2FF;
5 j* A6 y* f! v% @4 J7 w) hBBI MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4;9 O" g' Q/ t5 W& r
IF(BBI>REF(BBI,1),BBI,DRAWNULL),COLORRED,LINETHICK2;
( r" }; r8 O( L, DIF(BBI=1,O,C,2,0),COLORYELLOW;. C& t z1 s' L7 ~- B6 R; e# t/ V% `
MA13:=MA(CLOSE,13);
' ?1 a0 w5 B; k1 c0 s; L) tX1:=(C+L+H)/3;
$ t$ |1 W$ f0 B- R, qBB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;* F; a. C" y8 U
EMA8:=EMA(C,8);: B/ L" d. E4 F. ^3 _0 k+ A2 \1 _
A1:=MIN(O,C);
& r `# C# P% T+ u l1 eB1:=ABS(O-C);
) J, G% k* a$ _: c0 DT1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);5 A4 f" W8 {% x3 z2 w
STICKLINE(T1,A1,A1+B1/4,2,0),COLOR007575;
2 f7 u3 j+ k* C; T; M+ G7 fSTICKLINE(T1,A1+B1/4,A1+B1/2,2,0),COLORFF0000;! o; H% X. g; J
STICKLINE(T1,A1+B1/2,A1+B1*3/4,2,0),COLOR007575;+ v+ @ r8 d b( _. x5 h
STICKLINE(T1,A1+B1*3/4,A1+B1,2,0),COLORFF0000;, r5 [# x1 ^! C
LC:=REF(CLOSE,1);
: l" ^8 G4 U4 p( M8 wRSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
$ R( K" o6 s# \+ k+ CFF:=EMA(CLOSE,3);* R3 E# t; B6 u7 s- P
MA15:=EMA(CLOSE,21);
, v N. A9 n0 o: R4 }4 E2 R{DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),'底背离'),COLORA6E500;2 F' y+ c* A8 T7 @% _
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF;}) G+ {- D% `5 j: g" L4 C d
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),COLOR7F017F;) m" V; T1 Z3 k7 x2 b
STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),COLORGREEN;
$ @/ H! _% D* g) V( M" Y, t+ T* BT2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);9 b4 \2 U) o! V& ?/ u% b3 ^
DRAWTEXT(T2,H*1.05,'反转'),COLORWHITE;' u# q g& a; `5 y# i# y) N: m
STICKLINE(T2,O,C,2,0),COLORRED; ) h1 x' X0 }8 i% ^8 @4 b1 i# U9 M
T12:=V2>=1;' M4 l. w7 H: i
T0:=BARSLAST(T12);
0 C& ?, f% u4 E; Y6 Z6 R/ CL1:=REF(L,T0);/ R* ^: ]3 c& p2 `! u
H1:=REF(H,T0);
( X+ K3 ~2 X9 r0 K+ Q* aSTICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),H1,H1,4,-1),COLORWHITE; r3 `0 p* r$ g2 C; K
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),L1,L1,4,-1),COLORWHITE;
7 y e* Y9 `5 G7 R{T11:=REF(T12,3) AND COUNT(LH1,4)>1;+ j0 D4 L( X. G8 E! n, c2 h* i
DRAWTEXT(T11,H*1.05,'三天'),COLORWHITE;2 w x- T3 q3 E# z
STICKLINE(T11,O,C,2,0),COLORFF00FF;}" Y1 l7 M9 p0 G- c: u* P1 j8 p
{(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) };; n6 n/ } [6 y8 V3 q) r, E! Y
L11:=MIN(REF(L,1),L);) u! L; ?* m1 R3 I9 B6 ^
L10:=MIN(L11,REF(L,2));
3 }6 O! n7 D$ S4 pL21:=MAX(REF(L,1),L);
6 C' E6 U) a( {! TL20:=MAX(L21,REF(L,2));
+ [0 p5 T$ ]! W/ g( S; e) gT111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND # u! ]/ p5 `, v! c$ q; s$ [( I, ^& s+ s
((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1));
8 N% U2 S" v6 L" D' u$ F- [7 BT11:=T111 AND REF(T111,1)=0;' v, W- Z$ z* q k
STICKLINE(T11,O,C,2,0),COLORFF00FF;
- w; P4 Y- q: _5 o高:=REF(HHV(H,N),M); 4 N: V+ G1 w( r! U' i
低:=REF(LLV(L,N),M);1 y+ s) ^. [5 K0 n% I5 H
H19:=高-(高-低)*0.191; % |0 L" @* w( B- M
H38:=高-(高-低)*0.382; 1 k; M7 | D: z% A% z, {
H中:=高-(高-低)*0.5; # B, _+ h+ S; Z' `" q& l3 ~
H61:=高-(高-低)*0.618; ' s! H# m0 R; n7 T: S" L
H80:=高-(高-低)*0.809;, r3 i% |! u& ~. k; y
极点:REFDATE(高,DATE),POINTDOT,LINETHICK2,COLORWHITE;
2 ?3 x# d q$ L f) B: [%19.8:REFDATE(H19,DATE),POINTDOT,LINETHICK2,COLORYELLOW;9 ~: [/ i# Z- j* Y, T- ?
%38.2:REFDATE(H38,DATE),POINTDOT,LINETHICK2,COLORGREEN;+ H1 x& G- v% I0 N3 Z& Z7 Z
%50:REFDATE(H中,DATE),POINTDOT,LINETHICK2,COLORRED;4 |+ ^& U( n5 a- \
%61.8:REFDATE(H61,DATE),POINTDOT,LINETHICK2,COLORMAGENTA;' g/ v3 H; g l. J% t
%80.9:REFDATE(H80,DATE),POINTDOT,LINETHICK2,COLORBLUE;
4 X5 I- b" N* U5 j* F2 b( f8 {低点:REFDATE(低,DATE),POINTDOT,LINETHICK2,COLORWHITE;$ c2 O/ l. m1 |! n/ f6 z
DRAWTEXT(ISLASTBAR,极点,'极点'),COLORWHITE;
) y5 k7 E1 y" X9 _2 Z6 }DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE; 1 g8 P( t% j7 | l& t1 Q
STICKLINE(T1,A1,A1+B1/2,2,0),COLOR007575;
& C: e+ Q- l( U% A7 ?. [6 C! zSTICKLINE(T1,A1+B1/2,A1+B1,2,0),COLORBLUE;6 f' T$ |: V0 Y4 \" s$ g0 T; r& L
STICKLINE(T11 AND T12,A1,A1+B1/2,2,0),COLORFF00FF;
% q6 n' J: x! QSTICKLINE(T11 AND T12,A1+B1/2,A1+B1,2,0),COLORYELLOW;4 l6 u2 _: P% r5 g; c8 C* O
STICKLINE(T1 AND T12,A1+B1/3,A1+B1,2,0),COLORYELLOW;' R* l$ m v" W( N+ Z4 b6 _% r3 F
STICKLINE(T1 AND T12,A1,A1+B1/3,2,0),COLOR007575;
' I0 z/ E- n6 sSTICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),COLORBLUE;
' G$ `; J5 F7 k$ k' r' oSTICKLINE(T2 AND T12,A1+B1/2,A1+B1,2,0),COLORRED;
% }0 f/ h9 i9 JSTICKLINE(T2 AND T12,A1,A1+B1/2,2,0),COLORYELLOW; |