通达信变色MACD源码附图

DIFIF1:=EMA(CLOSE,12) - EMA(CLOSE,26);
 DEAEA1:=EMA(DIFIF1,9);
 MACD1:=2*(DIFIF1-DEAEA1),STICK;
 MACD2:=EMA(MACD1,3);
 STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORRED;
 STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1,0),COLORGREEN;
 STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORCBCBC0;
 STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;
 DIFIF1,COLOR33FF33,LINETHICK2;
 DEAEA1,COLORYELLOW,LINETHICK2;
 MACD:MACD1,NODRAW,COLORMAGENTA;
强:IF(DIFIF1>=DEAEA1,DIFIF1,DRAWNULL),COLORRED,LINETHICK2; 
弱:IF(DEAEA1>=DIFIF1,DEAEA1,DRAWNULL),COLORFF9900,LINETHICK2;
 DRAWICON(CROSS(DIFIF1,DEAEA1),DIFIF1+0.1,1);
 DRAWICON(CROSS(DEAEA1,DIFIF1),-0.5,2);
 DRAWTEXT(CROSS(DIFIF1,DEAEA1),DIFIF1,'○'),LINETHICK2, COLORYELLOW;
                                   （2）  DIFIF1:=EMA(CLOSE,12) - EMA(CLOSE,26);
 DEAEA1:=EMA(DIFIF1,9);
 MACD1:=2*(DIFIF1-DEAEA1),STICK;
 MACD2:=EMA(MACD1,3);
 STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORRED;
 STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1,0),COLORGREEN;
 STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORCBCBC0;
 STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;
 DIFIF1,COLOR33FF33,LINETHICK2;
 DEAEA1,COLORYELLOW,LINETHICK2;
 MACD:MACD1,NODRAW,COLORMAGENTA;
强:IF(DIFIF1>=DEAEA1,DIFIF1,DRAWNULL),COLORRED,LINETHICK2; 
弱:IF(DEAEA1>=DIFIF1,DEAEA1,DRAWNULL),COLORFF9900,LINETHICK2;
 DRAWICON(CROSS(DIFIF1,DEAEA1),DIFIF1+0.1,1);
 DRAWICON(CROSS(DEAEA1,DIFIF1),-0.5,2);
 DRAWTEXT(CROSS(DIFIF1,DEAEA1),DIFIF1,'○'),LINETHICK2, COLORYELLOW;