|
程度面:MA(CLOSE,89),COLORFFA2FF;
$ s6 S( V' e: L2 e4 S! Z. XBBI MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4;
" A/ C4 T' d- H) M. J! [' B F( jIF(BBI>REF(BBI,1),BBI,DRAWNULL),COLORRED,LINETHICK2;+ P& f1 P, A0 R' g8 }/ o# _* x
IF(BBI=1,O,C,2,0),COLORYELLOW;
7 g, ~' N8 Q. b$ ~MA13:=MA(CLOSE,13);
E- h( i, P) [$ F2 \. NX1:=(C+L+H)/3;6 o& s8 f; ^2 a
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;8 c2 P; a4 M. X$ B/ H
EMA8:=EMA(C,8);$ V/ \* i: `! b, J
A1:=MIN(O,C);
8 U" J+ p5 F5 |9 i5 T$ qB1:=ABS(O-C);6 ~3 K9 G" w# e
T1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);, y* q. _1 l8 I: K
STICKLINE(T1,A1,A1+B1/4,2,0),COLOR007575;% X2 Z) C( f8 W; [ ~8 u# Q
STICKLINE(T1,A1+B1/4,A1+B1/2,2,0),COLORFF0000;
- e6 B5 ^+ B+ z" ]+ { {STICKLINE(T1,A1+B1/2,A1+B1*3/4,2,0),COLOR007575;/ i" c5 j; Y/ W5 e5 Y M
STICKLINE(T1,A1+B1*3/4,A1+B1,2,0),COLORFF0000;$ H$ j9 m& U4 d. F! S K; M
LC:=REF(CLOSE,1);3 b J- Y- Z8 [" `9 k4 a4 R0 G
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
9 z) l( A/ _9 |: r8 ?* Y' rFF:=EMA(CLOSE,3);
" o# @* I6 R i+ h2 IMA15:=EMA(CLOSE,21);: p" B/ [# E- K
{DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),'底背离'),COLORA6E500;& w7 g' j( v$ e7 L9 e
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF;}% D% e! U7 H8 O8 E5 N+ v( g9 Z
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),COLOR7F017F;
& _8 ?* F6 N7 y0 }8 R- n0 tSTICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),COLORGREEN;2 h5 t. ^1 R! v" M" h+ U9 f0 m# m
T2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);
$ W3 K6 }- d0 z. G, s6 A& ODRAWTEXT(T2,H*1.05,'反转'),COLORWHITE;
/ r# ?: G9 }/ J" r, @6 CSTICKLINE(T2,O,C,2,0),COLORRED;
+ ~, s4 R! s/ v6 ?1 M+ XT12:=V2>=1;
" Q+ _/ s& Q, L) r; h5 ST0:=BARSLAST(T12);. t( W" C/ T5 H) p6 W( i! A% Q' w
L1:=REF(L,T0);7 U, h8 }2 f/ O! b# k n# y
H1:=REF(H,T0);. Y, e! a; u5 @, ]3 ^- B( Y
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),H1,H1,4,-1),COLORWHITE;0 D* X+ j7 Q, ]" }6 A8 {5 j6 B V
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),L1,L1,4,-1),COLORWHITE;
) ?: b/ R5 @7 s2 E{T11:=REF(T12,3) AND COUNT(LH1,4)>1;
2 ^4 _0 o) l6 V' ZDRAWTEXT(T11,H*1.05,'三天'),COLORWHITE;
: j: r4 M) d2 O. s) jSTICKLINE(T11,O,C,2,0),COLORFF00FF;}: l5 z0 X3 J3 q4 N" R$ t
{(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) };$ c- R. ]) h" b" E5 }9 y
L11:=MIN(REF(L,1),L);" t' a% m% N, H5 {; U3 L- [8 F
L10:=MIN(L11,REF(L,2));) z. R: w( e6 h1 e5 ^& ` t' a
L21:=MAX(REF(L,1),L);( }5 E8 e, i" G1 F/ L+ J( H* t. B
L20:=MAX(L21,REF(L,2));
# V9 M0 m/ z/ YT111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND
( ^& E4 t1 f. S; ]# f1 J% W6 [((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1));3 Q/ K( B1 U% L9 Y5 o
T11:=T111 AND REF(T111,1)=0;
: [1 R/ R# Z( s N! HSTICKLINE(T11,O,C,2,0),COLORFF00FF;( r8 D. e c- W2 y7 Y: j
高:=REF(HHV(H,N),M); / D2 \3 q$ r! [8 k1 U# B
低:=REF(LLV(L,N),M);
* x$ N0 D4 d8 d" H( U' A: _H19:=高-(高-低)*0.191;
7 P o% d" o; T& I* \8 a) `H38:=高-(高-低)*0.382;
# R8 |! s7 N# t VH中:=高-(高-低)*0.5;
/ R1 v0 y7 z- C Y7 r8 e7 O, JH61:=高-(高-低)*0.618; " N" D5 l) ?7 p: s
H80:=高-(高-低)*0.809;( m* _) V7 ~' ^; f; `: C0 K) a+ E
极点:REFDATE(高,DATE),POINTDOT,LINETHICK2,COLORWHITE;8 s& K3 Y& ~- d A
%19.8:REFDATE(H19,DATE),POINTDOT,LINETHICK2,COLORYELLOW;' O1 C+ I- V2 ^0 _- ~1 R/ q) @
%38.2:REFDATE(H38,DATE),POINTDOT,LINETHICK2,COLORGREEN;6 o7 j+ U* B% u+ o" k2 N2 _% @
%50:REFDATE(H中,DATE),POINTDOT,LINETHICK2,COLORRED;
8 Q" r' Z1 o! |# _%61.8:REFDATE(H61,DATE),POINTDOT,LINETHICK2,COLORMAGENTA;
3 @/ X7 P0 f: ^% s%80.9:REFDATE(H80,DATE),POINTDOT,LINETHICK2,COLORBLUE;
4 x8 e$ }7 s. ?0 f2 |" B低点:REFDATE(低,DATE),POINTDOT,LINETHICK2,COLORWHITE;
4 C9 ^" D0 M* t6 i2 F+ p7 y6 G# B- SDRAWTEXT(ISLASTBAR,极点,'极点'),COLORWHITE;4 m% n1 h% t" G# n) H/ G+ @$ o
DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE; % b. g( p5 u6 ?% }! f/ {
STICKLINE(T1,A1,A1+B1/2,2,0),COLOR007575;
% @( N( E4 s8 K' W, lSTICKLINE(T1,A1+B1/2,A1+B1,2,0),COLORBLUE;, n, J/ l U7 O& W. a
STICKLINE(T11 AND T12,A1,A1+B1/2,2,0),COLORFF00FF;
5 s- c# t( ?# O& h" R# nSTICKLINE(T11 AND T12,A1+B1/2,A1+B1,2,0),COLORYELLOW;2 z# ]9 ~# t' q1 p- {5 u3 Q4 y2 ?
STICKLINE(T1 AND T12,A1+B1/3,A1+B1,2,0),COLORYELLOW;6 r+ x2 g6 R+ [, f" _
STICKLINE(T1 AND T12,A1,A1+B1/3,2,0),COLOR007575;
4 s/ C: ? I/ Y7 N5 }' fSTICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),COLORBLUE;) J; l7 d4 b& d- K
STICKLINE(T2 AND T12,A1+B1/2,A1+B1,2,0),COLORRED;
8 h: k/ f W- Z3 S3 xSTICKLINE(T2 AND T12,A1,A1+B1/2,2,0),COLORYELLOW; |