DRAWGBK(OPEN>0,RGB(185,135,0),RGB(85,55,0),0,'02',0);
NOTEXT顶:95,DOTLINE,COLORBLACK;
NOTEXT底:0,DOTLINE,COLORBLACK;
NOTEXT分界线:50,DOTLINE,COLORBLACK;
A1:=(CLOSE+HIGH+LOW+OPEN)/4;
ma1:=ema(A1,5);
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1;
RSV2:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
K2:=SMA(RSV2,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
RSV3:=(CLOSE-LLV(LOW,31))/(HHV(HIGH,31)-LLV(LOW,31))*100;
K3:=SMA(RSV3,3,1);
D3:=SMA(K3,3,1);
J3:=3*K3-2*D3;
RSV4:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K4:=SMA(RSV4,3,1);
D4:=SMA(K4,3,1);
J4:=3*K4-2*D4;
K:EMA((K1+K2+K3+K4)/4,3),COLORRED,NODRAW;
D:EMA((D1+D2+D3+D4)/4,3),COLORBLUE,NODRAW;
J:EMA(J1,3)COLORLIMAGENTA,NODRAW;
过滤:= K>REF(K,1) AND K3>=REF(K3,1);
STICKLINE(过滤,0,K,3,0),COLOR993333;
STICKLINE(过滤,0,K,2.7.5,0),COLOR995533;
STICKLINE(过滤,0,K,2.4,0),COLOR996633;
STICKLINE(过滤,0,K,2.1,0),COLOR998833;
STICKLINE(过滤,0,K,1.8,0),COLOR999966;
STICKLINE(过滤,0,K,1.5,0),COLOR999933;
STICKLINE(过滤,0,K,1.2,0),COLOR999966;
STICKLINE(过滤,0,K,0.9,0),COLOR999988;
STICKLINE(过滤,0,K,0.6,0),COLORBLACK;
STICKLINE(过滤,0,K,0.3,0),COLORCCCCCC;
RSV6:=(INDEXC-LLV(INDEXL,7))/(HHV(INDEXH,7)-LLV(INDEXL,7))*100;
KI:=SMA(RSV6,3,1);
DI:=SMA(KI,3,1);
JI:=3*KI-2*DI;
WIN:=WINNER(CLOSE*0.9)*100;
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
开始控盘:=过滤 AND (控盘>0 OR WIN>1) AND K>REF(K,1) AND K3>REF(K3,1);
STICKLINE(开始控盘,0,K,3,0),COLOR0000FF;
STICKLINE(开始控盘,0,K,2.7,0),COLOR001BFF;
STICKLINE(开始控盘,0,K,2.4,0),COLOR0025FF;
STICKLINE(开始控盘,0,K,2.1,0),COLOR0039FF;
STICKLINE(开始控盘,0,K,1.8,0),COLOR0052FF;
STICKLINE(开始控盘,0,K,1.5,0),COLOR006AFF;
STICKLINE(开始控盘,0,K,1.2,0),COLOR0089FF;
STICKLINE(开始控盘,0,K,0.9,0),COLOR009CFF;
STICKLINE(开始控盘,0,K,0.6,0),COLOR00C0FF;
STICKLINE(开始控盘,0,K,0.3,0),COLOR00CAFF;
趋势:=MA1>=REF(MA1,1) AND K2>REF(K2,1) AND K3>REF(K3,1) AND K4>REF(K4,1) AND K>REF(K,1) AND WIN>1;
STICKLINE(开始控盘 AND 趋势,0,K,0.6,0),COLOR99A9FF;
STICKLINE(开始控盘 AND 趋势,0,K,0.3,0),COLOR9999FF;
指数趋势:EMA(JI,3),COLORFF9966,LINETHICK1,NODRAW;
筹码:WIN,COLOR009CFF,NODRAW;
NOTEXTK:K,COLORRED,LINETHICK1;
NOTEXTD:D,COLORBLUE,LINETHICK1;
NOTEXTJ:J,COLORLIMAGENTA,LINETHICK1;
X1:=BArslAST(REF(crOSS(K,D),1));
底背离:=REF(CLOSE,X1+1)>CLOSE AND K>REF(K,A1+1) AND CROSS(K,D);
DRAWICON(底背离,67,1);
DRAWTEXT(底背离,60,' 底背离'),COLORWHITE;
X2:=BARSLAST(REF(CROSS(D,K),1));
顶背离:=REF(CLOSE,X2+1)<CLOSE AND REF(K,X2+1)>K AND CROSS(D,K);
DRAWICON(顶背离,92,2);
DRAWTEXT(顶背离,85,' 顶背离'),COLORCYAN;
底部:=CROSS(K3,D3) AND K3<25;
STICKLINE(底部,0,10,2,0),COLOR0000FF;
DRAWTEXT(底部,25,'底部'),COLORBLUE;
JCCOUNT:=COUNT(CROSS(K3,D3),BARSLAST(K3>25));
再次探底:=CROSS(K3,D3) AND K3<25 AND COUNT(JCCOUNT=2,15)=1;
DRAWTEXT(再次探底,45,'再次探底'),COLORBLUE;
