通达信MACD日周月彩带副图指标源码

MACD日周月彩带副图指标 源码 通达信 附图

XA_1:=(HIGH+LOW+CLOSE)/3;
 DIFF:EMA(XA_1,25)-EMA(XA_1,99),LINETHICK0;
 DEA:EMA(DIFF,17),LINETHICK0;
 MACD:2*(DIFF-DEA),LINETHICK0;
 XA_2:=DIFF;
 XA_3:=DEA;
 DRAWBAND(XA_2,RGB(220,100,0),XA_3,RGB(0,290,255));
 IF(XA_2>=REF(XA_2,1),XA_2,DRAWNULL),COLOR2B4AEC,LINETHICK0;
 IF(XA_2  IF(XA_3>=REF(XA_3,1),XA_3,DRAWNULL),COLORRED,LINETHICK0;
 IF(XA_3  STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLOR4D00D6;
 STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,1.5,0),COLOR4A00A4;
 STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLOR0000EE;
 STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0.1,0),COLOR4A008E;
 STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLOR5200FF;
 STICKLINE(MACD>=0 AND MACD  STICKLINE(MACD>=0 AND MACD  STICKLINE(MACD>=0 AND MACD  STICKLINE(MACD>=0 AND MACD  STICKLINE(MACD>=0 AND MACD  STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLOR520E4F;
 STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,1.5,0),COLOR520E59;
 STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLOR520E67;
 STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0.1,0),COLOR520E89;
 STICKLINE(MACD<0 AND MACD  STICKLINE(MACD<0 AND MACD  STICKLINE(MACD<0 AND MACD  STICKLINE(MACD<0 AND MACD  STICKLINE(MACD<0 AND MACD  XA_4:=EMA(AMOUNT/(100*VOL),5);
 XA_5:=EMA(AMOUNT/(100*VOL),13);
 XA_6:=EMA(AMOUNT/(100*VOL),34);
 XA_7:=DMA(CLOSE,VOL/CAPITAL);
 XA_8:=(CLOSE-XA_5)/XA_5*100;
 DIF:EMA(XA_1,7)-EMA(XA_1,25);
 DE:EMA(DIF,9);
 MACDS:2*(DIF-DE),LINETHICK0;
 IF(XA_8>0 AND XA_8>REF(XA_8,1),DIF,DRAWNULL),COLORRED,LINETHICK2;
 IF(CROSS(CLOSE,XA_6),DIF,DRAWNULL),COLORWHITE,LINETHICK2;
 IF(CROSS(CLOSE,XA_7),DIF,DRAWNULL),COLORYELLOW,LINETHICK2;
 IF(DIF>DE,DIF,DRAWNULL),COLORFFCC33,LINETHICK2;
 IF(DIF  IF(DIF>DE,DE,DRAWNULL),COLORGREEN,LINETHICK2;
 IF(DIF