管理員救命.單程序老出問題,老會多補(bǔ)一手,然后平掉. [開拓者 TB]
作者:
開拓者 TB 來源:
cxh99.com 發(fā)布時間:2012年05月15日 點擊數(shù):
【
收藏到本網(wǎng)的會員中心】
- 咨詢內(nèi)容:
sjdc=A_buyPosition;
sjkc=A_SellPosition;
FileAppend("D:\\false.txt","實際多倉校驗前"+Text(sjdc));
FileAppend("D:\\false.txt","實際多倉校驗前"+Text(sjkc));
If(sjdc!=InvalidNumeric and sjkc!=InvalidNumeric)
{ If(A_GetOpenOrderCount()>0 )// and (CurrentTime-A_OpenOrderTime(0))*1000000>2
{FileAppend("D:\\false.txt","未成交掛單前"+Text(A_GetOpenOrderCount()));
A_DeleteOrder(A_OpenOrderContractNo());
}
FileAppend("D:\\false.txt","未成交掛單后"+Text(A_GetOpenOrderCount()));
If(A_GetOpenOrderCount()==0 )
{if(MyRealMP>=0)
{If(sjkc>0)
{A_SendOrder(Enum_buy,Enum_Exit,sjkc,Q_askPrice);
}else
If(sjdc>MyRealMP*EveryLots)
{ A_SendOrder(Enum_sell,Enum_Exit,sjdc-MyRealMP,Q_BidPrice);
}else
if(sjdc<MyRealMP*EveryLots)
{A_SendOrder(Enum_buy,Enum_Entry,MyRealMP-sjdc,Q_AskPrice);
}
}
IF(MyRealMP<0)
{If(sjdc>0)//實際多倉,A_sellpositon==NA
{A_SendOrder(Enum_Sell,Enum_Exit,sjdc,Q_BidPrice);
}else
if(sjkc>Abs(MyRealMP)*EveryLots)
{A_SendOrder(Enum_buy,Enum_Exit,sjkc-Abs(MyRealMP),Q_AskPrice);
}else
if(sjkc<Abs(MyRealMP)*EveryLots)
{A_SendOrder(Enum_Sell,Enum_Entry,Abs(MyRealMP)-sjkc,Q_BidPrice);
}
}
}
}
FileAppend("D:\\false.txt","實際多倉校驗后"+Text(A_buyPosition));
FileAppend("D:\\false.txt","實際多倉校驗后"+Text(A_buyPosition));
- TB技術(shù)人員:
交易的時候該補(bǔ)1手多單,老是會先開2手多單,再平掉1手。或者先開3手再平2手。有時候是正常的