A函数连续发单的问题？很头痛

liq77

Begin
      
   M=Trunc((CurrentCapital*0.05)/(Open*ContractUnit()*BigPointValue()*MarginRatio()));
       
  If(A_BuyPosition>0)
  
            {  SetTBProfileString(Symbol,"var",Text(1)); }
       
        Else  If(A_BuyPosition==0)
       
        {  SetTBProfileString(Symbol,"var",Text(0));  }
       
//多头建仓                 
       
             if( con1 && Value(GetTBProfileString(Symbol,"var"))!=1 )
                       
        {  SetTBProfileString(Symbol,"var",Text(1));
       
              A_SendOrder(enum_buy,Enum_Entry,M,Q_AskPrice());

                        SetTBProfileString(Symbol,"Position",Text(M));}

      。。。。。。

上面这段代码在模拟实盘测试中，根据行情速度的快慢，会同信号连续发2－3单，最多的连续发4单，结果持仓多出1－3倍，在交易设置里“不允许连续建仓”也无法避免，很头痛不知怎样解决，望管理员和各位大侠帮忙，先谢过！

lh948

A函数与交易设置没有关系，用A函数要控制发单，可以配合全局变量或者写数据库实现，请看：
http://tradeblazer.net/forum/thread-8931-1-1.html

liq77

谢谢回复，祝你中秋愉快！

。。。。。。
2.A_SendOrder
使用全局变量计数，并且在判断条件中加入这个全局变量和限制交易次数做比较
if( date!=date[1] )
{
     SetGlobalVar(0,0);
}
if( con1 && GetGlobalVar(0)<=3 )
{
     A_SendOrder(省略);
     SetGlobalVar(0,GetGlobalVar(0)+1);

看了上面提供的例子，似乎还是有漏洞的。例如：在当天第一根K线时如果CON1得到满足，就会连续发单！直到资金用完。因为不管你将VAR设置成什么值，只要来下一个TICK时指令一循环， GlobalVar就又被置零了，因为 date!=date[1]。而且根据TB的运行机制，如果盘中发单后网络断线，那么指令从头再来一遍，VAR就又被置零了，于是再接着发单。

mathboy

请问下这个到底是因为什么啊？看了代码觉得不应该连续发单啊，不是有 SetTBProfileString(Symbol,"var",Text(1)语句来控制第二次进入此条件么？