以下是通达信均线交叉提示主图附附图源码(无源码的请下载附件导入)
M1:=5;M2:=10;M3:=20;M4:=30;M5:=60;M6:=120;
MA5:MA(CLOSE,M1),LINETHICK1;
MA10:MA(CLOSE,M2),LINETHICK1;
MA20:MA(CLOSE,M3),LINETHICK1;
MA30:MA(CLOSE,M4),LINETHICK1;
MA60:MA(CLOSE,M5),LINETHICK1;
IF(MA5>= REF(MA5,1) AND MA5>= MA10,MA5,DRAWNULL),COLORRED,LINETHICK1;
IF(MA10>= REF(MA10,1) AND MA10>= MA20,MA10,DRAWNULL),COLORRED,LINETHICK1;
IF(MA20>= REF(MA20,1) AND MA20>= MA30,MA20,DRAWNULL),COLORRED,LINETHICK1;
IF(MA30>= REF(MA30,1) AND MA30>= MA60,MA30,DRAWNULL),COLORRED,LINETHICK1;
DRAWICON(CROSS(MA5,MA10),LOW*0.99,1);
DRAWICON(CROSS(MA10,MA20),LOW*0.99,1);
DRAWICON(CROSS(MA20,MA30),LOW*0.99,1);
DRAWICON(CROSS(MA10,MA5),H,2);
DRAWICON(CROSS(MA20,MA10),H,2);
DRAWICON(CROSS(MA30,MA20),H,2);
DRAWTEXT(CROSS(MA5,MA10),MA5,'○'),LINETHICK1, COLORYELLOW;
DRAWTEXT(CROSS(MA10,MA20),MA10,'◎'),LINETHICK1, COLORYELLOW;
DRAWTEXT(CROSS(MA20,MA30),MA20,'●'),LINETHICK1, COLORYELLOW;
DRAWTEXT(CROSS(MA30,MA60),MA30,'☆'),LINETHICK1, COLORYELLOW;
659511705.jpg
|