[求助]请老师修改 (文华财经WH6赢顺V6.7)

投资者咨询：[求助]请老师修改 (文华财经WH6赢顺V6.7)

来源:文华财经日期:2018-7-5 0:03

请老师帮助改改成文华

input:K1(0.4,0.1,1,0.1);//多头突破波动比例

input:K2(0.4,0.1,1,0.1);//多头突破波动比例

input:Mday(1,0,9,1);//M日期最大价差

input:Nday(1,0,9,1);//N日前最大价差

input:LOTS(1,0,9,1);

HighD:=callstock(stklabel,vthigh,6,-1);

LowD:=callstock(stklabel,vtlow,6,-1);

CloseD:=callstock(stklabel,vtclose,6,-1);

CYC:=barslast(date<>ref(date,1))+1;

OpenD:=valuewhen(cyc=1,open);

HH:= HHV(HighD,Mday);

HC:= HHV(CloseD,Mday);

LL:= LLV(LowD,Mday);

LC:= LLV(CloseD,Mday);

SellRange:=Max(HH - LC,HC - LL);

HH:=HHV(HighD,Nday);

HC:=HHV(CloseD,Nday);

LL:=LLV(LowD,Nday);

LC:=LLV(CloseD,Nday);

BuyRange:=Max(HH - LC,HC - LL);

UpperBand: OpenD + K1*BuyRange,CIRCLEDOT;

LowerBand: OpenD - K2*SellRange,CIRCLEDOT;

If (HOLDING=0) THEN BEGIN

If (High>=UpperBand) THEN

Buy(HOLDING=0,lots,LIMITR,Max(Open,UpperBand));

If (Low<=LowerBand) THEN

BuyShort(HOLDING=0,lots,LIMITR,Min(Open,LowerBand));

END

If (HOLDING<0) THEN BEGIN

If (High>=UpperBand) THEN BEGIN

SELLSHORT(HOLDING<0,lots,LIMITR,Max(Open,UpperBand));

Buy(HOLDING=0,lots,LIMITR,Max(Open,UpperBand));

END

If (HOLDING>0) THEN BEGIN

If (Low<=LowerBand) THEN BEGIN

Sell(holding>0,lots,limitr,Min(Open,LowerBand));

BuyShort(holding=0,lots,limitr,Min(Open,LowerBand));

END

技术人员回复

日期:2018-7-5 8:20

请参考：

N:=4;

K1:=0.3;

K2:=0.3;

NN:=SUMBARS(DATE<>REF(DATE,1),N);

TN := BARSLAST(DATE <> REF(DATE, 1)) + 1;

HH:=HHV(H,NN);//N日HIGH的最高价

LC:=LLV(C,NN);//N日CLOSE的最低价

HC:=HHV(C,NN);//N日CLOSE的最高价

LL:=LLV(L,NN);//N日LOW的最低价

ZH:=MAX(HH-LC,HC-LL);//计算震荡区间RANGE

开盘价 := VALUEWHEN(TN = 1, OPEN); //今日开盘价

RS:开盘价 +K1*ZH;//上轨

ZS:开盘价 -K2*ZH;//下轨

C>RS,BPK;

C<ZS,SPK;

ISLASTKLINE,CLOSEOUT;

AUTOFILTER;