通达信特快列车F副图指标

以下是通达信特快列车F副图指标

通达信特快列车F副图指标

源码

{一品【特快列车】----创幻论坛一品茶缘编写精品指标,大智慧副图}{通用}
{特快列车指标使用说明：}
A5:=MA(C,5);
A20:=MA(C,20);
A30:=MA(C,30);
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>0;
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,COLOR00FFFF;
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,COLORFF00FF;
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,COLOR00FF00;
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),COLORFF00FF;
站台:IF(MA5<=0 AND COUNT(MA20>=25,10)>=9 AND MA30>=25,-25,25),COLORFFFF00;
买票:IF(站台=-25 AND COUNT(站台=-25,3)>=2 AND C>=REF(C,4),25,-10),COLORFF8800;
上车:IF(CROSS(MA5,0) AND COUNT(MA20>=25,10)>=9 AND MA30>=25,50,25),COLORFFFFFF;
{以下设置副图显示方式}
STICKLINE(MA5>0,25,33,4,1),COLOR00FFFF;
STICKLINE(MA20>0,33,41,4,1),COLORFF00FF;
STICKLINE(MA30>0,41,50,4,1),COLOR00FF00;

DRAWTEXT(列车=50,25, '○'),COLOR88FFFF;
DRAWTEXT(启动=50,25, '●'),COLORFF00FF;
DRAWTEXT(上车=50,25, '△'),COLORFFFFFF;
STICKLINE(站台=-25,-10,-25,4,0),COLORFFFF00;