DRAWTEXTEX(1,0,0,0,Ƈ红后7；2红15；3红21；4黄后8；5黄17；6蓝后2；7蓝 22；8粉后8；9粉22')，linethick30;
NL:LDAY,LineThick0,COLORblue;
isColor:=IF((REF(NL,1)>NL) AND NL>=1,1,0);
JS:BARSLAST(ISCOLOR)+1,LineThick0,COLORYELLOW;
NUM:=COUNT(ISCOLOR=1,0);
LNA:=isColor AND MOD(NUM,4)=0;
LNB:=isColor AND MOD(NUM,4)=1;
LNC:=isColor AND MOD(NUM,4)=2;
LND:=isColor AND MOD(NUM,4)=3;
//2.高低点
xD:=V>0;
n:=BARSLAST(V>0);
xh:=IF(xd,H,REF(H,n));
xl:=IF(xd,L,REF(L,n));
ch1:=H>=HHV(REF(xh,1),REF(n,1)+2);
ch2:=xd AND REF(ch1,REF(n,1)+1) AND xh<HHV(REF(xh,1),REF(n,1)+1);
ch3:=xd AND REF(ch2,REF(n,1)+1) AND xh<HHV(REF(xh,1),BARSLAST (ch1));
ch0:=BACKSET(ch3 AND 1-ch1 ,BARSLAST(ch1)+1) AND ch1;
cl1:=L<=LLV(REF(xl,1),REF(n,1)+2);
cl2:=xd AND REF(cl1,REF(n,1)+1) AND xl>LLV(REF(xl,1),REF(n,1)+1);
cl3:=xd AND REF(cl2,REF(n,1)+1) AND xl>LLV(REF(xl,1),BARSLAST (cl1));
cl0:=BACKSET(cl3 AND 1-cl1 ,BARSLAST(cl1)+1) AND cl1;
//DRAWNUMBER(ch0,H*1.02 ,JS,0 ),colorred;
//DRAWNUMBER(cl0,L ,JS,0 ),colorgreen;
VERTLINE(LNA),COLORRED; //红线
VERTLINE(LNB),COLORYELLOW; //黄线
VERTLINE(LNC),COLORBLUE; //蓝线
VERTLINE(LND),COLORMAGENTA; //粉线
n1:=BarsLast(lna)=8-1;
n2:=BarsLast(lna)=15-1;
n3:=BarsLast(LNa)=22-1;
n4:=BarsLast(lnb)=9-1;
n5:=BarsLast(lnb)=19-1;
n6:=BarsLast(LNB)=28-1;
n7:=BarsLast(LNC)=4-1;
n8:=BarsLast(LNC)=24-1;
n9:=BarsLast(lnd)=22-1;
DrawNumber( n1,l*0.99,1,0),ColorGreen;
DrawNumber( n2,h*1.02,2,0),Colorred;
DrawNumber( n3,l*0.99,3,0),ColorGreen;
DrawNumber( n4,h*1.02,4,0),ColorRed;
DrawNumber( n5,l*0.99,5,0),ColorGreen;
DrawNumber( n6,h*1.02,6,0),Colorred;
DrawNumber( n7,l*0.99,7,0),ColorGreen;
DrawNumber( n8,h*1.02,8,0),ColorRed;
DrawNumber( n9,l*0.99,9,0),ColorGreen;
1楼中的LDAY为农历日期，不支持改写，下面给为公历日期了，参考：
//DRAWTEXTEX(1,0,0,0,?红后7；2红15；3红21；4黄后8；5黄17；6蓝后2；7蓝 22；8粉后8；9粉22')，LINETHICK30;
NL:DAY,NODRAW,COLORBLUE;
ISCOLOR:=IF((REF(NL,1)>NL) AND NL>=1,1,0);
JS:BARSLAST(ISCOLOR)+1,NODRAW,COLORYELLOW;
NUM:=COUNT(ISCOLOR=1,0);
LNA:=ISCOLOR AND MOD(NUM,4)=0;
LNB:=ISCOLOR AND MOD(NUM,4)=1;
LNC:=ISCOLOR AND MOD(NUM,4)=2;
LND:=ISCOLOR AND MOD(NUM,4)=3;
//2.高低点
XD:=V>0;
N:=BARSLAST(V>0);
XH:=IF(XD,H,REF(H,N));
XL:=IF(XD,L,REF(L,N));
CH1:=H>=HHV(REF(XH,1),REF(N,1)+2);
CH2:=XD AND REF(CH1,REF(N,1)+1) AND XH<HHV(REF(XH,1),REF(N,1)+1);
CH3:=XD AND REF(CH2,REF(N,1)+1) AND XH<HHV(REF(XH,1),BARSLAST (CH1));
CH0:=BACKSET(CH3 AND 1-CH1 ,BARSLAST(CH1)+1) AND CH1;
CL1:=L<=LLV(REF(XL,1),REF(N,1)+2);
CL2:=XD AND REF(CL1,REF(N,1)+1) AND XL>LLV(REF(XL,1),REF(N,1)+1);
CL3:=XD AND REF(CL2,REF(N,1)+1) AND XL>LLV(REF(XL,1),BARSLAST (CL1));
CL0:=BACKSET(CL3 AND 1-CL1 ,BARSLAST(CL1)+1) AND CL1;
//DRAWNUMBER1(CH0,H*1.02 ,JS,0 ),COLORRED;
//DRAWNUMBER1(CL0,L ,JS,0 ),COLORGREEN;
VERTLINE1(LNA),COLORRED; //红线
VERTLINE1(LNB),COLORYELLOW; //黄线
VERTLINE1(LNC),COLORBLUE; //蓝线
VERTLINE1(LND),COLORMAGENTA; //粉线
N1:=BARSLAST(LNA)=8-1;
N2:=BARSLAST(LNA)=15-1;
N3:=BARSLAST(LNA)=22-1;
N4:=BARSLAST(LNB)=9-1;
N5:=BARSLAST(LNB)=19-1;
N6:=BARSLAST(LNB)=28-1;
N7:=BARSLAST(LNC)=4-1;
N8:=BARSLAST(LNC)=24-1;
N9:=BARSLAST(LND)=22-1;
DRAWNUMBER1( N1,L*0.99,1,0),COLORGREEN;
DRAWNUMBER1( N2,H*1.02,2,0),COLORRED;
DRAWNUMBER1( N3,L*0.99,3,0),COLORGREEN;
DRAWNUMBER1( N4,H*1.02,4,0),COLORRED;
DRAWNUMBER1( N5,L*0.99,5,0),COLORGREEN;
DRAWNUMBER1( N6,H*1.02,6,0),COLORRED;
DRAWNUMBER1( N7,L*0.99,7,0),COLORGREEN;
DRAWNUMBER1( N8,H*1.02,8,0),COLORRED;
DRAWNUMBER1( N9,L*0.99,9,0),COLORGREEN;
