通达信复合周期MACD选股指标公式源码

通达信复合周期MACD选股指标公式源码

源码正文：

DRAWGBK(1>0, RGB(50,100,80),RGB(100,50,100),0,'',0){XG51};
difW:"macd.DIF#WEEK",COLORBLUE{XG51};
DEAW:"maCD.DEA#WEEK",COLORRED{XG51};
DIFM:="MacD.DIF#MONTH",COLORLIMAGENTA{XG51};
DEAM:="MACD.DEA#MONTH",COLORCYAN{XG51};
DRAWBAND(DIFW,RGB(200,200,0),DEAW,RGB(0,0,200)){XG51};
MACD:("MACD.DIF#WEEK"-"MACD.DEA#WEEK")*2,COLORstICK{XG51};
M周叉:=IF(crOSS(DIFW,DEAW),1,0),COLORWHITE,NODRAW{XG51};
M月叉:=IF(CROSS(DIFM,DEAM),1,0),COLORGREEN,NODRAW{XG51};
DRAWTEXT(M周叉=1,DIFW,'MACD周'),COLOR8000FF{XG51};
DRAWTEXT(M月叉=1,DEAW,'MACD月'),COLORGREEN{XG51};
AA:="kdJ.K#WEEK"{XG51};
BB:="KDJ.D#WEEK"{XG51};
AAA:="KDJ.K#MONTH"{XG51};
BBB:="KDJ.D#MONTH"{XG51};
K周叉:=IF(CROSS(AA,BB),1,0),COLORWHITE{XG51};
K月叉:=IF(CROSS(AAA,BBB),1,0),LINETHICK2,COLORGREEN{XG51};
MK周共振:IF(M周叉=1 AND K周叉=1,0,DEAW),COLORLIRED{XG51};
DRAWTEXT(MK周共振=0,0,'MK周共振'),COLORBLUE{XG51};
MK月共振:IF(M月叉=1 AND K月叉=1,1,0),NODRAW{XG51};
DRAWTEXT(MK月共振=1,MACD,'MK月共振'),COLORBLUE{XG51};
M周月共振:IF((EXIST(M月叉=1,21) AND M周叉=1) OR (EXIST(M周叉=1,21) AND M月叉=1),0,DIFW),COLORBLUE{XG51};
DRAWTEXT((EXIST(M月叉=1,21) AND M周叉=1) OR (EXIST(M周叉=1,21) AND M月叉=1),0,'M周月共振'),COLORRED{X!G~5.1!C!N!{};