咨詢內容：

請老師幫忙修改

?HH1:=IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IFELSE(CLOSE>HH2,-3,IFELSE(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,HH2,LL2);
G1:=VALUEWHEN(ISLASTBAR,G);
//DRAWNUMBER(L>0,G1,G1,0,COLORGREEN),NODRAW;
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1,HIGH,W1=1,HT,COLORGREEN);
DRAWLINE(W1=1,LOW,W1=1,LT,COLORGREEN);
DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED);
DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED);
STICKLINE(W1>0,OPEN,CLOSE,COLORGREEN,1);
STICKLINE(W1<=0,OPEN,CLOSE,COLORRED,1);
STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,COLORRED,0);
STICKLINE(W2>0&&W1>0,OPEN,CLOSE,COLORGREEN,0);
HH:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&L<REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4),H-(H-L)*0.333,H);
LL:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&L<REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4),(H-L)*0.333+L,L);
H1:=IFELSE(H>=REF(H,1)&&H>=REF(H,2)&&H>=REF(H,3)&&H>=REF(H,4)&&?H>REFX(H,1)&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4),HH,0);
L1:=IFELSE(L<=REF(L,1)&&L<=REF(L,2)&&L<=REF(L,3)&&L<=REF(L,4)&&?L<REFX(L,1)&&L<REFX(L,2)&&L<REFX(L,3)&&L<REFX(L,4),LL,0);
H2:=BARSLAST(H1);
L2:=BARSLAST(L1);
H3:=REFX(REF(H1,H2),2);
L3:=REFX(REF(L1,L2),2);
H4:=ZIGZAG(H3,0,0);
L4:=ZIGZAG(L3,0,0);
H5:=VALUEWHEN(H4<REF(H4,1)&&REF(H4,1)>REF(H4,2),HH);
L5:=VALUEWHEN(L4>REF(L4,1)&&REF(L4,1)<REF(L4,2),LL);
POLYLINE(H5>0,H5,COLORBLUE),LINETHICK3;
POLYLINE(L5>0,L5,COLORRED),LINETHICK3;
DRAWNUMBER(H5<>REF(H5,1),H5,H5-L5,0,COLORCYAN),VALIGN2,FONTSIZE25;
DRAWNUMBER(L5<>REF(L5,1),L5,H5-L5,0,COLORMAGENTA),VALIGN0,FONTSIZE25;
D:=VALUEWHEN(ISLASTBAR,H5);
E:=VALUEWHEN(ISLASTBAR,L5);
DRAWNUMBER(LOW>0,D,D,2,COLORYELLOW);
DRAWNUMBER(LOW>0,E,E,2,COLORYELLOW);
//DRAWTEXT(CROSS(CLOSE,H5)||CROSS(CLOSE,L5),L,'★'),COLORWHITE,VALIGN0,ALIGN1,FONTSIZE30;
//DRAWTEXT(CROSS(H5,CLOSE)||CROSS(L5,CLOSE),H,'●'),VALIGN2,ALIGN1,FONTSIZE30;
?

?

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

博易技術人員： HH1:=IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IFELSE(CLOSE>HH2,-3,IFELSE(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,HH2,LL2);
G1:=VALUEWHEN(ISLASTBAR,G);
//DRAWNUMBER(L>0,G1,G1,0,COLORGREEN),NODRAW;
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);

STICKLINE(W1>0,OPEN,CLOSE,8,1),COLORGREEN;
STICKLINE(W1<=0,OPEN,CLOSE,8,1),COLORRED;
STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,8,0),COLORRED;
STICKLINE(W2>0&&W1>0,OPEN,CLOSE,8,0),COLORGREEN;
HH:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&L<REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4),H-(H-L)*0.333,H);
LL:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&L<REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4),(H-L)*0.333+L,L);
H1:=IFELSE(H>=REF(H,1)&&H>=REF(H,2)&&H>=REF(H,3)&&H>=REF(H,4)&& H>REFX(H,1)&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4),HH,0);
L1:=IFELSE(L<=REF(L,1)&&L<=REF(L,2)&&L<=REF(L,3)&&L<=REF(L,4)&& L<REFX(L,1)&&L<REFX(L,2)&&L<REFX(L,3)&&L<REFX(L,4),LL,0);
H2:=BARSLAST(H1);
L2:=BARSLAST(L1);
H3:=REFX(REF(H1,H2),2);
L3:=REFX(REF(L1,L2),2);
H4:=ZIG(H3,0,0);
L4:=ZIG(L3,0,0);
H5:=VALUEWHEN(H4<REF(H4,1)&&REF(H4,1)>REF(H4,2),HH);
L5:=VALUEWHEN(L4>REF(L4,1)&&REF(L4,1)<REF(L4,2),LL);
POLYLINE(H5>0,H5),COLORBLUE,LINETHICK3;
POLYLINE(L5>0,L5),COLORRED,LINETHICK3;
DRAWNUMBER(H5<>REF(H5,1),H5,H5-L5,0),COLORCYAN,VALIGN2,FONTSIZE15;
DRAWNUMBER(L5<>REF(L5,1),L5,H5-L5,0),COLORMAGENTA,VALIGN0,FONTSIZE15;
D:=VALUEWHEN(ISLASTBAR,H5);
E:=VALUEWHEN(ISLASTBAR,L5);
DRAWNUMBER(LOW>0,D,D,2),COLORYELLOW;
DRAWNUMBER(LOW>0,E,E,2),COLORYELLOW; 來源 程序化久久網