- 精华
- 0
- 在线时间
- 95 小时
- UID
- 227607
- 积分
- 91
- 帖子
- 58
- 阅读权限
- 30
- 注册时间
- 2016-1-29
- 最后登录
- 2016-9-9
- 精华
- 0
- UID
- 227607
- 积分
- 91
- 帖子
- 58
- 主题
- 22
- 阅读权限
- 30
- 注册时间
- 2016-1-29
- 最后登录
- 2016-9-9
|
小米老师,我按您的要求,写了如下程序,然后打开超级图表,启动自动交易,加载如下策略,马上就死机;如果不先启动自动交易,直接加载策略,也是立即死机.小米老师,请务必回复.没有for 循环,撤单老是出错误信息.
if(A_GetOpenOrderCount()>0 and BarStatus==2)
{
nCount1 = A_GetOpenOrderCount;
if(nCount1>0)
{
for i=1 to nCount1
{
nEntryFlag = A_OpenOrderEntryOrExit(i);
nBuyOrSell = A_OpenOrderBuyOrSell(i);
OrderPrice = A_OpenOrderPrice(i);
strContractNo =A_OpenOrderContractNo(i);
If( nEntryFlag==Enum_Entry )
{
if( nBuyOrSell==Enum_Buy and Q_AskPrice>OrderPrice+MinMove*PriceScale)
{
A_DeleteOrder(strContractNo);
}
if( nBuyOrSell==Enum_Sell and Q_BidPrice<OrderPrice-MinMove*PriceScale)
{
A_DeleteOrder(strContractNo);
}
}
If( nEntryFlag==Enum_Exit )
{
if( nBuyOrSell==Enum_Buy and Q_AskPrice>OrderPrice)
{
A_DeleteOrder(strContractNo);
}
if( nBuyOrSell==Enum_Sell and Q_BidPrice<OrderPrice)
{
A_DeleteOrder(strContractNo);
}
}
}
}
}
|
|