咨詢內容：

老師，請改下指標

//綜合交易系統1//

MX:=EMA(C,2);
SX:=EMA(SLOPE(C,21)*20+C,42);
BU:=CROSS(MX,SX);
S:=CROSS(CLOSE,EMA2(HIGH,12));
X:=CROSS(EMA2(LOW,12),CLOSE);
WS:=BARSLAST(S)+1;
WX:=BARSLAST(X)+1;
SS:=CROSS(SUM(S,WX),0.5);
XX:=CROSS(SUM(X,WS),0.5);
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,COLORLIGHTGREEN,1);
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,COLORRED,1);
DRAWTEXT(SS,LOW,'做多-----'),COLORYELLOW;
DRAWTEXT(XX,HIGH,'做空----'),COLORYELLOW;
HX:=HHV(HIGH,1);
LX:=LLV(LOW,1);
H1:=IFELSE(HX<REF(HX,1) && HX<REF(HX,2) && HX<REF(HX,4) && LX<REF(LX,1) && LX<REF(LX,3) && LX<REF(LX,5) && OPEN>CLOSE && (HHV(OPEN,0)-CLOSE)>0,REF(HX,4),0);
L1:=IFELSE(LX>REF(LX,1) && LX>REF(LX,3) && LX>REF(LX,5) && HX>REF(HX,1) && HX>REF(HX,2) && HX>REF(HX,4) && OPEN<CLOSE && (CLOSE-LLV(OPEN,0))>0,REF(LX,4),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,H2,L2);
G1:=VALUEWHEN(ISLASTBAR,G);
DRAWNUMBER(LX>0,G1,G1,0,COLORMAGENTA);
TMP:=K2;
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1,HIGH,W1=1,HT,COLORLIGHTGREEN);
DRAWLINE(W1=1,LOW,W1=1,LT,COLORLIGHTGREEN);
DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED);
DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED);
STICKLINE(W1>0,OPEN,CLOSE,COLORLIGHTGREEN,1);
STICKLINE(W1<=0,OPEN,CLOSE,COLORRED,1);
STICKLINE(W2>0 && W1<=0,OPEN,CLOSE,COLORRED,0);
STICKLINE(W2>0 && W1>0,OPEN,CLOSE,COLORLIGHTGREEN,0);
DRAWLINE(TMP=1 && REF(TMP,1)=1,G,TMP=1 && REF(TMP,1)=1,REF(G,1),COLORBLUE),LINETHICK4;
DRAWLINE(TMP=-3 && REF(TMP,1)=-3,G,TMP=-3 && REF(TMP,1)=-3,REF(G,1),COLORRED),LINETHICK4;
DRAWSL(K2=1,G,0,1,0,COLORBLUE);
DRAWSL(K2=-3,G,0,1,0,COLORRED);
DRAWTEXT(CROSS(TMP,0),HX,'方向空-------'),COLORYELLOW,FONTSIZE12;
DRAWTEXT(CROSS(0,TMP),LX,'方向多-------'),COLORYELLOW,FONTSIZE12;
VV:=(3*C+H+L+ O )/6;
DUAN:(8*VV+7*REF(VV,1)+6*REF(VV,2)+5*REF(VV,3)+4*REF(VV,4)+3*REF(VV,5)+2*REF(VV,6)+REF(VV,7))/36,COLORRED;
ZONG:(LLV(DUAN,3)+LLV(DUAN,5)+LLV(DUAN,8))/3,COLORGREEN;
OCH:=MAX(OPEN,CLOSE);
OCL:=MIN(OPEN,CLOSE);
QQ:=C;
A1:=REF(QQ,10)=HHV(QQ,2*10+1);
B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(QQ,10)=LLV(QQ,2*10+1);
B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
?A :=REF(C,BARSLAST(HD));
B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) && NOT(HD);
T2:=BARSLAST(HD)>BARSLAST(LD) && NOT(LD);
壓力:IF(T1, A , A ),COLORBLUE,POINTDOT,LINETHICK1;
支撐:IF(T2,B,B),COLORRED,POINTDOT,LINETHICK1;
//SETEXPIREDATE('20181007');

?

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

