以下是通达信MACD叠加K线操盘主图源码(无源码的请下载附件导入)
ZA1:=EMA(C,25);
ZA2:=EMA(ZA1,45);
ZB1:=EMA(C,65);
ZB2:EMA(ZB1,45),COLORYELLOW,LINETHICK2;
DIFF:=(ZA1+ZB2)/2;
DEA:=(ZA2+ZB1)/2;
IF(DIFF>=DEA,DIFF,DRAWNULL),LINETHICK2,COLORRED;
IF(DIFF<DEA,DIFF,DRAWNULL),LINETHICK1,COLORBLUE;
KA0:=(HHV(C,45)-LLV(C,45))/45;
KA1:=SMA(C,3,1);
KA2:=SMA(C-KA0*3,3,1);
KA3:=SMA(KA1-KA0*3,3,1);
IF(KA2>=KA3,KA2,DRAWNULL )COLORMAGENTA,LINETHICK2;
IF(KA2<KA3,KA2,DRAWNULL ),LINETHICK1,COLORGREEN;
642222703.jpg
|