通达信2指标——MACD日周月（副图）

{MACD日周月金叉死叉背离}
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:(DIFF-DEA)*2,COLORSTICK;
CDA:=MACD< REF(MACD,1) AND MACD> 0;
CDB:=MACD>= REF(MACD,1) AND MACD> 0;
CDC:=MACD> REF(MACD,1) AND MACD< 0;
CDD:=MACD<= REF(MACD,1) AND MACD< 0;
STICKLINE(CDB,0,MACD,1,0),COLOREE00EE;
STICKLINE(CDA,0,MACD,1,0),COLOR00DDDD;
STICKLINE(CDC,0,MACD,1,0),COLORAA11BB;
STICKLINE(CDD,0,MACD,1,0),COLORBLUE;
XX:=EMA(MA(LOW,3)*0.96,30);
DIFF金叉:=IF(CROSS(DIFF,DEA) AND XX-REF(XX,1)> 0 AND MACD>= REF(MACD,1) AND DIFF<= 0,1,0);
DRAWTEXT(DIFF金叉= 1,DIFF*1.5,'DIFF金叉'),COLORCDFFBB;
周DIFF:='MACD.DIF#WEEK';
周DEA:='MACD.DEA#WEEK';
周MACD:='MACD.MACD#WEEK';
周DIF金叉:=CROSS(周DIFF,周DEA);
MACD周金叉:=CROSS(周MACD,周DIFF) AND 周MACD>= (0-0.05) AND 周MACD<= 0.02;
DRAWTEXT(MACD周金叉,周MACD*0.98,'MACD周金叉'),COLOR00FFFF;
MACD金叉:=CROSS(MACD,DIFF) AND MACD>= (0-0.05) AND MACD<= 0.02;
DRAWTEXT(MACD金叉,MACD