初学TB编写公式代码，想请教管理员一个简单代码

ppcoolpig

策略：卖出CU1201一手和买入RB1109一手。
过程：我在超级图表中插入两个商品CU1201和RB1109，插入如下交易指令，竟然出现了四个指令执行提示框：
      平仓买入CU1201一手，开仓买入CU1201一手，平卖出CU1201一手，开仓卖出CU1201一手。理论上应该只有开仓买入CU1201合约一手和开仓卖出RB1109合约一手，为什么会这样呢？
      还有，如果我把指令触发时间设置成0.092800，在09：28时以前启动自动交易程序却不能触发，如果在09：28时以后启动程序才能被触发，这是什么原因呢？

代码：
Params

        Numeric LotsData0(1);   //交易数量
        Numeric LotsData1(1);   //交易数量
        Numeric WinMoney(5000);  //获利点
        Numeric LossMoney(3000); //止损点

Vars

        Numeric preMP;
Begin
        preMP = MarketPosition;   
         // 收盘平仓
        If(preMP!=0 && CurrentTime > 0.145930 && CurrentTime < 0.150000 )
        {
                Sell;
                BuyToCover;
                return;
        }        


              //开盘建仓   
        If(CurrentTime>=0.092800 && CurrentTime<=0.150000)       
        {       
                Data0.SellShort(LotsData0,Data0.Close,true);       
                Data1.Buy(LotsData1,Data1.Close,true);               
        }

       
        //止损止盈
        If(preMP != 0)
        {
                SetProfitTarget(0,WinMoney,True);  //当获利达到WinMoney时执行所有位置的获利平仓       
                SetStopLoss(0,LossMoney,true);     //当亏损达到WinMoney时执行所有位置的止损平仓               
                return;       
        }
End

lh948

回复 1# ppcoolpig


你的问题应该是信号消失的问题，将currenttime改用Time，currenttime和buy、sell使用会产生信号消失的问题。

ppcoolpig

谢谢管理员，我还是弄不明白，一个简单的买或卖指令，在没有持仓的情况的下，为什么还会出现先平仓，然后才能开仓呢？这个多出的平仓指令是怎么回事，再次请教管理员

lh948

回复 3# ppcoolpig


你这是信号消失的问题。
信号消失后，公式（使用buy、sell）不知道你当前是否持仓的。所以会出现信号消失。

ppcoolpig

回复 4# lh948


为了测试是否是CurrentTime与BUY或SELLSHORT引起信号消失的问题，我又换到TBV4平台测试，可问题还是存在，这几天都被这问题困惑死了。
请管理员帮忙测试下，在超级图表中分别插入两个商品CU1201和RB1201，以及插入下面贴出的应用公式，出现信号后执行指令并依次提示：平仓卖出沪铜1201合约，开仓卖出沪铜1201合约，平仓卖出螺纹钢1201合约，开仓卖出螺纹钢1201合约。弄不懂为什么开仓下单会多了平仓的指令啊？请管理员指点下，十分感谢！

代码如下：
Params
    Numeric Para1(10);
    Numeric Para2(5);
Vars
        Bool Condition1;
        Bool Condition2;
Begin

        FileAppend("D:\\TB_V4测试日志.log","日期"+Text(Date)+"时间"+Text(CurrentTime)+"——日志：");
        //品种1
        if(Data0.Close>=Data0.Close[1])
        {
                Data0.Buy(1,Data0.Close);
                FileAppend("D:\\TB_V4测试日志.log","Data0.Buy(1,Close)");
        }else
        {
                Data0.SellShort(1,Data0.Close);
                FileAppend("D:\\TB_V4测试日志.log","Data0.SellShort(1,Close)");               
        }

        //品种2
        if(Data1.Close>=Data1.Close[1])
        {
                Data1.Buy(1,Data1.Close);
                FileAppend("D:\\TB_V4测试日志.log","Data1.Buy(1,Close)");               
        }else
        {
                Data1.SellShort(1,Data1.Close);
                FileAppend("D:\\TB_V4测试日志.log","Data1.SellShort(1,Close)");                       
        }

End