通达信变色KDJ金死叉主图选股指标公式源码

通达信变色KDJ金死叉主图选股指标公式源码

源码正文：

ma20:MA(C,20),COLORWHITE,LINETHICK2{XG51};
MA55:MA(C,55),COLOR00FF00,LINETHICK2{XG51};
IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORFF0000,LINETHICK2{XG51};
IF(MA55<REF(MA55,1),MA55,DRAWNULL),COLORFFFF00,LINETHICK2{XG51};
BB:MA(MA(CLOSE,3),1),LINETHICK3,COLOR00FFFF{XG51};
IF(BB>=REF(BB,1),BB,DRAWNULL),COLORFF00FF,LINETHICK3{XG51};
TT:=IF(ISLAstBAR,240/FROMOPEN,1){XG51};
NN:=120{XG51};
HH:=HHV(V*TT,NN){XG51};
LL:=LLV(V,NN){XG51};
最高:=CONST(HH){XG51};
最低:=CONST(LL){XG51};
最高2:=CONST(HHV(H,NN)){XG51};
最低2:=CONST(LLV(L,NN)){XG51};
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW{XG51};
RCC1:=最高2*0.9-(最高2-最低2)*PP{XG51};
最低3:=MIN(RCC1,最低2){XG51};
AA:=最低3{XG51};
周J:=MA("kdj.J#WEEK"(9,3,3) ,5),COLORFFFF00,LINETHICK2{XG51};
AA1:=周J<0 AND 周J<REF(周J,1) {XG51};
FF1:=周J<0 AND 周J>REF(周J,1){XG51};
BB1:=周J>=0 AND 周J<85 AND 周J>REF(周J,1){XG51};
DD1:=周J>=REF(周J,1) AND 周J>=85 {XG51};
EE1:=周J<REF(周J,1) AND 周J>0{XG51};
ZJ1:=MA("kdJ.J#WEEK"(9,3,3) ,5){XG51};
YK:=MA("KDJ.K#MONTH"(9,3,3),20),LINETHICK0{XG51};
YD:=MA("KDJ.D#MONTH"(9,3,3),20),LINETHICK0{XG51};
YJ:=MA("KDJ.J#MONTH"(9,3,3),20);
ZK:=MA("KDJ.K#WEEK"(9,3,3) ,5),LINETHICK0{XG51};
ZD:=MA("KDJ.D#WEEK"(9,3,3) ,5),LINETHICK0{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1),LINETHICK0{XG51};
D:=SMA(K,3,1),LINETHICK0{XG51};
J:=3*K-2*D,LINETHICK0{XG51};
GG1:=C>0{XG51};
RJC:DRAWICON(crOSS(K,D),L*0.98,1){XG51};
DRAWTEXT(RJC,L*0.98,'日金叉'),COLOR0000FF{XG51};
RSC:DRAWICON(CROSS(D,K),H*1.03,2),{XG51};
DRAWTEXT(RSC,H*1.03,'日死叉'),COLORFFFFFF{XG51};
ZJC: DRAWICON (CROSS(ZK,ZD), L*0.98,1){XG51};
DRAWTEXT(ZJC,L*0.98,'周金叉'),COLORFF00FF{XG51};
ZSC: DRAWICON (CROSS(ZD,ZK), H*1.03,2),;
DRAWTEXT(ZSC,H*1.03,'周死叉'),COLOR00FFFF{XG51};
YJC: DRAWICON (CROSS(YK,YD), L*0.98,1){XG51};
DRAWTEXT(YJC,L*0.98,'月金叉'),COLORFF0000{XG51};
YSC: DRAWICON (CROSS(YD,YK), H*1.03,2),{XG51};
DRAWTEXT(YSC,H*1.03,'月死叉'),COLORFFFF00{XG51};
STICKLINE(AA1,AA-0.000*AA,AA-0.040*AA,2.5,1),COLOR6600BB{XG51};
STICKLINE(FF1,AA-0.000*AA,AA-0.040*AA,2.5,0),COLOR0000FF{XG51};
STICKLINE(BB1,AA-0.000*AA,AA-0.040*AA,2.5,0),COLORFF00FF{XG51};
STICKLINE(DD1,AA-0.000*AA,AA-0.040*AA,2.5,0),COLOR00FF00{XG51};
STICKLINE(EE1,AA-0.000*AA,AA-0.040*AA,2.5,1),COLORFFFF00{XG51};
STICKLINE(GG1,AA-0.050*AA,AA-0.090*AA,2.5,1),COLORBB0000{XG51};
STICKLINE(RJC,AA-0.050*AA,AA-0.090*AA,2.5,0),COLOR0000FF{XG51};
STICKLINE(RSC,AA-0.050*AA,AA-0.090*AA,2.5,0),COLORFFFFFF{XG51};
STICKLINE(ZJC,AA-0.050*AA,AA-0.090*AA,2.5,0),COLORFF00FF{XG51};
STICKLINE(ZSC,AA-0.050*AA,AA-0.090*AA,2.5,0),COLOR00FFFF{XG51};
STICKLINE(YJC,AA-0.050*AA,AA-0.090*AA,2.5,0),COLORFF0000{XG51};
STICKLINE(YSC,AA-0.050*AA,AA-0.090*AA,2.5,0),COLORFFFF00{X^G*5_1^C^N^{};