请老师帮忙写一下清仓指令

105093

请帮忙写一天三时段的清仓
1.在夜盘内盈亏大于或者小于总资金的1%就清仓否则就继续持仓，清仓后夜盘内不再开仓；清仓指令带开关参数
2.早盘开盘后继续开平仓，早盘内盈亏大于或小于总资金的1%就清仓否则就继续持仓，清仓后早盘内就不再开仓；清仓指令带开关参数
3.午盘开盘后继续开平仓，午盘内盈亏大于或小于总资金的1%就清仓否则就继续持仓，清仓后午盘内就不再开仓；清仓指令带开关参数
4.到14:59分 无条件全部清仓。

资深技术02

if (currenttime>210000 or currenttime<050000) and TACCOUNT( 4)/TACCOUNT( 6)<-1/100 and EXTGBDATA('夜盘' )=0 then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('夜盘',1);
END


if (currenttime>090000 and currenttime<120000) and TACCOUNT( 4)/TACCOUNT( 6)<-1/100 and EXTGBDATA('早盘' )=0 then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('早盘',1);
END

if (currenttime>120000 and currenttime<150000) and TACCOUNT( 4)/TACCOUNT( 6)<-1/100 and EXTGBDATA('午盘' )=0 then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('午盘',1);
END


if currenttime>145900 then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('夜盘',0);
        EXTGBDATASET('早盘',0);
        EXTGBDATASET('午盘',0);
END


开仓条件根据判断EXTGBDATA('午盘' )这个 是否等于0，等于0才能开仓，如果等于1说明执行过平仓就不再开仓

105093

谢谢

105093

需要把时间换成金字塔时间吗？

资深技术02

不用这个currenttime是电脑时间，和金字塔无关的

105093

这几个平仓为什么会触发186行和187行？

资深技术02

cond:tsellholding(1)>0 or tbuyholding(1)>0;

if (currenttime>210000 or currenttime<050000) and TACCOUNT( 4)/TACCOUNT( 6)<-1/100 and EXTGBDATA('夜盘' )=0 and cond then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('夜盘',1);
END


if (currenttime>090000 and currenttime<120000) and TACCOUNT( 4)/TACCOUNT( 6)<-1/100 and EXTGBDATA('早盘' )=0 and cond then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('早盘',1);
END

if (currenttime>120000 and currenttime<150000) and TACCOUNT( 4)/TACCOUNT( 6)<-1/100 and EXTGBDATA('午盘' )=0 and cond then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('午盘',1);
END


if currenttime>145900 and currenttime<=150000 and cond then
begin
        tsell(tsellholding(1)>0,0,mkt);
        tsellshort(tbuyholding(1)>0,0,mkt);
        EXTGBDATASET('夜盘',0);
        EXTGBDATASET('早盘',0);
        EXTGBDATASET('午盘',0);
END

105093

1.我设置 浮盈/动态权益>1% ，但是没有被触发。
2.下午14:59收盘无条件平仓没有触发。
if (currenttime>120000 and currenttime<150000) and TACCOUNT( 4)/TACCOUNT( 6)>1/100 and EXTGBDATA('午盘' )=0 and cond then
begin
        tsell(1,0,mkt);
        tsellshort(1,0,mkt);
        EXTGBDATASET('午盘',1);
END

资深技术02

用debugfile输出条件看下呢
我们使用后台是一定要掌握这种调试方法的
  DEBUGFILE('D:\TEST.TXT','当前时间为%.2f',currenttie);

  DEBUGFILE('D:\TEST.TXT','当前tacount(6)为%.2f',TACCOUNT( 6));


把所有条件都给输出看下

105093

1.当日14:59分无条件清仓没有触发
2.浮盈/总权益>1%条件触发 有两个问题，
  a.条件触发后，策略会继续开仓
  b.因为持仓30多个品种，清仓不是一下完成，平了一半后，浮盈减少了就满足不了条件，清仓就停止了。所以这里是不是应该是（浮盈+平仓盈亏）/总权益 或者 直接用总权益来计算？