以下是通达信红绿灯副图源码

CC:=INDEXC;
 A:=MAX(MA(CC,60),MA(CC,120));
 B:=MIN(MA(CC,60),MA(CC,120));
绿灯行:CC>A,COLORGREEN;
红灯停:CC<B,COLORRED;
黄灯观望:A>=CC AND CC>=B,COLORYELLOW ;
 STICKLINE(CC>A,0,2,8,0),COLORGREEN,LINETHICK2;
 STICKLINE(CC<B,0,2,8,0),COLORRED,LINETHICK2;
 STICKLINE(A>=CC AND CC>=B,0,2,8,0),COLORYELLOW,LINETHICK2;