请老师帮忙把下面显示的指标改成可自动买卖的模型谢谢! (文华财经WH8赢智V8.2)

投资者咨询:请老师帮忙把下面显示的指标改成可自动买卖的模型谢谢! (文华财经WH8赢智V8.2)
来源:文华财经  日期:2019-4-14 21:25
 请老师帮忙把下面显示的指标改成可自动买卖的模型谢谢!变红色时改为Bpk,变蓝改为spk 白色出击位置改为 加仓或者减仓  其余多余请帮忙删掉 谢谢!

S:=HIGH;

M:=LOW;

HH1:=IF(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);

LL1:=IF(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:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));

K2:=VALUEWHEN(K1<>0,K1);

G:=IF(K2=1,HH2,LL2);

G1:=VALUEWHEN(ISLASTBAR,G);

DRAWNUMBER(L>0,G1,G1,0,COLORCYAN);

W1:=K2;

W2:=OPEN-CLOSE;

HT:=IF(OPEN>CLOSE,OPEN,CLOSE);

LT:=IF(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:=IF(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:=IF(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:=IF(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:=IF(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);

DRAWTEXT(CROSS(CLOSE,H5),H5,'出击');

DRAWTEXT(CROSS(L5,CLOSE),L5,'出击');


技术人员回复
日期:2019-4-15 8:03

白色出击是指白线?白线计算使用了未来函数,不能和指令连用,所以去掉了,其余部分参考:

 

S:=HIGH;


M:=LOW;


HH1:=IF(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);


LL1:=IF(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:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));


K2:=VALUEWHEN(K1<>0,K1);


G:=IF(K2=1,HH2,LL2);


G1:=VALUEWHEN(ISLASTBAR,G);


DRAWNUMBER(L>0,G1,G1,0,COLORCYAN);


W1:K2;


W2:OPEN-CLOSE;


HT:=IF(OPEN>CLOSE,OPEN,CLOSE);


LT:=IF(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);


W1>0,SPK;
W1<=0,BPK;
AUTOFILTER;