咨詢內容：

請老師幫忙修改

HH:=H;
LL:=L;
多止損:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*3.5,NODRAW,COLORYELLOW;
多止盈:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1+REFX1(MA(HH,25),25/2),NODRAW,COLORWHITE;
空止損:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*3.5+REFX1(MA(HH,25),25/2),NODRAW,COLORYELLOW;
空止盈:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,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(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1+REFX1(MA(HH,25),25/2),LINETHICK1,COLORWHITE;
低0:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底 AND 高0>=D90頂;
空頭定位:=高0<=D90頂 AND 低0<=D90底;
震蕩定位:=低0>=D90底 AND 高0<=D90頂;
短頂:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*2+REFX1(MA(HH,25),25/2),LINETHICK2,COLORGREEN;
短底:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,NODRAW,COLORRED;
頂1:=110000,COLORYELLOW,NODRAW;
底1:=-10000,COLORYELLOW,NODRAW;
STICKLINE1(多頭定位=1,頂1,底1,5,0),COLOR000066;
STICKLINE1(空頭定位=1,頂1,底1,5,0),COLOR003300;
STICKLINE1(震蕩定位=1,頂1,底1,5,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;
做空:87000,COLORWHITE,LINETHICK1;
做多:18000,COLORWHITE,LINETHICK1;
空損:110000,COLORMAGENTA,LINETHICK2;
多損:-10000,COLORMAGENTA,LINETHICK2;
DRAWTEXT(ISLASTBAR,108000,''),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,''),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,''),COLORRED;
DRAWTEXT(ISLASTBAR,-9000,''),COLORMAGENTA;
DEA3:=EMA((EMA(CLOSE,3) - EMA(CLOSE,6)),9),COLORGREEN,LINETHICK2;
DEA3B:=REF(DEA3,1),COLORWHITE,NODRAW;?
DEA33B:=EMA((EMA(EMA(CLOSE,3) - EMA(CLOSE,9),3) - EMA(EMA(CLOSE,3) - EMA(CLOSE,9),9)),9),COLORWHITE,NODRAW;
DEA333B:=REF(DEA33B,1),COLORWHITE,NODRAW;
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,短線低盤,短線高盤,0.0,0),COLORRED;?
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,短線收盤,短線開盤,3,1),COLORRED;
STICKLINE(DEA3<DEA3B,短線低盤,短線高盤,0.0,0),COLORGREEN;?
STICKLINE(DEA3<DEA3B,短線收盤,短線開盤,3,1),COLORGREEN;
白色點多定位1:=短線低盤<做多 AND 短線高盤>做多;
白色點空定位1:=短線高盤>做空 AND 短線低盤<做空;
STICKLINE1(白色點多定位1=1,短線低盤,做多,3,0),COLORWHITE;?
STICKLINE1(白色點空定位1=1,短線高盤,做空,3,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE1(白色點多定位2=1,短線低盤,短線高盤,0.0,0),COLORWHITE;?
STICKLINE1(白色點多定位2=1,短線收盤,短線開盤,3,0),COLORWHITE;
STICKLINE1(白色點空定位2=1,短線低盤,短線高盤,0.0,0),COLORWHITE;?
STICKLINE1(白色點空定位2=1,短線收盤,短線開盤,3,0),COLORWHITE;
多頭多定位:=CROSS(做多,短線低盤) AND 多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空) AND 多頭定位=1 AND 震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空) AND 空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤) AND 空頭定位=1 AND 震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤) AND 震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空) AND 震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,'ICO4'),VALIGN0;
DRAWICON(多頭平定位=1,短線高盤,'ICO5'),VALIGN2;
DRAWICON(多頭多定位=1 OR 震蕩多定位=1,短線低盤,'ICO4'),VALIGN0;
DRAWICON(空頭空定位=1 OR 震蕩空定位=1,短線高盤,'ICO5'),VALIGN2;
空頭平定位=1 || 多頭多定位=1,SOUND('A');
多頭平定位=1 || 空頭空定位=1,SOUND('B');

?

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

