咨詢內容：

請老師改一下

P:=10;
P1:=20;
A1:=REF(H,P)=HHV(H,2*P+1);
B01:=FILTER(A1,P);
C1:=BACKSET(B01,P+1);
D1:=CROSS(C1,0.5);
E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
F1:=CROSS(E1,0.5);
DRAWLINE(D1,H,F1,L,1),COLORCYAN;//短壓:
DRAWTEXT(D1,H,'空'),COLORGREEN;
A2:=REF(L,P)=LLV(L,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=CROSS(C2,0.5);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
DRAWLINE(D2,H,F2,L,1),COLORRED;//短支:
DRAWTEXT(D2,L,'多');
AA1:=REF(H,P1)=HHV(H,2*P1+1);
BB1:=FILTER(AA1,P1);
CC1:=BACKSET(BB1,P1+1);
DD1:=CROSS(CC1,0.5);
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
FF1:=EE1>REF(EE1,1);
DRAWLINE(DD1,H,FF1,L,1),COLORGREEN;//長壓:
DRAWTEXT(DD1,H,'空'),COLORGREEN;
AA2:=REF(L,P1)=LLV(L,2*P1+1);
BB2:=FILTER(AA2,P1);
CC2:=BACKSET(BB2,P1+1);
DD2:=CROSS(CC2,0.5);
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
FF2:=EE2>REF(EE2,1);
DRAWLINE(DD2,L,FF2,H,1),COLORRED; //長支:L
DRAWTEXT(DD2,L,'多');
多 空用最小的字表示 謝謝

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： P:=10;
P1:=20;
A1:=REF(H,P)=HHV(H,2*P+1);
B01:=FILTER(A1,P);
C1:=BACKSET(B01,P+1);
D1:=CROSS(C1,0.5);
E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
F1:=CROSS(E1,0.5);
DRAWLINE(D1,H,F1,L,1),COLORCYAN;//短壓:
DRAWTEXT(D1,H,'空'),COLORGREEN,FONTSIZE5;
A2:=REF(L,P)=LLV(L,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=CROSS(C2,0.5);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
DRAWLINE(D2,H,F2,L,1),COLORRED;//短支:
DRAWTEXT(D2,L,'多'),FONTSIZE5;
AA1:=REF(H,P1)=HHV(H,2*P1+1);
BB1:=FILTER(AA1,P1);
CC1:=BACKSET(BB1,P1+1);
DD1:=CROSS(CC1,0.5);
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
FF1:=EE1>REF(EE1,1);
DRAWLINE(DD1,H,FF1,L,1),COLORGREEN;//長壓:
DRAWTEXT(DD1,H,'空'),COLORGREEN,FONTSIZE5;
AA2:=REF(L,P1)=LLV(L,2*P1+1);
BB2:=FILTER(AA2,P1);
CC2:=BACKSET(BB2,P1+1);
DD2:=CROSS(CC2,0.5);
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
FF2:=EE2>REF(EE2,1);
DRAWLINE(DD2,L,FF2,H,1),COLORRED; //長支:L
DRAWTEXT(DD2,L,'多'),FONTSIZE5;
?
?
請看最后一行有?FONTSIZE5? ? 整個公式一共有四個位置有這個函數，請自行修改數字大小來改變字體顯示的大小，目前我寫的是5，如果需要您可以改得更小一點。 請老師把有顏色的線去掉謝謝 來源 程序化久久網