[
]JL:=BARSLAST(TJ);
D1:=JL=1 AND CL;
D2:=JL=2 AND CL AND REF(D1,1);
D3:=JL=3 AND CL AND REF(D2,1);
D4:=JL=4 AND CL AND REF(D3,1);
D5:=JL=5 AND CL AND REF(D4,1);
D6:=JL=6 AND CL AND REF(D5,1);
D7:=JL=7 AND CL AND REF(D6,1);
D8:=JL=8 AND CL AND REF(D7,1);
D9:=JL=9 AND CL AND REF(D8,1);
CG:=(ISLASTBAR=1 AND D1) OR BACKSET(ISLASTBAR=1 AND D2,2) OR
BACKSET(ISLASTBAR=1 AND D3,3) OR BACKSET(ISLASTBAR=1 AND D4,4) OR
BACKSET(ISLASTBAR=1 AND D5,5) OR BACKSET(ISLASTBAR=1 AND D6,6) OR
BACKSET(ISLASTBAR=1 AND D7,7) OR BACKSET(ISLASTBAR=1 AND D8,8) OR BACKSET(D9,9);
DRAWTEXT(CG AND JL=1,L*0.997,'1'),COLORGREEN;
DRAWTEXT(CG AND JL=2,L*0.997,'2'),COLORGREEN;
DRAWTEXT(CG AND JL=3,L*0.997,'3'),COLORGREEN;
DRAWTEXT(CG AND JL=4,L*0.997,'4'),COLORGREEN;
DRAWTEXT(CG AND JL=5,L*0.997,'5'),COLORGREEN;
DRAWTEXT(CG AND JL=6,L*0.997,'6'),COLORGREEN;
DRAWTEXT(CG AND JL=7,L*0.997,'7'),COLORGREEN;
DRAWTEXT(CG AND JL=8,L*0.997,'8'),COLORGREEN;
DRAWTEXT(CG AND JL=9,L*0.997,'9'),COLORGREEN;
{高九}
GQT:=C[
]GCL:=C>REF(C,4);
GJL:=BARSLAST(GQT);
GD1:=GJL=1 AND GCL;
GD2:=GJL=2 AND GCL AND REF(GD1,1);
GD3:=GJL=3 AND GCL AND REF(GD2,1);
GD4:=GJL=4 AND GCL AND REF(GD3,1);
GD5:=GJL=5 AND GCL AND REF(GD4,1);
GD6:=GJL=6 AND GCL AND REF(GD5,1);
GD7:=GJL=7 AND GCL AND REF(GD6,1);
GD8:=GJL=8 AND GCL AND REF(GD7,1);
GD9:=GJL=9 AND GCL AND REF(GD8,1);
GCG:=BACKSET(ISLASTBAR=1 AND GD5,5) OR BACKSET(ISLASTBAR=1 AND GD6,6) OR BACKSET(ISLASTBAR=1 AND GD7,7)
OR BACKSET(ISLASTBAR=1 AND GD8,8) OR BACKSET( GD9,9);
DRAWTEXT(GCG AND GJL=1,H*1.005,'1'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=2,H*1.005,'2'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=3,H*1.005,'3'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=4,H*1.005,'4'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=5,H*1.005,'5'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=6,H*1.005,'6'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=7,H*1.005,'7'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=8,H*1.005,'8'),COLORYELLOW;
DRAWTEXT(GCG AND GJL=9,H*1.005,'9'),COLORYELLOW;