通达信优化版KDJ未加密选股指标公式源码

通达信优化版KDJ未加密选股指标公式源码

源码正文：

N:=9; P1:=3; P2:=3{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
K:SMA(RSV,P1,1){XG51};
D:Sma(K,P2,1){XG51};
J:3*K-2*D{XG51};
IF(J>REF(J,1),J,DRAWNULL),COLORWHITE,LINETHICK3;
周K:="kdJ.K#WEEK"(9,3,3){XG51};
周D:="KDJ.D#WEEK"(9,3,3){XG51};
周J:="KDJ.J#WEEK"(9,3,3){XG51};
月K:="KDJ.K#MONTH"(9,3,3){XG51};
月D:="KDJ.D#MONTH"(9,3,3){XG51};
月J:="KDJ.J#MONTH"(9,3,3){XG51};
月金叉:=crOSS(月K,月D){XG51};
周金叉:=CROSS(周K,周D){XG51};
日金叉:=FILTER(CROSS(K,D) AND K<20,4){XG51};
DRAWTEXT(月金叉,月D-2,'★'),COLOR0022EE{XG51};
DRAWTEXT(月金叉,月D-2,'KD月金叉'),COLORBLUE{XG51};
DRAWTEXT(周金叉,周D,'★'),COLOR0022EE{XG51};
DRAWTEXT(周金叉,周D,' KD周金叉'),COLORCYAN{XG51};
DRAWICON(日金叉,K,1){XG51};
DRAWTEXT(日金叉,D-6,'低位金叉'),COLOR00CCCC{XG51};
DRAWTEXT(CROSS(周D,周K),周D*1.2,'KD周死叉'),COLOR00DDBB{XG51};
DRAWTEXT(CROSS(月D,月K),月D,'KD月死叉'),COLORFFFFFF{XG51};
KDB:=BArslAst(REF(CROSS(K,D),1)){XG51};
KDDB:=REF(CLOSE,KDB+1)>CLOSE AND REF(K,KDB+1)<K AND CROSS(K,D){XG51};
K底背:=IF(FILTER(KDDB>0,5),1,0){XG51};
DRAWTEXT(K底背=1,D*0.98,'底背离'),COLORDDDDDD{XG51};
KDD:=BARSLAST(REF(CROSS(D,K),1)){XG51};
K顶背:=REF(CLOSE,KDD+1)<CLOSE AND REF(K,KDD+1)>K AND CROSS(D,K){XG51};
DRAWTEXT(FILTER(K顶背>0,5),D+8,'顶背离'),COLORFFAA22{XG51};
DRAWICON(CROSS(J,1),J,1){XG51};
DRAWICON(K>80 AND D>80 AND CROSS(D,K),D,2){XG51};
IF(J<0,J,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(J>90,J,DRAWNULL),COLORRED,LINETHICK2.5{XG51};
IF(K>90,K,DRAWNULL),COLOR0000FF,LINETHICK2{XG51};
IF(D>85,D,DRAWNULL),COLORFFFF11,LINETHICK2{X_G*5_1_C_N_{};

通达信工作主图未加密选股指标公式源码

源码正文：

VAR1:=(ema(C,12)-Ema(C,26))*100+50;
VAR2:=EMA(VAR1,9);
VAR3:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10;
VAR4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
stICKLINE(C>REF(C,1),H,L,0,0),COLOR0000FF;
STICKLINE(C>REF(C,1),O,C,3.1,1),COLOR000066;
STICKLINE(C>REF(C,1),O,C,2.6,1),COLOR000099;
STICKLINE(C>REF(C,1),O,C,2,1),COLOR0000CC;
STICKLINE(C>REF(C,1),O,C,1.2,1),COLOR0000FF;
STICKLINE(C>REF(C,1),O,C,0.4,1),COLORCC66FF;
STICKLINE(C<REF(C,1),H,L,0,0),COLORFF0000;
STICKLINE(C<REF(C,1),O,C,3.1,1),COLORCC0000;
STICKLINE(C<REF(C,1),O,C,2.6,1),COLORFF4400;
STICKLINE(C<REF(C,1),O,C,2,1),COLORFF8800;
STICKLINE(C<REF(C,1),O,C,1.2,1),COLORFFCC00;
STICKLINE(C<REF(C,1),O,C,0.4,1),COLORFFFF00;
STICKLINE(C=REF(C,1),H,L,0,0),COLORFFFFFF;
STICKLINE(C=REF(C,1),O,C,3.1,1),COLOR777777;
STICKLINE(C=REF(C,1),O,C,2.6,1),COLOR999999;
STICKLINE(C=REF(C,1),O,C,2,1),COLORBBBBBB;
STICKLINE(C=REF(C,1),O,C,1.2,1),COLORDDDDDD;
STICKLINE(C=REF(C,1),O,C,0.4,1),COLORFFFFFF;
A0:=(L+H+C*2)/4;
工作:EMA(A0,14)COLORBLUE,LINETHICK1;
度假:EMA(A0,25)COLORCYAN,LINETHICK2;
A1X:=(工作-REF(工作,1))/REF(工作,1)*100;
A2X:=(度假-REF(度假,1))/REF(度假,1)*100;
G:=BArslAST(crOSS(A1X,0));
买入止损:REF(A0,G),COLORRED,LINETHICK1;
A2:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);
A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;
A5:=EMA(CLOSE,12)-EMA(CLOSE,26);
A6:=EMA(A5,9);
A7:=(A5<-0.1 AND A5>A6);
财神:IF(A7,LLV(L,21),DRAWNULL)COLORWHITE,CIRCLEDOT;
DRAWICON(CROSS(A2,EMA(A2,5)) AND (A4-EMA(A2,5))>40 AND A7,LLV(L,21)*1.02,1);
STICKLINE(C>REF(C,1)*1.09,C,O,3.1,0)COLOR000055;
STICKLINE(C>REF(C,1)*1.09,C,O,2.6,0)COLOR000077;
STICKLINE(C>REF(C,1)*1.09,C,O,2.1,0)COLOR000099;
STICKLINE(C>REF(C,1)*1.09,C,O,1.5,0)COLOR0000BB;
STICKLINE(C>REF(C,1)*1.09,C,O,0.9,0)COLOR0000DD;
STICKLINE(C>REF(C,1)*1.09,C,O,0.3,0)COLOR0000FF;
STICKLINE(C<REF(C,1)*0.901,C,O,3.1,0)COLOR005500;
STICKLINE(C<REF(C,1)*0.901,C,O,2.6,0)COLOR007700;
STICKLINE(C<REF(C,1)*0.901,C,O,2.1,0)COLOR009900;
STICKLINE(C<REF(C,1)*0.901,C,O,1.5,0)COLOR00BB00;
STICKLINE(C<REF(C,1)*0.901,C,O,0.9,0)COLOR00DD00;
STICKLINE(C<REF(C,1)*0.901,C,O,0.3,0)COLOR00FF00;
减:IF(A2X>=0,度假,DRAWNULL),COLORLIMAGENTA,LINETHICK2;
少:IF(A1X>=0,工作,DRAWNULL),COLORWHITE,LINETHICK2;
操:IF(A1X>=0,买入止损,DRAWNULL),LINETHICK2,COLORWHITE;
作:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.1,REF(A0,BARSLAST(CROSS(A1X,0)))*1.1,DRAWNULL),COLORCYAN,POINTDOT{XG51};
顺:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.2,REF(A0,BARSLAST(CROSS(A1X,0)))*1.2,DRAWNULL),COLORCYAN,POINTDOT{XG51};
应:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.3,REF(A0,BARSLAST(CROSS(A1X,0)))*1.3,DRAWNULL),COLORCYAN,CIRCLEDOT{XG51};
趋:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.4,REF(A0,BARSLAST(CROSS(A1X,0)))*1.4,DRAWNULL),COLORCYAN,POINTDOT{XG51};
势:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.5,REF(A0,BARSLAST(CROSS(A1X,0)))*1.5,DRAWNULL),COLORCYAN,POINTDOT{XG51};
破:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.6,REF(A0,BARSLAST(CROSS(A1X,0)))*1.6,DRAWNULL),COLORCYAN,POINTDOT{XG51};
位:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.7,REF(A0,BARSLAST(CROSS(A1X,0)))*1.7,DRAWNULL),COLORCYAN,POINTDOT{XG51};
出:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.8,REF(A0,BARSLAST(CROSS(A1X,0)))*1.8,DRAWNULL),COLORCYAN,POINTDOT{XG51};
C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,1.5,0),COLORWHITE;
STICKLINE(涨停,H,L,0,0),COLORWHITE;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,1.5,0),COLORCYAN;
STICKLINE(跌停,H,L,0,1),COLORCYAN{X~G-5!1~C~N~{};