咨詢內容：

老師這個能改成博弈嗎

N:=75;
P:=5;
P1:=10;
A1:=REF(H,P)=HHV(H,2*P+1);
B1:=FILTER(A1,P);
C1:=BACKSET(B1,P+1);
D1:=FILTER(C1,P);
E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
F1:=E1>REF(E1,1);
DRAWLINE1(D1,H,F1,H,1),COLORCYAN,LINETHICK3;
A2:=REF(L,P)=LLV(L,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=FILTER(C2,P);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
DRAWLINE1(D2,L,F2,L,1),COLORRED,LINETHICK3;
AA1:=REF(H,P1)=HHV(H,2*P1+1);
BB1:=FILTER(AA1,P1);
CC1:=BACKSET(BB1,P1+1);
DD1:=FILTER(CC1,P1);
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
FF1:=EE1>REF(EE1,1);
DRAWLINE1(DD1,H,FF1,H,1),COLORGREEN,LINETHICK3;
AA2:=REF(L,P1)=LLV(L,2*P1+1);
BB2:=FILTER(AA2,P1);
CC2:=BACKSET(BB2,P1+1);
DD2:=FILTER(CC2,P1);
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
FF2:=EE2>REF(EE2,1);
DRAWLINE1(DD2,L,FF2,L,1),COLORRED,LINETHICK3;
/*STICKLINE1(C>=O,C,O,3,0),COLOR000045;
STICKLINE1(C>=O,C,O,2.5,0),COLOR000065;
STICKLINE1(C>=O,C,O,2,0),COLOR000085;
STICKLINE1(C>=O,C,O,1.5,0),COLOR0000A5;
STICKLINE1(C>=O,C,O,1,0),COLOR0000C5;
STICKLINE1(C>=O,C,O,0.5,0),COLOR0000E5;
STICKLINE1(C>=O,H,L,0,0),COLOR0000F5;
STICKLINE1(C<O,C,O,3,0),COLOR353500;
STICKLINE1(C<O,C,O,2.5,0),COLOR454500;
STICKLINE1(C<O,C,O,2,0),COLOR555500;
STICKLINE1(C<O,C,O,1.5,0),COLOR656500;
STICKLINE1(C<O,C,O,1,0),COLOR757500;
STICKLINE1(C<O,C,O,0.5,0),COLOR858500;
STICKLINE1(C<O,H,L,0,0),COLOR959500;
*/
高:=REFX1(HHV(H,N),10000);
低:=REFX1(LLV(L,N),10000);
H1:=高-(高-低)*0.191;
H2:=高-(高-低)*0.382;
H3:=高-(高-低)*0.5;
H4:=高-(高-低)*0.618;
H5:=高-(高-低)*0.809;
CURRBARSCOUNT:=DATACOUNT - BARPOS;
DRAWTEXT(CURRBARSCOUNT=1,高,'高'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H1,'鮁'),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=1,H2,'髂'),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=1,H3,'中'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,H4,'駖'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=1,H5,'餗'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,低,'低'),COLORRED;
/*STICKLINE1(CURRBARSCOUNT=13,高,高,100,-1),COLORGREEN;
STICKLINE1(CURRBARSCOUNT=13,H1,H1,100,-1),COLORCYAN;
STICKLINE1(CURRBARSCOUNT=13,H2,H2,100,-1),COLORGRAY;
STICKLINE1(CURRBARSCOUNT=13,H3,H3,100,-1),COLORYELLOW;
STICKLINE1(CURRBARSCOUNT=13,H4,H4,100,-1),COLORRED;
STICKLINE1(CURRBARSCOUNT=13,H5,H5,100,-1),COLORMAGENTA;
STICKLINE1(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;
*/

?

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

博易技術人員： N:=75;
P:=5;
P1:=10;
A1:=REF(H,P)=HHV(H,2*P+1);
B1:=FILTER(A1,P);
C1:=BACKSET(B1,P+1);
D1:=FILTER(C1,P);
E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
F1:=E1>REF(E1,1);
DRAWLINE(D1,H,F1,H,1),COLORCYAN,LINETHICK3;
A2:=REF(L,P)=LLV(L,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=FILTER(C2,P);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
DRAWLINE(D2,L,F2,L,1),COLORRED,LINETHICK3;
AA1:=REF(H,P1)=HHV(H,2*P1+1);
BB1:=FILTER(AA1,P1);
CC1:=BACKSET(BB1,P1+1);
DD1:=FILTER(CC1,P1);
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
FF1:=EE1>REF(EE1,1);
DRAWLINE(DD1,H,FF1,H,1),COLORGREEN,LINETHICK3;
AA2:=REF(L,P1)=LLV(L,2*P1+1);
BB2:=FILTER(AA2,P1);
CC2:=BACKSET(BB2,P1+1);
DD2:=FILTER(CC2,P1);
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
FF2:=EE2>REF(EE2,1);
DRAWLINE(DD2,L,FF2,L,1),COLORRED,LINETHICK3;

高:=REFX(HHV(H,N),10000);
低:=REFX(LLV(L,N),10000);
H1:=高-(高-低)*0.191;
H2:=高-(高-低)*0.382;
H3:=高-(高-低)*0.5;
H4:=高-(高-低)*0.618;
H5:=高-(高-低)*0.809;
CURRBARSCOUNT:=DATACOUNT - BARPOS;
DRAWTEXT(CURRBARSCOUNT=1,高,'高'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H1,'鮁'),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=1,H2,'髂'),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=1,H3,'中'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,H4,'駖'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=1,H5,'餗'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,低,'低'),COLORRED;

STICKLINE(CURRBARSCOUNT=13,H1,H1,100,-1),COLORCYAN;
STICKLINE(CURRBARSCOUNT=13,H2,H2,100,-1),COLORGRAY;
STICKLINE(CURRBARSCOUNT=13,H3,H3,100,-1),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=13,H4,H4,100,-1),COLORRED;
STICKLINE(CURRBARSCOUNT=13,H5,H5,100,-1),COLORMAGENTA;
STICKLINE(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;? 謝謝老師 來源 程序化久久網