|
程度面:MA(CLOSE,89),COLORFFA2FF;
3 H1 C# x3 m% d2 B% }3 E0 ^BBI MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4;7 G- U' N( K9 D/ I6 L# h
IF(BBI>REF(BBI,1),BBI,DRAWNULL),COLORRED,LINETHICK2;
5 S# h' V) ~0 o5 J- S) _IF(BBI=1,O,C,2,0),COLORYELLOW;* ^* O }, j; N' s! A' @8 y
MA13:=MA(CLOSE,13);
" j/ A+ P# f7 q3 L5 GX1:=(C+L+H)/3;
+ ~% h/ M% }( h3 D. _" [BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;, n7 T9 T7 W& x% s. Y$ m2 A
EMA8:=EMA(C,8);8 \ N' v8 X% a8 z) U1 G7 G5 M
A1:=MIN(O,C);( Q# e& V7 ?$ H4 V& }2 @
B1:=ABS(O-C);
5 p6 y' s4 a' D0 G" GT1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);: G" S, j% X, p% ~) Y* l6 s
STICKLINE(T1,A1,A1+B1/4,2,0),COLOR007575;
+ K. }! q8 g- W" y& Y: B1 A0 b! B! [STICKLINE(T1,A1+B1/4,A1+B1/2,2,0),COLORFF0000;
$ y; f: }$ |0 p- X' j9 a3 wSTICKLINE(T1,A1+B1/2,A1+B1*3/4,2,0),COLOR007575;
( K/ u/ v6 ?, x: ^& U$ YSTICKLINE(T1,A1+B1*3/4,A1+B1,2,0),COLORFF0000;
/ |: [" U2 h# n m0 Z1 eLC:=REF(CLOSE,1); n$ f9 {( y1 Y# V+ I# X9 X
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);# n$ W; x/ U; Y4 e, {9 P, S0 f, O
FF:=EMA(CLOSE,3);( M: A4 c9 z, {% H2 T
MA15:=EMA(CLOSE,21);% {0 k; K5 k. B5 ~
{DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),'底背离'),COLORA6E500;
! J+ w: P( s* @6 z$ {) X* kDRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF;}2 v' ?: d" I; s% Z, g4 W
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),COLOR7F017F;
7 x$ b! i; S+ M: c _STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),COLORGREEN;
- h# p" E3 p2 l4 g) PT2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);
1 |7 r* q' u# ]& o3 v' T) H# XDRAWTEXT(T2,H*1.05,'反转'),COLORWHITE;# C! d7 N' x! N3 V( A. B3 o
STICKLINE(T2,O,C,2,0),COLORRED;
) n0 _4 U. n2 w/ r+ y `T12:=V2>=1;1 E* j% i8 c) L: ?# D; v
T0:=BARSLAST(T12);9 C" J8 E- ]% p6 l9 P1 ~, e2 D
L1:=REF(L,T0);/ v( _9 Y P4 \7 V3 V7 g/ ^
H1:=REF(H,T0);
, V" t# w( T: Q9 A% eSTICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),H1,H1,4,-1),COLORWHITE;+ i- b/ Y" }" }; i0 n! x2 q; l
STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),L1,L1,4,-1),COLORWHITE;
7 d& b$ i& }9 M0 [* @& f3 B1 x{T11:=REF(T12,3) AND COUNT(LH1,4)>1;' W3 n3 g# ~& g) q/ g2 m' z+ s
DRAWTEXT(T11,H*1.05,'三天'),COLORWHITE;
* F2 R$ c: }% g* i2 s5 _6 pSTICKLINE(T11,O,C,2,0),COLORFF00FF;}
) S$ Z) q9 R6 W+ O* B7 [# }/ C( V{(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) };) ?0 ` B/ b/ P" B: ~/ w
L11:=MIN(REF(L,1),L);
* L; j$ h2 M$ pL10:=MIN(L11,REF(L,2));
# k. d& P5 C! C! m' E. @8 E. eL21:=MAX(REF(L,1),L);. \" @) [" I9 G+ E. _ X X
L20:=MAX(L21,REF(L,2));
% [' ?7 A' {* C9 a' OT111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND
3 e, J8 W1 M: [+ e- K3 F9 N((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1));8 l! c6 r+ l* \# S1 n/ c
T11:=T111 AND REF(T111,1)=0;, v3 X m2 U+ G* j7 B- \
STICKLINE(T11,O,C,2,0),COLORFF00FF;
( `1 s! b: U' R5 s3 [! y# ?( ], r6 S高:=REF(HHV(H,N),M); - S3 E# J7 l' P) [
低:=REF(LLV(L,N),M);
: \7 ?2 w6 w% Q( `H19:=高-(高-低)*0.191; . S3 x. [. z& @, }
H38:=高-(高-低)*0.382;
, M+ A% Z* E$ q' _H中:=高-(高-低)*0.5; $ j. m) `+ F& U
H61:=高-(高-低)*0.618;
0 Q* h. F( o$ AH80:=高-(高-低)*0.809;
* g! n/ k) M. o% a7 h' Z: z极点:REFDATE(高,DATE),POINTDOT,LINETHICK2,COLORWHITE;- P3 @- C: }6 M% \3 }
%19.8:REFDATE(H19,DATE),POINTDOT,LINETHICK2,COLORYELLOW;) V* t' `/ }8 |. G+ c- k
%38.2:REFDATE(H38,DATE),POINTDOT,LINETHICK2,COLORGREEN;
/ r5 v% R/ i* x" C7 W& G# s%50:REFDATE(H中,DATE),POINTDOT,LINETHICK2,COLORRED;) J. F0 w& O0 P8 m% l
%61.8:REFDATE(H61,DATE),POINTDOT,LINETHICK2,COLORMAGENTA;
g1 t$ ^- N& S( Z- c%80.9:REFDATE(H80,DATE),POINTDOT,LINETHICK2,COLORBLUE;& V+ |* Q- S# f4 q; t
低点:REFDATE(低,DATE),POINTDOT,LINETHICK2,COLORWHITE;9 {) _/ y1 h: b& F2 ^
DRAWTEXT(ISLASTBAR,极点,'极点'),COLORWHITE;
+ K& c- \3 Y3 x5 u, }DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE;
) Y2 A% y8 Q( n# y* G Y' V& mSTICKLINE(T1,A1,A1+B1/2,2,0),COLOR007575; h+ P4 u% {& Z: T5 T
STICKLINE(T1,A1+B1/2,A1+B1,2,0),COLORBLUE;# ~+ Y a. {3 R7 v, @4 Z7 O
STICKLINE(T11 AND T12,A1,A1+B1/2,2,0),COLORFF00FF;( Q7 d& G! C4 U$ b: d3 A, z" I
STICKLINE(T11 AND T12,A1+B1/2,A1+B1,2,0),COLORYELLOW;
5 j) n1 }. M* V( n" z4 WSTICKLINE(T1 AND T12,A1+B1/3,A1+B1,2,0),COLORYELLOW;
, y0 c: n* I8 z, VSTICKLINE(T1 AND T12,A1,A1+B1/3,2,0),COLOR007575;
( e* D/ X; D4 J1 u9 S% @STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),COLORBLUE;2 _* M* E2 _5 V M+ d2 d
STICKLINE(T2 AND T12,A1+B1/2,A1+B1,2,0),COLORRED;
$ s% m. ? I- I7 I& {# rSTICKLINE(T2 AND T12,A1,A1+B1/2,2,0),COLORYELLOW; |