博易技術人員： MX:=EMA(C,2);
SX:=EMA(SLOPE(C,21)*20+C,42);
BU:=CROSS(MX,SX);
S:=CROSS(CLOSE,EMA2(HIGH,12));
X:=CROSS(EMA2(LOW,12),CLOSE);
WS:=BARSLAST(S)+1;
WX:=BARSLAST(X)+1;
SS:=CROSS(SUM(S,WX),0.5);
XX:=CROSS(SUM(X,WS),0.5);
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,10,1),COLORGREEN;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,10,1),COLORRED;
DRAWTEXT(SS,LOW,'做多-----'),COLORYELLOW;
DRAWTEXT(XX,HIGH,'做空----'),COLORYELLOW;
HX:=HHV(HIGH,1);
LX:=LLV(LOW,1);
H1:=IFELSE(HX<REF(HX,1) && HX<REF(HX,2) && HX<REF(HX,4) && LX<REF(LX,1) && LX<REF(LX,3) && LX<REF(LX,5) && OPEN>CLOSE && (HHV(OPEN,0)-CLOSE)>0,REF(HX,4),0);
L1:=IFELSE(LX>REF(LX,1) && LX>REF(LX,3) && LX>REF(LX,5) && HX>REF(HX,1) && HX>REF(HX,2) && HX>REF(HX,4) && OPEN<CLOSE && (CLOSE-LLV(OPEN,0))>0,REF(LX,4),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,H2,L2);
G1:=VALUEWHEN(ISLASTBAR,G);
DRAWNUMBER(LX>0,G1,G1,0),COLORMAGENTA;
TMP:=K2;
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1,HIGH,W1=1,HT,0),COLORGREEN;
DRAWLINE(W1=1,LOW,W1=1,LT,0),COLORGREEN;
DRAWLINE(W1=-3,HIGH,W1=-3,HT,0),COLORRED;
DRAWLINE(W1=-3,LOW,W1=-3,LT,0),COLORRED;
STICKLINE(W1>0,OPEN,CLOSE,10,1),COLORGREEN;
STICKLINE(W1<=0,OPEN,CLOSE,10,1),COLORRED;
STICKLINE(W2>0 && W1<=0,OPEN,CLOSE,10,0),COLORRED;
STICKLINE(W2>0 && W1>0,OPEN,CLOSE,10,0),COLORGREEN;
DRAWLINE(TMP=1 && REF(TMP,1)=1,G,TMP=1 && REF(TMP,1)=1,REF(G,1),0),COLORBLUE,LINETHICK4;
DRAWLINE(TMP=-3 && REF(TMP,1)=-3,G,TMP=-3 && REF(TMP,1)=-3,REF(G,1),0),COLORRED,LINETHICK4;
DRAWSL(K2=1,G,0,1,0),COLORBLUE;
DRAWSL(K2=-3,G,0,1,0),COLORRED;
DRAWTEXT(CROSS(TMP,0),HX,'方向空-------'),COLORYELLOW,FONTSIZE12;
DRAWTEXT(CROSS(0,TMP),LX,'方向多-------'),COLORYELLOW,FONTSIZE12;
VV:=(3*C+H+L+ O )/6;
DUAN:(8*VV+7*REF(VV,1)+6*REF(VV,2)+5*REF(VV,3)+4*REF(VV,4)+3*REF(VV,5)+2*REF(VV,6)+REF(VV,7))/36,COLORRED;
ZONG:(LLV(DUAN,3)+LLV(DUAN,5)+LLV(DUAN,8))/3,COLORGREEN;
OCH:=MAX(OPEN,CLOSE);
OCL:=MIN(OPEN,CLOSE);
QQ:=C;
A1:=REF(QQ,10)=HHV(QQ,2*10+1);
B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(QQ,10)=LLV(QQ,2*10+1);
B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
?A :=REF(C,BARSLAST(HD));
B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) && NOT(HD);
T2:=BARSLAST(HD)>BARSLAST(LD) && NOT(LD);
壓力:IF(T1, A , A ),COLORBLUE,POINTDOT,LINETHICK1;
支撐:IF(T2,B,B),COLORRED,POINTDOT,LINETHICK1; 您好，請勿重復發帖，此類指標不好修改，不少函數不支持。 來源 程序化久久網