博易技術人員： HH:=H;
LL:=L;
多止損:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*3.5,NODRAW,COLORYELLOW;
多止盈:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1+REFX(MA(HH,25),25/2),NODRAW,COLORWHITE;
空止損:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*3.5+REFX(MA(HH,25),25/2),NODRAW,COLORYELLOW;
空止盈:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,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:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1+REFX(MA(HH,25),25/2),LINETHICK1,COLORWHITE;
低0:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底 AND 高0>=D90頂;
空頭定位:=高0<=D90頂 AND 低0<=D90底;
震蕩定位:=低0>=D90底 AND 高0<=D90頂;
短頂:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*2+REFX(MA(HH,25),25/2),LINETHICK2,COLORGREEN;
短底:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,NODRAW,COLORRED;
頂1:=110000,COLORYELLOW,NODRAW;
底1:=-10000,COLORYELLOW,NODRAW;
STICKLINE(多頭定位=1,頂1,底1,5,0),COLOR000066;
STICKLINE(空頭定位=1,頂1,底1,5,0),COLOR003300;
STICKLINE(震蕩定位=1,頂1,底1,5,0),COLOR555555;
震蕩頂:=(REFX(MA(短線高盤,25),25/2)-REFX(MA(短線低盤,25),25/2))*1+REFX(MA(短線高盤,25),25/2),POINTDOT,COLORWHITE;
震蕩底:=REFX(MA(短線低盤,25),25/2)-((REFX(MA(短線高盤,25),25/2))-REFX(MA(短線低盤,25),25/2))*1,POINTDOT,COLORWHITE;
做空:87000,COLORWHITE,LINETHICK1;
做多:18000,COLORWHITE,LINETHICK1;
空損:110000,COLORMAGENTA,LINETHICK2;
多損:-10000,COLORMAGENTA,LINETHICK2;
DRAWTEXT(ISLASTBAR,108000,''),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,''),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,''),COLORRED;
DRAWTEXT(ISLASTBAR,-9000,''),COLORMAGENTA;
DEA3:=EMA((EMA(CLOSE,3) - EMA(CLOSE,6)),9),COLORGREEN,LINETHICK2;
DEA3B:=REF(DEA3,1),COLORWHITE,NODRAW;?
DEA33B:=EMA((EMA(EMA(CLOSE,3) - EMA(CLOSE,9),3) - EMA(EMA(CLOSE,3) - EMA(CLOSE,9),9)),9),COLORWHITE,NODRAW;
DEA333B:=REF(DEA33B,1),COLORWHITE,NODRAW;
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,短線低盤,短線高盤,0.0,0),COLORRED;?
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,短線收盤,短線開盤,3,1),COLORRED;
STICKLINE(DEA3<DEA3B,短線低盤,短線高盤,0.0,0),COLORGREEN;?
STICKLINE(DEA3<DEA3B,短線收盤,短線開盤,3,1),COLORGREEN;
白色點多定位1:=短線低盤<做多 AND 短線高盤>做多;
白色點空定位1:=短線高盤>做空 AND 短線低盤<做空;
STICKLINE(白色點多定位1=1,短線低盤,做多,3,0),COLORWHITE;?
STICKLINE(白色點空定位1=1,短線高盤,做空,3,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE(白色點多定位2=1,短線低盤,短線高盤,0.0,0),COLORWHITE;?
STICKLINE(白色點多定位2=1,短線收盤,短線開盤,3,0),COLORWHITE;
STICKLINE(白色點空定位2=1,短線低盤,短線高盤,0.0,0),COLORWHITE;?
STICKLINE(白色點空定位2=1,短線收盤,短線開盤,3,0),COLORWHITE;
多頭多定位:=CROSS(做多,短線低盤) AND 多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空) AND 多頭定位=1 AND 震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空) AND 空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤) AND 空頭定位=1 AND 震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤) AND 震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空) AND 震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,'ICO4'),VALIGN0;
DRAWICON(多頭平定位=1,短線高盤,'ICO5'),VALIGN2;
DRAWICON(多頭多定位=1 OR 震蕩多定位=1,短線低盤,'ICO4'),VALIGN0;
DRAWICON(空頭空定位=1 OR 震蕩空定位=1,短線高盤,'ICO5'),VALIGN2; 來源 程序化久久網