智能KDJ操盘系统【通达信】

VAR1:=REF(LOW,1);
VAR2:=SMA(ABS(LOW-VAR1),3,1)/SMA(MAX(LOW-VAR1,0),3,1)*100;
VAR3:=EMA(IF(CLOSE*1.2,VAR2*10,VAR2/10),3);
VAR4:=LLV(LOW,38);
VAR5:=HHV(VAR3,38);
VAR6:=IF(LLV(LOW,90),1,0);
VAR7:=EMA(IF(LOW<=VAR4,(VAR3+VAR5*2)/2,0),3)/618*VAR6;
VAR8:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
VAR9:=SMA(VAR8,13,8);
底线:0,COLOR00FFFF;
主力吸货:VAR7,COLOR0000FF;
吸筹1:STICKLINE(VAR7,0,VAR7,6,0),COLOR0000FF;
吸筹2:STICKLINE(VAR7,0,VAR7,5,0),COLOR6600FF;
吸筹3:STICKLINE(VAR7,0,VAR7,4,0),COLORBB00FF;
吸筹4:STICKLINE(VAR7,0,VAR7,3,0),COLORFF00FF;
吸筹5:STICKLINE(VAR7,0,VAR7,2,0),COLORFF33FF;
吸筹6:STICKLINE(VAR7,0,VAR7,1,0),COLORFF66FF;
吸筹7:STICKLINE(VAR7,0,VAR7,0,0),COLORFF99FF;

BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖离:=MA(BIAS,3);
抄底:IF(乖离<-12 AND 乖离>=-18,-4,0), COLORCYAN,LINETHICK1;
STICKLINE(乖离<-12 AND 乖离>=-18,2,0,6,0) , COLORCYAN;
抄底二:IF(乖离<-18,3,0),COLORFF35FF,LINETHICK1;
STICKLINE(乖离<-18,3,0,6,0),COLORFF35FF;
抄底三:IF(乖离<-6,5,0),COLORRED,LINETHICK1;
STICKLINE(乖离<-6,5,3,2,1),COLORRED;
抄底四:IF(乖离<-4.5,0,0),COLOR00FFFF,LINETHICK1;
STICKLINE(乖离<-4.5,0,1,3,1),COLOR00FFFF;

VARA1:=DMA(CLOSE,VOL/MA(VOL,4)/4);
VARA2:=DMA(CLOSE,VOL/MA(VOL,31)/31);
VARA3:=(CLOSE-VARA1)/VARA1*100<-10;
VARA4:=(VARA1-VARA2)/VARA2*100<-16;
VARA5:=(CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100<-23;
VARA6:=SMA(MAX(CLOSE-REF(CLOSE,1),0),3,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),3,1)*100>16;
VARA7:=100*(HHV(HIGH,27)-CLOSE)/(HHV(HIGH,27)-LLV(LOW,27));
VARA8:=INDEXC;
VARA9:=MA(VARA8,6);
VARA:=MA(VARA8,24);
VARB:=MA(VARA8,32);
VARC:=VARB>VARA9*1.11 AND VARA>VARA9*1.095;
SSS:=(VARA3 AND VARA4 AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0.07 OR VARA5 AND VARA6 AND CROSS(VARA7,79) OR VARC AND CLOSE/COST(8)<=0.8)*100;
抄底王:SSS>0,COLORWHITE,LINETHICK1;
STICKLINE(SSS>0,0,6,6,0),COLORWHITE;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),COLORWHITE;
D:SMA(K,3,1),COLORYELLOW;
J:3*K-2*D,COLORMAGENTA;

底: 20,LINETHICK1 ,POINTDOT, COLOR77AA1A;
入顶: 80,LINETHICK2 ,POINTDOT , COLOR9966FF;
大顶: 100,LINETHICK2 ,POINTDOT ,COLOR22A6E6;
顶轴:105, POINTDOT,LINETHICK2;
上轴:90, POINTDOT,LINETHICK2;
下轴:10, POINTDOT,LINETHICK2;
底轴:0, POINTDOT,LINETHICK2;
抢钱轴:-10, POINTDOT,LINETHICK2;
DRAWTEXT(CROSS(J,顶轴) ,100,'大出'), COLORYELLOW;
DRAWTEXT(CROSS(J,上轴) ,90,'小出'), COLOR99FFCC;
DRAWTEXT(CROSS(下轴,J) ,10,'小进'), COLORBLUE;
DRAWTEXT(CROSS(底轴,J) ,0,'大进'), COLORRED;
DRAWTEXT(CROSS(抢钱轴,J) ,-5,'狂进'), COLORWHITE;A01:=DYNAINFO(5);

IF(K<REF(K,1),K,DRAWNULL),COLORGREEN,LINETHICK1;
IF(D<REF(D,1),D,DRAWNULL),COLORCYAN,LINETHICK1;
IF(J<REF(J,1),J,DRAWNULL),COLORFFFF00,LINETHICK1;
IF(K>REF(K,1),K,DRAWNULL),COLORRED,LINETHICK1;
IF(D>REF(D,1),D,DRAWNULL),COLORYELLOW,LINETHICK1;
IF(J>REF(J,1),J,DRAWNULL),COLORFF00FF,LINETHICK1;
小底:REF(IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,5,0),1),COLORYELLOW;

A:=MA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),19)+100;

B:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))+100;

D1:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4)+100;

大底:=(A<15 AND REF(A,1)<15 AND D1<18 AND B>REF(B,1) AND CROSS(B,A) AND B>D1

AND (REF(B,1)<5 OR REF(B,2)<5 )  AND (D1>=A OR REF( B,1)<1 ));

STICKLINE( 大底,0,10,11,0 ),COLORRED;

DRAWTEXT(大底,11,'大底')COLORFF00FF;
VARFN:=LOW*0.9;  
VAR11N:=EMA(VARFN,30);
VAR12N:=CLOSE-REF(CLOSE,1);
VAR13N:=MAX(VAR12N,0);  
VAR14N:=ABS(VAR12N);  
VAR15N:=SMA(VAR13N,7,1)/SMA(VAR14N,7,1)*100;  
VAR16N:=SMA(VAR13N,13,1)/SMA(VAR14N,13,1)*100;
VAR17N:=BARSCOUNT(CLOSE);  
VAR18N:=SMA(MAX(VAR12N,0),6,1)/SMA(ABS(VAR12N),6,1)*100;  
VAR19N:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;  
VAR1AN:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;  
VAR1BN:=SMA((SMA(VAR1AN,4,1)-50)*2,3,1);  
VAR1CN:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;  
VAR1DN:=SMA(VAR1CN,4,1);  
VAR1EN:=SMA(VAR1DN,3,1);  
VAR1FN:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;  
VAR20N:=VAR18N<=25 AND VAR19N<-95 AND VAR1FN>20 AND VAR1BN<-30 AND VAR1EN<30
AND VAR11N-CLOSE>=-0.25 AND VAR15N<22 AND VAR16N<28 AND VAR17N>50;
STICKLINE(VAR20N,0,70,1,0),COLORBLUE,LINETHICK3 ;
DRAWTEXT(VAR20N,80,'★青龙出海!'),COLORBLUE;
HP:=HHV(H,9);
LP:=LLV(L,9);
R:=(C-LP)/(HP-LP)*100;

M:=MA(R,40);
S:=STD(R,40);
高:=M+2*S;
中:=M;
低:=M-2*S;
【高】: 高,COLOR0099FF;
【中】: 中,POINTDOT,COLORWHITE;
【低】: 低,COLOR00FF00;