通达信新二指金叉选股指标公式源码

通达信新二指金叉选股指标公式源码

源码正文：

dif:(ema(CLOSE,12)-Ema(CLOSE,26))*100,COLOR0000FF,LINETHICK2{XG51};
DEA:EMA(DIF,9),COLORFFFFFF,LINETHICK2{XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:SMA(RSV,3,1),COLORBLUE{XG51};
D:SMA(K,3,1),COLORFFFF00{XG51};
J:3*K-2*D,COLORLIMAGENTA{XG51};
DIFW:="MacD.DIF#WEEK"{XG51};
DEAW:="MACD.DEA#WEEK"{XG51};
FCA:=FILTER(crOSS(DIFW,DEAW),0){XG51};
SCA:=FILTER(CROSS(DEAW,DIFW),0){XG51};
M周金叉:IF(CROSS("MACD.DIF#WEEK","MACD.DEA#WEEK"),-50,0),COLOR0000FF,LINETHICK2{XG51};
DRAWTEXT(FCA,-45,' MACD周金叉'),COLOR0000FF{XG51};
M周死叉:IF(CROSS("MACD.DEA#WEEK","MACD.DIF#WEEK"),-50,0),COLOR00FF00,LINETHICK2{XG51};
DRAWTEXT(SCA,-45,' MACD周死叉'),COLOR00FF00{XG51};
DIFM:="MACD.DIF#MONTH"{XG51};
DEAM:="MACD.DEA#MONTH"{XG51};
FCB:=FILTER(CROSS(DIFM,DEAM),0){XG51};
SCB:=FILTER(CROSS(DEAM,DIFM),0){XG51};
M月金叉:IF(CROSS("MACD.DIF#MONTH","MACD.DEA#MONTH"),-60,0),COLOR00FFFF,LINETHICK2{XG51};
DRAWTEXT(FCB,-55,' MACD月金叉'),COLOR00FFFF{XG51};
M月死叉:IF(CROSS("MACD.DEA#MONTH","MACD.DIF#MONTH"),-60,0),COLORFF6600,LINETHICK2{XG51};
DRAWTEXT(SCB,-55,' MACD月死叉'),COLORFF6600{XG51};
KKW:="kd.K#WEEK",COLORWHITE{XG51};
KDW:="KD.D#WEEK",COLORBLUE{XG51};
KCD:=FILTER(CROSS(KKW,KDW),0){XG51};
SCD:=FILTER(CROSS(KDW,KKW),0){XG51};
K周金叉:IF(CROSS("kdj.K#WEEK","KDJ.D#WEEK"),50,0),COLOR0000FF,LINETHICK2{XG51};
DRAWTEXT(KCD,50,' KDJ周金叉'),COLOR0000FF{XG51};
K周死叉:IF(CROSS("KDJ.D#WEEK","KDJ.K#WEEK"),50,0),COLOR00FF00,LINETHICK2{XG51};
DRAWTEXT(SCD,50,' KDJ周死叉'),COLOR00FF00{XG51};
KKM:="KDJ.K#MONTH",COLORWHITE{XG51};
KDM:="KDJ.D#MONTH",COLORBLUE{XG51};
KDB:=FILTER(CROSS(KKM,KDM),0){XG51};
SDB:=FILTER(CROSS(KDM,KKM),0){XG51};
K月金叉:IF(CROSS("KDJ.K#MONTH","KDJ.D#MONTH"),60,0),COLOR00FFFF,LINETHICK2{XG51};
DRAWTEXT(KDB,60,' KDJ月金叉'),COLOR00FFFF{XG51};
K月死叉:IF(CROSS("KDJ.D#MONTH","KDJ.K#MONTH"),60,0),COLORFF6600,LINETHICK2{XG51};
DRAWTEXT(SDB,60,' KDJ月死叉'),COLORFF6600{X~G_5=1~C~N~{};