投资者咨询:想请老师把这个策略改成文华的代码 (文华财经WH8赢智V8.2)
来源:文华财经 日期:2018-8-4 15:12
INPUT:N1(10,1,100,1),N2(10,1,100,1)N3(4,2,100,1),SS(1,1,10000,1);
VARIABLE:交易次数:=0;//为了便于统计 开平1次后 交易次数为2
昨高:=CALLSTOCK(STKLABEL,VTHIGH,6,-1);//昨高
昨低:=CALLSTOCK(STKLABEL,VTLOW,6,-1);//昨低
昨收:=CALLSTOCK(STKLABEL,VTCLOSE,6,-1);//昨收
上轨:昨高;
下轨:昨低;
手数:=SS;
//条件
开多条件:=C>上轨;
开空条件:=C<下轨;
多头止损条件:=C<ENTERPRICE-N1*MINDIFF AND TIME<145500;
空头止损条件:=C>ENTERPRICE+N2*MINDIFF AND TIME<145500;
//交易系统
IF TIME>090000 AND TIME<145000 AND 交易次数<=N3 THEN BEGIN
开多:BUY(开多条件 AND HOLDING=0,手数,MARKET);
开空:BUYSHORT(开空条件 AND HOLDING=0,手数,MARKET);
交易次数:=交易次数+1;
END
//止损
IF 多头止损条件 AND HOLDING>0 THEN BEGIN
多头止损:SELL(1,手数,MARKET);
交易次数:=交易次数+1;
END
IF 空头止损条件 AND HOLDING<0 THEN BEGIN
空头止损:SELL(1,手数,MARKET);
交易次数:=交易次数+1;
END
IF TIME>=145000 THEN BEGIN
收盘平多:SELL(1,手数,MARKET);
收盘平空:SELLSHORT(1,手数,MARKET);
交易次数:=0;
END
技术人员回复
日期:2018-8-4 16:53
SS:1;
N1:=10;
N2:=10;
N3:=4;
N:=BARSLAST(DATE<>REF(DATE,1))+1;
昨高:=REF(HHV(H,N),N);
昨低:=REF(LLV(L,N),N);
昨收:=REF(C,N);
上轨:昨高;
下轨:昨低;
手数:=SS;
交易次数:=COUNTSIG(BK,DAYBARPOS)+COUNTSIG(SK,DAYBARPOS);
C>上轨&&TIME>0900&&TIME<1450&&交易次数<=N3,BK;
C<下轨&&TIME>0900&&TIME<1450&&交易次数<=N3,SK;
BKVOL>0&&C<BKPRICE-N2*MINPRICE&&TIME<1450,SP;
SKVOL>0&&C>SKPRICE+N2*MINPRICE&&TIME<1450,BP;
AUTOFILTER;
CLOSEMINUTE<=10,CLOSEOUT;
CLOSEKLINE(1,10);
N1:=10;
N2:=10;
N3:=4;
N:=BARSLAST(DATE<>REF(DATE,1))+1;
昨高:=REF(HHV(H,N),N);
昨低:=REF(LLV(L,N),N);
昨收:=REF(C,N);
上轨:昨高;
下轨:昨低;
手数:=SS;
交易次数:=COUNTSIG(BK,DAYBARPOS)+COUNTSIG(SK,DAYBARPOS);
C>上轨&&TIME>0900&&TIME<1450&&交易次数<=N3,BK;
C<下轨&&TIME>0900&&TIME<1450&&交易次数<=N3,SK;
BKVOL>0&&C<BKPRICE-N2*MINPRICE&&TIME<1450,SP;
SKVOL>0&&C>SKPRICE+N2*MINPRICE&&TIME<1450,BP;
AUTOFILTER;
CLOSEMINUTE<=10,CLOSEOUT;
CLOSEKLINE(1,10);