通达信特快列车Z主图指标
源码
{特快列车Z----创幻论坛一品茶缘编写精品指标,大智慧主图}{通用}
{特快列车指标使用说明：
{均线角度巧安排，要乘特快看站台；}
{买票上车是提示，启动加速列车开！}
A5:MA(C,5),COLOR00FFFF;
A20:MA(C,20),COLORFF00FF;
A30:MA(C,30),COLOR00FF00;
M5:=ATAN((A5/REF(A5,1)-1)*100)*180/3.14159;
M20:=ATAN((A20/REF(A20,1)-1)*100)*180/3.14159;
M30:=ATAN((A30/REF(A30,1)-1)*100)*180/3.14159;
QSXS:=M30
A50:=IF(M5 0,-25,0);
A51:=IF(BETWEEN(M5,0,45),25,A50);
A52:=IF(BETWEEN(M5,45,75),50,A51);
MA5:=IF(M5 75,75,A52)*QSXS;
A200:=IF(M20 0,-25,0);
A201:=IF(BETWEEN(M20,0,45),25,A200);
A202:=IF(BETWEEN(M20,45,75),50,A201);
MA20:=IF(M20 75,75,A202)*QSXS;
A300:=IF(M30 0,-25,0);
A301:=IF(BETWEEN(M30,0,45),25,A300);
A302:=IF(BETWEEN(M30,45,75),50,A301);
MA30:=IF(M30 75,75,A302)*QSXS;
SGSJ:=BARSLAST(CROSS(MA5,REF(MA5+1,1)));
XGSJ:=BARSLAST(CROSS(REF(MA5-1,1),MA5));
列车:=IF(MA5 =50 AND MA20 =25 AND MA30 =25 AND SGSJ
启动:=IF(CROSS(列车,45),50,25);
站台:=IF(MA5 =0 AND COUNT(MA20 =25,10) =9 AND MA30 =25,-25,25);
买票:=IF(站台=-25 AND COUNT(站台=-25,3) =2 AND C =REF(C,4),25,-10);
上车:=IF(CROSS(MA5,0) AND COUNT(MA20 =25,10) =9 AND MA30 =25,50,25);
{以下设置主图显示方式}
STICKLINE(MA20 0,A20,(A20+A30)/2,4,1),COLORFF00FF;
STICKLINE(MA30 0,A30,(A20+A30)/2,4,1),COLOR00FF00;
STICKLINE(MA5 0,A30,(A30*0.75+A20*0.25),4,1),COLOR00FFFF;
{DRAWTEXT(列车=50,A30-0.20, '列车'),COLOR88FFFF;
DRAWTEXT(启动=50,A30, '启动'),COLORFF00FF;}
STICKLINE(站台=-25,A30,A30*0.98,4,0),COLORFFFF00;
STICKLINE(买票=25,A30,A30*0.98,2,0),COLORFFFFFF;
DRAWTEXT(买票=25,A30*0.97, '票'),COLORFF8800;
DRAWTEXT(上车=50,A30, '上车'),COLORFFFFFF;
