咨詢內容：

請老師修改成為博弈大師，可以使用的指標

DRAWKLINE(H,H,L,L);
DRAWKLINE(H,H,L,L),COLOR555555;
DRAWSL(ISLASTBAR,C,0,380,3),PRECISION(0),COLOR777777;{橫}

DA:EMA(CLOSE,3),COLORBLUE;
DB:EMA(CLOSE,5) ,COLORBLUE;
DC:EMA(CLOSE,8) ,COLORBLUE;
DD:EMA(CLOSE,10) ,COLORBLUE;
DE:EMA(CLOSE,12) ,COLORBLUE;
DF:EMA(CLOSE,15) ,COLORBLUE;
CA:EMA(CLOSE,30) ,COLORYELLOW;
CB:EMA(CLOSE,35) ,COLORYELLOW;
CC:EMA(CLOSE,40) ,COLORYELLOW;
CD:EMA(CLOSE,45) ,COLORYELLOW;
CE:EMA(CLOSE,50) ,COLORYELLOW;
CF:EMA(CLOSE,60) ,COLORYELLOW;

CDYX:=CA>CB AND CB>CC AND CC>CD AND CD>CE AND CE>CF;
CKYX:=CA<CB AND CB<CC AND CC<CD AND CD<CE AND CE<CF;
DDYX:=DA>DB AND DB>DC AND DC>DD AND DD>DE AND DE>DF;
DKYX:=CA<CB AND DB<DC AND DC<DD AND DD<DE AND DE<DF;
IF(CDYX,CA,DRAWNULL),COLORRED;
IF(CDYX,CB,DRAWNULL),COLORRED;
IF(CDYX,CC,DRAWNULL),COLORRED;
IF(CDYX,CD,DRAWNULL),COLORRED;
IF(CDYX,CE,DRAWNULL),COLORRED;
IF(CDYX,CF,DRAWNULL),COLORRED;
IF(CKYX,CA,DRAWNULL),COLORGREEN;
IF(CKYX,CB,DRAWNULL),COLORGREEN;
IF(CKYX,CC,DRAWNULL),COLORGREEN;
IF(CKYX,CD,DRAWNULL),COLORGREEN;
IF(CKYX,CE,DRAWNULL),COLORGREEN;
IF(CKYX,CF,DRAWNULL),COLORGREEN;

IF(DDYX,DA,DRAWNULL),COLORRED;
IF(DDYX,DB,DRAWNULL),COLORRED;
IF(DDYX,DC,DRAWNULL),COLORRED;
IF(DDYX,DD,DRAWNULL),COLORRED;
IF(DDYX,DE,DRAWNULL),COLORRED;
IF(DDYX,DF,DRAWNULL),COLORRED;

IF(DKYX,DA,DRAWNULL),COLORGREEN;
IF(DKYX,DB,DRAWNULL),COLORGREEN;
IF(DKYX,DC,DRAWNULL),COLORGREEN;
IF(DKYX,DD,DRAWNULL),COLORGREEN;
IF(DKYX,DE,DRAWNULL),COLORGREEN;
IF(DKYX,DF,DRAWNULL),COLORGREEN;
A23:=((C+L)+H)/3;
A24:=EMA(A23,6);
A25:=EMA(A24,5);
A26:=CROSS(A24,A25);
DRAWICON(A26,(LOW / 1.015),1),LINETHICK2,COLORMAGENTA;
A1:=DATE <= 13181231;
工作線:(EMA(C,14)) * A1,POINTDOT,LINETHICK4,COLORYELLOW;
P:=21;
WH1:=IF(L=LLV(L,P),L,DRAWNULL);
{{WH2:=CONST(BARSLAST(WH1!=DRAWNULL));
WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));
WH4:=CONST(REF(BARSLAST(H&gt;WH3),WH2+1)+WH2+1);
WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));
WH6:=CONST(REF(BARSLAST(H&gt;WH5),WH4+1)+WH4+1);
進場:IF(CURRBARSCOUNT&lt;=WH2+21,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORRED;
IF(CURRBARSCOUNT&lt;=WH2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORRED;
DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),進場,'進場線'),COLORRED;
超跌進場:IF(CURRBARSCOUNT&lt;=WH2+21,CONST(IF(WH4=0,H,REF(H,WH4))),DRAWNULL),COLORCB21BE;
DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),超跌進場,'超跌進場線'),COLORCB21BE;
H1:=IF(H=HHV(H,P),H,DRAWNULL);
H2:=CONST(BARSLAST(H1!=DRAWNULL));
H3:=CONST(IF(H2=0,L,REF(L,H2)));
H4:=CONST(REF(BARSLAST(L&lt;H3),H2+1)+H2+1);
H5:=CONST(IF(H4=0,L,REF(L,H4)));
H6:=CONST(REF(BARSLAST(L&lt;H5),H4+1)+H4+1);
止損:IF(CURRBARSCOUNT&lt;=H2+21,CONST(IF(H6=0,L,REF(L,H6))),DRAWNULL),COLORYELLOW;
IF(CURRBARSCOUNT&lt;=H2+1,IF(H=HHV(H,P),H,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORBLUE;
DRAWTEXT(CURRBARSCOUNT=INTPART((H2+21)*0.618),止損,'止損線'),COLORYELLOW;
止盈:IF(CURRBARSCOUNT&lt;=H2+21,CONST(IF(H4=0,L,REF(L,H4))),DRAWNULL),COLORCB21BE;
DRAWTEXT(CURRBARSCOUNT=INTPART((H2+21)*0.618),止盈,'止盈線'),COLORCB21BE;}

?

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

博易技術人員： 從這里修改，以上的可以通過博弈大師。 {{WH2:=CONST(BARSLAST(WH1!=DRAWNULL));
WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));
WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);
WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));
WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);
進場:IF(CURRBARSCOUNT<=WH2+21,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORRED;
IF(CURRBARSCOUNT<=WH2+1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORRED;
DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),進場,'進場線'),COLORRED;
超跌進場:IF(CURRBARSCOUNT<=WH2+21,CONST(IF(WH4=0,H,REF(H,WH4))),DRAWNULL),COLORCB21BE;
DRAWTEXT(CURRBARSCOUNT=INTPART((WH2+21)*0.618),超跌進場,'超跌進場線'),COLORCB21BE;
H1:=IF(H=HHV(H,P),H,DRAWNULL);
H2:=CONST(BARSLAST(H1!=DRAWNULL));
H3:=CONST(IF(H2=0,L,REF(L,H2)));
H4:=CONST(REF(BARSLAST(L<H3),H2+1)+H2+1);
H5:=CONST(IF(H4=0,L,REF(L,H4)));
H6:=CONST(REF(BARSLAST(L<H5),H4+1)+H4+1);
止損:IF(CURRBARSCOUNT<=H2+21,CONST(IF(H6=0,L,REF(L,H6))),DRAWNULL),COLORYELLOW;
IF(CURRBARSCOUNT<=H2+1,IF(H=HHV(H,P),H,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORBLUE;
DRAWTEXT(CURRBARSCOUNT=INTPART((H2+21)*0.618),止損,'止損線'),COLORYELLOW;
止盈:IF(CURRBARSCOUNT<=H2+21,CONST(IF(H4=0,L,REF(L,H4))),DRAWNULL),COLORCB21BE;
DRAWTEXT(CURRBARSCOUNT=INTPART((H2+21)*0.618),止盈,'止盈線'),COLORCB21BE;} 來源 程序化久久網