如何编写加仓命令！

nopain

看起来代码没有问题，您用FileAppend函数调试一下，确认是否执行到加仓的代码
代码如下:

1. if (BarStatus == 2 and MarketPosition == -1)
   
2. {
   
3.         extryLots=A_FreeMargin /(Q_AskPrice*ContractUnit*MarginRatio);
   
4.         extryLots  = IntPart(extryLots );
   
5.         if(condtion and Time<0.144500 )
   
6.         {
   
7.                FileAppend("C:\\Formula.log","Date_lastbar="+Text(Date)+",Time_lastbar="+Text(100*Time)+",extryLots="+Text(extryLots));
   
8.                SellShort( extryLots  ,Close,True);
   
9.         }
   
10. }Else If(BarStatus <> 2 and MarketPosition == -1 )
    
11. {
    
12.         extryLots=CurrentCapital/(Close*ContractUnit*MarginRatio);
    
13.         extryLots  = IntPart(extryLots ); // 取整
    
14.         if(condtion and Time<0.144500 )                       
    
15.         {
    
16.                FileAppend("C:\\Formula.log","Date="+Text(Date)+",Time="+Text(100*Time)+",extryLots="+Text(extryLots));
    
17.                SellShort( extryLots  ,Close,True);
    
18.         }
    
19. }

复制代码

[ 本帖最后由 nopain 于 2007-9-14 12:07 编辑 ]