求解答，为何我设计的日内交易系统总是不能在收盘前平仓

slarkmonk

一分钟的周期也试过了，不行，现在用的五分钟周期，貌似还是不行。
附上程序 求高人解答


Params   
        Numeric endTime(14.55);                     //结束交易时间
    Numeric RiskRatio(1);                       //风险率(0-100)
    Numeric boLength(18);                       //突破周期
    Numeric ATRLength(20);                      //平均波动周期
        Numeric Quitlength(10);                     //离市周期
        Numeric weightnumber(1);                    //加权参数
        Numeric Limitednumber(3);                   //交易限制次数(能交易的次数为limitednumber+1次)
    Bool Filtercondition(True);                 //入市过滤条件
Vars
    Numeric Minpoint;                           //最小变动单位
        NumericSeries AvgTR;                        //ATR
        Numeric F;                                  //表示市场波动性的F值
        Numeric Capital;                            //入市资本
        Numeric scale;                              //买卖规模
        NumericSeries Passwayhi;                    //通道上轨
        NumericSeries Passwaylo;                    //通道下轨
        NumericSeries quithighprice;                //离市时判断需要的离市周期最高价
        NumericSeries quitlowprice;                 //离市时判断需要的离市周期最低价
        Numeric myEntryPrice;                       //开仓价格
        Numeric myExitPrice;                        //平仓价格
        NumericSeries tempnum(0);                   //临时计数器
        Bool Sendorderthisbar(False);               //当前Bar是否有过交易
        NumericSeries preEntryprice(0);             //前一次开仓的价格
Begin
        Minpoint=Minmove*PriceScale;
        AvgTR=XAverage(TrueRange,ATRlength);
        F=weightnumber*AvgTR[1];
        Capital=Portfolio_CurrentCapital()+Portfolio_UsedMargin();
        scale=(Capital*RiskRatio/100)/(F*ContractUnit()*BigPointValue());
        scale=IntPart(scale);
       
        Passwayhi=HighestFC(High[1],boLength);
        Passwaylo=LowestFC(Low[1],boLength);
       
        quitlowprice=LowestFC(Low[1],Quitlength);
        quithighprice=HighestFC(High[1],Quitlength);
       
        Commentary("scale="+Text(scale));
        Commentary("preEntryprice="+Text(preEntryprice));
       
        If(Date!=currentdate)                       //只限于当日交易
        {return;}                                 
        If((Date!=Date[1])or(CurrentBar==0))
        {
        //当日的第一个Bar
        preEntryprice=InvalidNumeric;
        tempnum=Limitednumber;
        return;
        }
       
        If(tempnum[1]<1)
        {
        tempnum=limitednumber;
        }
       
        //开仓
If(time<endtime/100)
{       
        If(MarketPosition==0 And Filtercondition)
        {
            If(High>Passwayhi And scale>=1)
                {
                myEntryPrice=Min(high,passwayhi+minpoint);
                myentryprice=IIF(myentryprice<open,open,myentryprice);
                preentryprice=myentryprice;
                Buy(scale,myentryprice);
                sendorderthisbar=True;
                }
               
                If(Low<passwaylo And scale>=1)
                {
                myentryprice=Max(low,passwaylo-Minpoint);
                myentryprice=IIF(myentryprice>open,open,myentryprice);
                preentryprice=myentryprice;
                SellShort(scale,myentryprice);
                sendorderthisbar=True;
                }
        }
       
       
        If(Marketposition==1)
        {
            Commentary("quitlowprice="+Text(quitlowprice));
                If(Low<quitlowprice)
                {
                    myexitprice=Max(low,quitlowprice-Minpoint);
                        myexitprice=IIF(myexitprice>open,open,myexitprice);
                        Sell(0,myexitprice);
                        tempnum=limitednumber;
                }Else
                {
                    tempnum=tempnum[1];
                        If(preentryprice!=Invalidnumeric And scale>=1)
                        {
                            If((open>=preentryprice+0.5*F) And (tempnum>=1))
                                {
                                    myentryprice=open;
                                        preentryprice=myentryprice;
                                        Buy(scale,myentryprice);
                                        sendorderthisbar=True;
                                        tempnum=tempnum-1;
                                }
                               
                                While((High>=preentryprice+0.5*F) And (tempnum>=1))
                                {
                                    myentryprice=preentryprice+0.5*F;
                                        preentryprice=myentryprice;
                                        Buy(scale,myentryprice);
                                        sendorderthisbar=true;
                                        tempnum=tempnum-1;
                                }
                        }
                       
                        If(low<=preentryprice-2*F And sendorderthisbar==false)
                        {
                        myexitprice=preentryprice-2*F;
                        Sell(0,myexitprice);
                        tempnum=limitednumber;
                        }
                }
        }Else If(marketposition==-1)
        {
            Commentary("quithighprice="+Text(quithighprice));
                If(high>quithighprice)
                {
                    myexitprice=Min(High,quithighprice+Minpoint);
                        myexitprice=IIF(myexitprice<open,open,myexitprice);
                        BuyToCover(0,myexitprice);
                        tempnum=limitednumber;
                }Else
                {   tempnum=tempnum[1];
                    If(preentryprice!=Invalidnumeric And scale>=1)
                        {
                            If((open<=preentryprice-0.5*F) And (tempnum>=1))
                                {
                                    myentryprice=Open;
                                        preentryprice=myentryprice;
                                        SellShort(scale,myentryprice);
                                        sendorderthisbar=True;
                                        tempnum=tempnum-1;
                                }
                               
                                While((Low<=preentryprice-0.5*F) And (tempnum>=1))
                                {
                                    myentryprice=preentryprice-0.5*F;
                                        preentryprice=myentryprice;
                                        SellShort(scale,myentryprice);
                                        sendorderthisbar=True;
                                        tempnum=tempnum-1;
                                }
                        }
                       
                       
                        If(High>=preentryprice+2*F And sendorderthisbar==False)
                        {
                            myexitprice=preentryprice+2*F;
                                BuyToCover(0,myexitprice);
                                tempnum=limitednumber;
                        }
                }
        }
}


If(time>=endtime/100)
{
    If(marketposition==1)
        {
            Sell(0,Q_AskPrice);
        }Else If(marketposition==-1)
        {
            BuyToCover(0,Q_BidPrice);
        }Else
        {
            return;
        }
}
End


前面应该不用看，因为开仓，加仓，都还蛮正常的，唯独平仓有问题，何解？？

欲速不达

回复 1# slarkmonk


     If(marketposition==1)
        {
            Sell(0,close);
        }Else If(marketposition==-1)
        {
            BuyToCover(0,close);
        }Else

slarkmonk

回复 2# 欲速不达

用close不行吧？？不能保证成交
时间和价格都不能保证

lh948

回复 3# slarkmonk


改用价格close，使用Q函数会导致信号消失，历史测试上是不会出现该信号的

slarkmonk

回复 4# lh948

意思是 还是用CLOSE?能行？

lzl563

Q函数不能用于测试。。。。

slarkmonk

回复 6# lzl563

跪求教我一个保证一定能成交的命令，是用sell（0，0）么？还是啥？

slarkmonk

回复 6# lzl563
多问一个问题
那实盘中能否使用Q函数呢？

lzl563

回复 8# slarkmonk


    实盘中可以用吧   也可以加滑点来保证成交吧。。。

lh948

回复 8# slarkmonk


实盘中可以使用Q函数。
close是最新价，一般都可以成交的，
没有100%成交的写法的。

Q函数在历史上是无法测试的。建议使用close替换。