开仓手数，我们将设置成参数按1手来写，可修改参数。
//适用于后台1分钟级别运行
昨收:=callstock(stklabel,vtclose,6,-1);
今开:=valuewhen(todaybar=1,open);
//第一根k开仓
if 今开>昨收*(1+0.5/100) and TBUYHOLDING(1)=0 and todaybar=1 then tbuy(1,1,lmt,close);
if 今开<昨收*(1-0.5/100) and TsellHOLDING(1)=0 and todaybar=1 then tbuyshort(1,1,lmt,close);
//上涨超过1%并且回撤大于0.5，平仓反手,反手后开仓数量是平仓数量2倍
if TBUYHOLDING(1)>0 and hhv(close,tenterbars(0)+1)>tenterprice*(1+1/100) and close<hhv(close,tenterbars(0)+1)*(1-0.5*100) then
begin
tsell(1,TBUYHOLDING(1),lmt,close);
tbuyshort(1,TEXITVOL*2,lmt,close);
END
//止损1%
if TBUYHOLDING(1)>0 and close<tenterprice*(1-1/100) then
begin
tsell(1,TBUYHOLDING(1),lmt,close);
tbuyshort(1,TEXITVOL*2,lmt,close);
END
//空头部分,和多头倒一下
if TsellHOLDING(1)>0 and llv(close,tenterbars(0)+1)<tenterprice*(1-1/100) and close>llv(close,tenterbars(0)+1)*(1+0.5*100) then
begin
tsellshort(1,TsellHOLDING(1),lmt,close);
tbuy(1,TEXITVOL*2,lmt,close);
END
if TsellHOLDING(1)>0 and close>tenterprice*(1+1/100) then
begin
tsellshort(1,TsellHOLDING(1),lmt,close);
tbuy(1,TEXITVOL*2,lmt,close);
END
//尾盘平仓
if time = closetime(4) then
begin
tsellshort(1,TsellHOLDING(1),lmt,close);
tsell(1,TbuyHOLDING(1),lmt,close);
END
二：倍投：用于控制下一笔手数的递增（2）倍率。
三：收盘前全部平仓
编程交易系统策略二：三：这两条分别方便后面修改如果删掉不影响交易系统，一编程正常运行。