管理員救命.單程序老出問題,老會(huì)多補(bǔ)一手,然后平掉. [開拓者 TB]
作者:
開拓者 TB 來(lái)源:
cxh99.com 發(fā)布時(shí)間:2012年05月15日 點(diǎn)擊數(shù):
【
收藏到本網(wǎng)的會(huì)員中心】
- 咨詢內(nèi)容:
sjdc=A_buyPosition;
sjkc=A_SellPosition;
FileAppend("D:\\false.txt","實(shí)際多倉(cāng)校驗(yàn)前"+Text(sjdc));
FileAppend("D:\\false.txt","實(shí)際多倉(cāng)校驗(yàn)前"+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)//實(shí)際多倉(cāng),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","實(shí)際多倉(cāng)校驗(yàn)后"+Text(A_buyPosition));
FileAppend("D:\\false.txt","實(shí)際多倉(cāng)校驗(yàn)后"+Text(A_buyPosition));
- TB技術(shù)人員:
交易的時(shí)候該補(bǔ)1手多單,老是會(huì)先開2手多單,再平掉1手。或者先開3手再平2手。有時(shí)候是正常的