咨詢內容：

懇請老師改寫成博弈大師指標公式，謝謝老師

多止損:REFX1(MA(L,25),25/2)-REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2)*3.5,NODRAW,COLORYELLOW;
多止盈:(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1+REFX1(MA(H,25),25/2),NODRAW,COLORWHITE;
空止損:(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*3.5+REFX1(MA(H,25),25/2),NODRAW,COLORYELLOW;
空止盈:REFX1(MA(L,25),25/2)-(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1,NODRAW,COLORWHITE;
短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(短高H,90),COLORRED,LINETHICK1;
D90L:=EMA(短低L,90),COLORRED,LINETHICK1;
D90差:=D90H-D90L;
D90頂:=D90H+D90差*2,COLORRED,LINETHICK1;
D90底:=D90L-D90差*2,COLORRED,LINETHICK1;
高0:=(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1+REFX1(MA(H,25),25/2),LINETHICK1,COLORWHITE;
低0:=REFX1(MA(L,25),25/2)-(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底 AND 高0>=D90頂;
空頭定位:=高0<=D90頂 AND 低0<=D90底;
震蕩定位:=低0>=D90底 AND 高0<=D90頂;
短頂:=(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*2+REFX1(MA(H,25),25/2),LINETHICK2,COLORGREEN;
短底:=REFX1(MA(L,25),25/2)-(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,LINETHICK1,COLORRED;
頂1:=120000,COLORYELLOW,LINETHICK3;
底1:=-20000,COLORYELLOW,LINETHICK3;
STICKLINE(多頭定位=1,頂1,底1,11,0),COLOR000066;
STICKLINE(空頭定位=1,頂1,底1,11,0),COLOR003300;
STICKLINE(震蕩定位=1,頂1,底1,11,0),COLOR555555;
震蕩頂:=(REFX1(MA(短線高盤,25),25/2)-REFX1(MA(短線低盤,25),25/2))*1+REFX1(MA(短線高盤,25),25/2),POINTDOT,COLORWHITE;
震蕩底:=REFX1(MA(短線低盤,25),25/2)-(REFX1(MA(短線高盤,25),25/2)-REFX1(MA(短線低盤,25),25/2))*1,POINTDOT,COLORWHITE;
做空:=80000,COLORWHITE,LINETHICK1;
做多:=20000,COLORWHITE,LINETHICK1;
空損:=120000,COLORMAGENTA,LINETHICK2;
多損:=-20000,COLORMAGENTA,LINETHICK2;
多減倉:=65000,POINTDOT,COLORRED;
空減倉:=35000,POINTDOT,COLORGREEN;
DRAWTEXT(ISLASTBAR,120000,'損'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,'空'),COLORWHITE;
DRAWTEXT(ISLASTBAR,65000,'減'),COLORRED;
DRAWTEXT(ISLASTBAR,35000,'減'),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,'多'),COLORWHITE;
DRAWTEXT(ISLASTBAR,-20000,'損'),COLORMAGENTA;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
今D:=EMA(D,3);
昨D:=REF(今D,1);
STICKLINE(今D>=昨D,短線低盤,短線高盤,0,0),COLORRED;?
STICKLINE(今D>=昨D,短線收盤,短線開盤,8,0),COLORRED;
STICKLINE(今D<=昨D,短線低盤,短線高盤,0,0),COLORGREEN;?
STICKLINE(今D<=昨D,短線收盤,短線開盤,8,0),COLORGREEN;
白色點多定位1:=短線低盤<做多 AND 短線高盤>做多;
白色點空定位1:=短線高盤>做空 AND 短線低盤<做空;
STICKLINE(白色點多定位1=1,短線低盤,做多,8,0),COLORWHITE;?
STICKLINE(白色點空定位1=1,短線高盤,做空,8,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE(白色點多定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點多定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
STICKLINE(白色點空定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點空定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
多頭紅色點:=今D>昨D;
空頭紅色點:=今D<昨D;
多頭紅色點定位1:=白色點多定位1=1 AND 多頭紅色點=1;
空頭紅色點定位1:=白色點空定位1=1 AND 空頭紅色點=1;
STICKLINE(多頭紅色點定位1=1,短線低盤,做多,8,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位1=1,短線高盤,做空,8,0),COLORMAGENTA;?
多頭紅色點定位2:=白色點多定位2=1 AND 多頭紅色點=1;
空頭紅色點定位2:=白色點空定位2=1 AND 空頭紅色點=1;
STICKLINE(多頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(多頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
STICKLINE(空頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
多頭多定位:=CROSS(做多,短線低盤) AND 多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空) AND 多頭定位=1 AND 震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空) AND 空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤) AND 空頭定位=1 AND 震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤) AND 震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空) AND 震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,78);
DRAWICON(多頭平定位=1,短線高盤,67);
DRAWICON(多頭多定位=1 OR 震蕩多定位=1,短線低盤,48);
DRAWICON(空頭空定位=1 OR 震蕩空定位=1,短線高盤,49);
STICKLINE(1,80000,80000,15,0),COLORWHITE;
STICKLINE(1,20000,20000,15,0),COLORWHITE;
STICKLINE(1,120000,120000,15,0),COLORMAGENTA;
STICKLINE(1,-20000,-20000,15,0),COLORMAGENTA;
STICKLINE(1,65000,65000,2,0),COLORRED;
STICKLINE(1,35000,35000,2,0),COLORGREEN;

?

?來源:程序化99網（ www.weiqiv.net.cn ）

博易技術人員： 多止損:REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2)*3.5,NODRAW,COLORYELLOW;
多止盈:(REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2))*1+REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2),NODRAW,COLORWHITE;
空止損:(REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2))*3.5+REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2),NODRAW,COLORYELLOW;
空止盈:REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2)-(REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2))*1,NODRAW,COLORWHITE;
短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(短高H,90),COLORRED,LINETHICK1;
D90L:=EMA(短低L,90),COLORRED,LINETHICK1;
D90差:=D90H-D90L;
D90頂:=D90H+D90差*2,COLORRED,LINETHICK1;
D90底:=D90L-D90差*2,COLORRED,LINETHICK1;
高0:=(REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2))*1+REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2),LINETHICK1,COLORWHITE;
低0:=REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2)-(REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底 AND 高0>=D90頂;
空頭定位:=高0<=D90頂 AND 低0<=D90底;
震蕩定位:=低0>=D90底 AND 高0<=D90頂;
短頂:=(REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2))*2+REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2),LINETHICK2,COLORGREEN;
短底:=REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2)-(REFX(MA(H,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(L,(datacount-barpos-1)),(datacount-barpos-1)/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,LINETHICK1,COLORRED;
頂1:=120000,COLORYELLOW,LINETHICK3;
底1:=-20000,COLORYELLOW,LINETHICK3;
STICKLINE(多頭定位=1,頂1,底1,11,0),COLOR000066;
STICKLINE(空頭定位=1,頂1,底1,11,0),COLOR003300;
STICKLINE(震蕩定位=1,頂1,底1,11,0),COLOR555555;
震蕩頂:=(REFX(MA(短線高盤,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(短線低盤,(datacount-barpos-1)),(datacount-barpos-1)/2))*1+REFX(MA(短線高盤,(datacount-barpos-1)),(datacount-barpos-1)/2),POINTDOT,COLORWHITE;
震蕩底:=REFX(MA(短線低盤,(datacount-barpos-1)),(datacount-barpos-1)/2)-(REFX(MA(短線高盤,(datacount-barpos-1)),(datacount-barpos-1)/2)-REFX(MA(短線低盤,(datacount-barpos-1)),(datacount-barpos-1)/2))*1,POINTDOT,COLORWHITE;
做空:=80000,COLORWHITE,LINETHICK1;
做多:=20000,COLORWHITE,LINETHICK1;
空損:=120000,COLORMAGENTA,LINETHICK2;
多損:=-20000,COLORMAGENTA,LINETHICK2;
多減倉:=65000,POINTDOT,COLORRED;
空減倉:=35000,POINTDOT,COLORGREEN;
DRAWTEXT(ISLASTBAR,120000,'損'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,'空'),COLORWHITE;
DRAWTEXT(ISLASTBAR,65000,'減'),COLORRED;
DRAWTEXT(ISLASTBAR,35000,'減'),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,'多'),COLORWHITE;
DRAWTEXT(ISLASTBAR,-20000,'損'),COLORMAGENTA;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
今D:=EMA(D,3);
昨D:=REF(今D,1);
STICKLINE(今D>=昨D,短線低盤,短線高盤,0,0),COLORRED;?
STICKLINE(今D>=昨D,短線收盤,短線開盤,8,0),COLORRED;
STICKLINE(今D<=昨D,短線低盤,短線高盤,0,0),COLORGREEN;?
STICKLINE(今D<=昨D,短線收盤,短線開盤,8,0),COLORGREEN;
白色點多定位1:=短線低盤<做多 AND 短線高盤>做多;
白色點空定位1:=短線高盤>做空 AND 短線低盤<做空;
STICKLINE(白色點多定位1=1,短線低盤,做多,8,0),COLORWHITE;?
STICKLINE(白色點空定位1=1,短線高盤,做空,8,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE(白色點多定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點多定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
STICKLINE(白色點空定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點空定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
多頭紅色點:=今D>昨D;
空頭紅色點:=今D<昨D;
多頭紅色點定位1:=白色點多定位1=1 AND 多頭紅色點=1;
空頭紅色點定位1:=白色點空定位1=1 AND 空頭紅色點=1;
STICKLINE(多頭紅色點定位1=1,短線低盤,做多,8,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位1=1,短線高盤,做空,8,0),COLORMAGENTA;?
多頭紅色點定位2:=白色點多定位2=1 AND 多頭紅色點=1;
空頭紅色點定位2:=白色點空定位2=1 AND 空頭紅色點=1;
STICKLINE(多頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(多頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
STICKLINE(空頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
多頭多定位:=CROSS(做多,短線低盤) AND 多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空) AND 多頭定位=1 AND 震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空) AND 空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤) AND 空頭定位=1 AND 震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤) AND 震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空) AND 震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,78);
DRAWICON(多頭平定位=1,短線高盤,67);
DRAWICON(多頭多定位=1 OR 震蕩多定位=1,短線低盤,48);
DRAWICON(空頭空定位=1 OR 震蕩空定位=1,短線高盤,49);
STICKLINE(1,80000,80000,15,0),COLORWHITE;
STICKLINE(1,20000,20000,15,0),COLORWHITE;
STICKLINE(1,120000,120000,15,0),COLORMAGENTA;
STICKLINE(1,-20000,-20000,15,0),COLORMAGENTA;
STICKLINE(1,65000,65000,2,0),COLORRED;
STICKLINE(1,35000,35000,2,0),COLORGREEN; 來源 程序化久久網