通达信实战型MACD未加密选股指标公式源码

通达信实战型MACD未加密选股指标公式源码

源码正文：

SHORT:=12{XG51};
LONG:=26{XG51};
MID:=9{XG51};
difF:ema(C,SHORT)-Ema(C,LONG){XG51};
DEA:EMA(DIFF,MID){XG51};
macd:(DIFF-DEA)*2,COLORFFFF00,COLORstICK{XG51};
A1:=BArslAST(REF(crOSS(0, DEA),1)){XG51};
A2:= BARSLAST(REF(COUNT(DEA<=0,A1+1)=A1+1 AND LLV(DIFF,5)=LLV(DIFF,A1+1) AND CROSS(DIFF,DEA),1)){XG51};
A3:= BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
DIBL1:=LLV(C,A3+1)=LLV(C,A1+1) AND NOT(LLV(DIFF,A3+1)=LLV(DIFF,A1+1)) AND COUNT(DEA<=0,A2+1)=A2+1 AND CROSS(DIFF,DEA){XG51};
金叉:IF(CROSS(DIFF,DEA) AND DEA<=0 AND DIBL1=0,0,DEA),COLORBLUE{XG51};
底背离:IF(DIBL1,0,DEA),COLORWHITE{XG51};
B1:=BARSLAST(REF(CROSS(DEA,0),1)){XG51};
B2:=BARSLAST(REF(COUNT(DEA>=0,B1+1)=B1+1 AND HHV(DIFF,5)=HHV(DIFF,A1+1) AND CROSS(DEA,DIFF),1)){XG51};
B3:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
DINGBL1:= HHV(C,B3+1)=HHV(C,B1+1) AND NOT(HHV(DIFF,B3+1)=HHV(DIFF,B1+1)) AND COUNT(DEA>=0,B2+1)=B2+1 AND CROSS(DEA,DIFF);
死叉:IF(CROSS(DEA,DIFF) AND DEA>=0 AND DINGBL1=0,0,DEA),COLORFFFF00{XG51};
顶背离:IF(DINGBL1,0,DEA),COLORCYAN;
DIBJG:=LLV(C,A3+1)=LLV(C,A1+1) AND NOT(LLV(DIFF,A3+1)=LLV(DIFF,A1+1)) AND DIFF>REF(DIFF,1) AND COUNT(DEA<=0,A2+1)=A2+1 AND DIFF<DEA {XG51};
DINGBJG:=HHV(C,B3+1)=HHV(C,B1+1) AND NOT(HHV(DIFF,B3+1)=HHV(DIFF,B1+1)) AND REF(DIFF,1)>DIFF AND COUNT(DEA>=0,B2+1)=B2+1 AND DIFF>DEA {XG51};
STICKLINE(DIBJG =1 ,DEA,DIFF,2,0),COLORWHITE{XG51};
STICKLINE(DINGBJG =1 ,DEA,DIFF,2,0),COLORCYAN{XG51};
MB:=EMA(DIFF,20){XG51};
UB:=MB+1.9104*STD(DIFF,20){XG51};
LB:=MB-1.9104*STD(DIFF,20){XG51};
ZJS:=HHV(DEA,B1+1)/2{XG51};
ZJX:=LLV(DEA,A1+1)/2{XG51};
STICKLINE(DEA>DIFF AND DEA>0 AND DEA>ZJS, ZJS,REF(ZJS,1),1,0), COLORWHITE{XG51};
STICKLINE(DEA<DIFF AND DEA<0 AND DEA<ZJX,ZJX, REF(ZJX,1),1,0),COLORCYAN{X=G+5_1=C=N={};

通达信KDJ全景未加密选股指标公式源码

源码正文：

N:=3{XG51};
NOTEXT来:50,COLOR008080,DOTLINE{XG51};
月K:ma("kdj.K#MONTH"(9,3,3),20),COLORCYAN,NODRAW{XG51};
月D:MA("kdJ.D#MONTH"(9,3,3),20),COLORWHITE,NODRAW{XG51};
DRAWBAND(月K,RGB(165,87,16),月D,RGB(120,120,120)){XG51};
周K:MA("KDJ.K#WEEK"(9,3,3) ,5),COLORLIMAGENTA,LINETHICK1{XG51};
周D:MA("KDJ.D#WEEK"(9,3,3) ,5),COLORGREEN,LINETHICK1{XG51};
周J:MA("KDJ.J#WEEK"(9,3,3) ,5),COLORRED{XG51};
周KD差:=周K-周D{XG51};
stICKLINE(周K>=REF(周K,WEEKDAY),8,10,2,0),COLOR0000FF{XG51};
STICKLINE(周K<REF(周K,WEEKDAY),8,10,2,0),COLORFFFF00{XG51};
STICKLINE(周KD差>=REF(周KD差,WEEKDAY),4,6,2,0),COLOR0000FF{XG51};
STICKLINE(周KD差<REF(周KD差,WEEKDAY),4,6,2,0),COLORFFFF00{XG51};
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100{XG51};
日K:SMA(RSV,6,1),NODRAW{XG51};
日D:SMA(日K,3,1),NODRAW{XG51};
DRAWBAND(日K,RGB(240,20,10),日D,RGB(0,150,70)){XG51};
日J:=3*日K-2*日D{XG51};
ZJ:=MA("KDJ.J#WEEK"(9,3,3) ,1){XG51};
{XG51};
DRAWTEXT((crOSS(周K,周D)AND(周K>周D)),60,'周'),COLORBLUE{XG51};
IF(周J>=REF(周J,1),周J,DRAWNULL),COLOR0080FF,LINETHICK3{X.G=5*1.C.N.{};