投资者咨询：竹线变色 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2019-4-16 14:28
请帮把下面的K线变成BAR，颜色随着下面的变动，先谢谢您啦
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,COLORCYAN);
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1,HIGH,W1=1,HT,COLORCYAN);
DRAWLINE(W1=1,LOW,W1=1,LT,COLORCYAN);
DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED);
DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED);
STICKLINE(W1>0,OPEN,CLOSE,COLORCYAN,1);
STICKLINE(W1<=0,OPEN,CLOSE,COLORRED,1);
STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,COLORRED,0);
STICKLINE(W2>0&&W1>0,OPEN,CLOSE,COLORCYAN,0);
DRAWLINE(W1=1&&REF(W1,1)=1,G,W1=1&&REF(W1,1)=1,REF(G,1),COLORGREEN);
DRAWLINE(W1=-3&&REF(W1,1)=-3,G,W1=-3&&REF(W1,1)=-3,REF(G,1),COLORYELLOW);
DRAWSL(K2=1,G,0,1,0,COLORGREEN);
DRAWSL(K2=-3,G,0,1,0,COLORYELLOW);
HH:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&L<REF(L,1)&&L<REF(L,2)
&&L<REF(L,3)&&L<REF(L,4)&&L<REF (L,5),H-(H-L)*0.333,H);
LL:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&L<REF(L,1)&&L<REF(L,2)
&&L<REF(L,3)&&L<REF(L,4)&&L<REF (L,5),(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>=REF(H,5)&& H>REFX(H,1)
&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4) &&H>REFX(H,5),HH,0);
L1:=IFELSE(L<=REF(L,1)&&L<=REF(L,2)&&L<=REF(L,3)&&L<=REF(L,4)&&L<=REF(L,5)&& L<REFX(L,1)
&&L<REFX(L,2)&&L<REFX(L,3)&&L<REFX(L,4) &&L<REFX(L,5),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,COLORWHITE);
POLYLINE(L5>0,L5,COLORWHITE);
DRAWNUMBER(H5<>REF(H5,1),H5,H5-L5,0,COLORMAGENTA);
DRAWNUMBER(L5<>REF(L5,1),L5,H5-L5,0,COLORMAGENTA);
D:=VALUEWHEN(ISLASTBAR,H5);
E:=VALUEWHEN(ISLASTBAR,L5);
DRAWNUMBER(LOW>0,D,D,0,COLORWHITE);
DRAWNUMBER(LOW>0,E,E,0,COLORWHITE);
技术人员回复
日期:2019-4-16 14:33
参考；
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,COLORCYAN);
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1&&REF(W1,1)=1,G,W1=1&&REF(W1,1)=1,REF(G,1),COLORGREEN);
DRAWLINE(W1=-3&&REF(W1,1)=-3,G,W1=-3&&REF(W1,1)=-3,REF(G,1),COLORYELLOW);
DRAWSL(K2=1,G,0,1,0,COLORGREEN);
DRAWSL(K2=-3,G,0,1,0,COLORYELLOW);
HH:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&L<REF(L,1)&&L<REF(L,2)
&&L<REF(L,3)&&L<REF(L,4)&&L<REF (L,5),H-(H-L)*0.333,H);
LL:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&L<REF(L,1)&&L<REF(L,2)
&&L<REF(L,3)&&L<REF(L,4)&&L<REF (L,5),(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>=REF(H,5)&& H>REFX(H,1)
&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4) &&H>REFX(H,5),HH,0);
L1:=IFELSE(L<=REF(L,1)&&L<=REF(L,2)&&L<=REF(L,3)&&L<=REF(L,4)&&L<=REF(L,5)&& L<REFX(L,1)
&&L<REFX(L,2)&&L<REFX(L,3)&&L<REFX(L,4) &&L<REFX(L,5),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,COLORWHITE);
POLYLINE(L5>0,L5,COLORWHITE);
DRAWNUMBER(H5<>REF(H5,1),H5,H5-L5,0,COLORMAGENTA);
DRAWNUMBER(L5<>REF(L5,1),L5,H5-L5,0,COLORMAGENTA);
D:=VALUEWHEN(ISLASTBAR,H5);
E:=VALUEWHEN(ISLASTBAR,L5);
DRAWNUMBER(LOW>0,D,D,0,COLORWHITE);
DRAWNUMBER(LOW>0,E,E,0,COLORWHITE);
CC:=W1>0||W2>0&&W1>0,NODRAW;
RR:W1<=0||W2>0&&W1<=0,NODRAW;
DRAWSL(ISUP&&CC,O,0,-0.35,0,COLORCYAN),LINETHICK2;
DRAWSL(ISUP&&CC,C,0,0.35,0,COLORCYAN),LINETHICK2;
DRAWSL(ISDOWN&&CC,O,0,-0.35,0,COLORCYAN),LINETHICK2;
DRAWSL(ISDOWN&&CC,C,0,0.35,0,COLORCYAN),LINETHICK2;
DRAWSL(ISEQUAL&&CC,O,0,-0.35,0,COLORCYAN),LINETHICK2;
DRAWSL(ISEQUAL&&CC,C,0,0.35,0,COLORCYAN),LINETHICK2;
DRAWLINE(ISUP&&CC,L,ISUP,H,COLORCYAN),LINETHICK2;
DRAWLINE(ISDOWN&&CC,H,ISDOWN,L,COLORCYAN),LINETHICK2;
DRAWLINE(ISEQUAL&&CC,H,ISEQUAL,L,COLORCYAN),LINETHICK2;
DRAWSL(ISUP&&RR,O,0,-0.35,0,COLORRED),LINETHICK2;
DRAWSL(ISUP&&RR,C,0,0.35,0,COLORRED),LINETHICK2;
DRAWSL(ISDOWN&&RR,O,0,-0.35,0,COLORRED),LINETHICK2;
DRAWSL(ISDOWN&&RR,C,0,0.35,0,COLORRED),LINETHICK2;
DRAWSL(ISEQUAL&&RR,O,0,-0.35,0,COLORRED),LINETHICK2;
DRAWSL(ISEQUAL&&RR,C,0,0.35,0,COLORRED),LINETHICK2;
DRAWLINE(ISUP&&RR,L,ISUP,H,COLORRED),LINETHICK2;
DRAWLINE(ISDOWN&&RR,H,ISDOWN,L,COLORRED),LINETHICK2;
DRAWLINE(ISEQUAL&&RR,H,ISEQUAL,L,COLORRED),LINETHICK2;
