通达信双重MACD指标(源码)

xdif:((M6-M121)/2+(M12-M56+M26-M121)/2+M6-M26)/3,COLORWHITE;
XDEA:ema(XDIF,3),COLORCYAN;
XMACD:=2*(xdif-XDEA),LINETHICK,COLORWHITE;
DIF:(M56-M121+(M26-M121)/2+(M12-M121)/3+(M6-M121)/4)/4,COLORMAGENTA;
DEA:ema(DIF,9),COLORGREEN;
MACD:2*(DIF-DEA),LINETHICK,COLOR00CCCC;
BMACD:(MACD+XMACD/2)/2,LINETHICK,COLORRED;
STICKLINE(BMACD =0,0,BMACD,2,1),COLORRED;
STICKLINE(BMACD 0,0,BMACD,2,1),COLOR00bb00;
STICKLINE(MACD =0,0,MACD,0,0),COLOR00CCCC;
STICKLINE(MACD 0,0,MACD,0,0),COLORCYAN;
JGL:=(((xdif-XDEA)/ABS(XDEA)+(XDEA-DIF)/ABS(DIF)+(DIF-DEA)/ABS(DEA))/3)*10;
DRAWTEXT(CROSS(JGL,0)AND xdif REF(xdif,1),DEA*0.9, ★ ),COLORYELLOW;