通达信MACD彩色量柱副图指标 源码

附图

ZERO : 0;
 DIFF : EMA(CLOSE,6) - EMA(CLOSE,13);
 DEA : EMA(DIFF,4);
 MACD : 2*(DIFF-DEA);
主力线:EMA(DIFF-MA(REF(DIFF,1),1),1)*1.862,COLORWHITE,LINETHICK1;
 STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,5,0),COLOR0000FF;
 STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,5,0),COLORFFFF00;
 STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,5,0),COLORFF00FF;
 STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,5,0),COLOR00FF00;
 DIF:=EMA(CLOSE,6)-EMA(CLOSE,13);
 MTM:=C-REF(C,1);
 DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
 YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
蓝:IF(FILTER(YXF=1,5),20,0),COLORLIBLUE,LINETHICK3;
红: IF(FILTER(YXF=1,5),10,0),COLORRED,LINETHICK2;
黄: IF(FILTER(YXF=1,5),5,0),COLORYELLOW,LINETHICK1;
 A:=(3*C+L+O+H)/6;
 X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
 14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
 +7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
 REF(A,20))/210;
 S2:=SMA(C,3,1);
 S6:=SMA(C,5,1);
 DK:=2*(S2-S6);
主力成本:EMA(X,13),COLORFF00FF,LINETHICK0;