【通达信】通达信版多周期MACD（源码 副图 贴图 说明）

DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORFF00FF,NODRAW;
DEA:EMA(DIF,9),COLOR1AFFFF,NODRAW;
MACD:(DIF-DEA)*2,COLOR0000F2,NODRAW;
STICKLINE("MACD.MACD#WEEK">=0,0,"MACD.MACD#WEEK",4,0),COLOR000055;
STICKLINE("MACD.MACD#WEEK"<0,0,"MACD.MACD#WEEK",4,0),COLOR515100;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLOR0000F2;
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,1,1),COLOR0000F2;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,1,0),COLOR008000;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,1,1),COLOR008000;
ES:=REF(EMA(C,26),1);
EP:=REF(EMA(C,12),1);
DI:=REF(DIF,1);
DIF穿零价:((12+1)*(26-1)*ES-(26+1)*(12-1)*EP)/(2*(26+1)-2*(12+1)),NODRAW,COLORWHITE;
DIF拐点价:((12-1)*EP/(12+1)-(26-1)*ES/(26+1)-DI)*(26+1)*(12+1)/(2*(12+1)-2*(26+1)),COLORYELLOW,NODRAW;
IF(1,DIF,DRAWNULL),COLORCYAN;
IF(DIF>=REF(DIF,1),DIF,DRAWNULL),COLORFF00FF;
IF(1,DEA,DRAWNULL),COLOR1AFFFF;