管理员，反馈bug [复制链接]

cs_tai

初级大户

cap

Rank: 5 Rank: 5

精华: 0
UID: 6222
积分: 1304
帖子: 285
主题: 81
阅读权限: 60
注册时间: 2009-12-20
最后登录: 2019-6-16

电梯直达

1^#

发表于 2011-5-23 09:29:17 |显示全部楼层 |倒序浏览

代码加上If(AccountDataExist == False){Return;}后，A_sendorder不能执行。已经选择账户和可执行商品自动交易。

收藏0

使用道具举报

cs_tai

初级大户

cap

Rank: 5 Rank: 5

精华: 0
UID: 6222
积分: 1304
帖子: 285
主题: 81
阅读权限: 60
注册时间: 2009-12-20
最后登录: 2019-6-16

2^#

发表于 2011-5-23 11:22:35 |显示全部楼层

4.03版本，您试试以下的代码
Params
Numeric RiskRatio(5);
Vars
NumericSeries Ma1;
NumericSeries Ma2;
Numeric lots;
Numeric myprice;
Begin

      If(AccountDataExist == False) Return;
Lots = (A_FreeMargin*RiskRatio/100) /(ContractUnit*BigPointValue*Close*MarginRatio);
      Lots = IntPart(Lots);
Ma1 = Average(Close,30);
      ma2 = Average(Close,10);
      If(A_BuyPosition == 0 && close[1]>Ma1[1] && close[1]>Ma2[1])
      {
   myprice = Q_AskPrice +MinMove*PriceScale;
   A_SendOrder(Enum_Buy,Enum_Entry,lots,myprice);
}
      If(A_BuyPosition != 0 && close[1]<Ma2[1])
{
   myprice = Q_BidPrice - MinMove*PriceScale;
   A_SendOrder(Enum_Sell,Enum_Exit,A_BuyPosition,myprice);
}
      PlotBool("AccountDataExist",AccountDataExist);

End

使用道具举报

cs_tai

初级大户

cap

Rank: 5 Rank: 5

精华: 0
UID: 6222
积分: 1304
帖子: 285
主题: 81
阅读权限: 60
注册时间: 2009-12-20
最后登录: 2019-6-16

3^#

发表于 2011-5-23 14:00:12 |显示全部楼层

//------------------------------------------------------------------------
// 简称: test_A
// 名称: test_A
// 类别: 公式应用
// 类型: 用户应用
// 输出:
//------------------------------------------------------------------------
Params
Numeric RiskRatio(5);
Vars
NumericSeries Ma1;
NumericSeries Ma2;
Numeric lots;
Numeric myprice;
Begin

      If(AccountDataExist == False) Return;
Lots = (A_FreeMargin*RiskRatio/100) /(ContractUnit*BigPointValue*Close*MarginRatio);
      Lots = IntPart(Lots);
Ma1 = Average(Close,30);
      ma2 = Average(Close,10);
      If(A_BuyPosition == 0 && close[1]>Ma1[1] && close[1]>Ma2[1])
      {
   myprice = Q_AskPrice +MinMove*PriceScale;
   A_SendOrder(Enum_Buy,Enum_Entry,lots,myprice);
}
      If(A_BuyPosition != 0 && close[1]<Ma2[1])
{
   myprice = Q_BidPrice - MinMove*PriceScale;
   A_SendOrder(Enum_Sell,Enum_Exit,A_BuyPosition,myprice);
}

   If(A_SellPosition == 0 && close[1]<Ma1[1] && close[1]<Ma2[1])
      {
   myprice = Q_AskPrice -MinMove*PriceScale;
   A_SendOrder(Enum_Sell,Enum_Entry,lots,myprice);
}
      If(A_SellPosition != 0 && close[1]>Ma2[1])
{
   myprice = Q_BidPrice + MinMove*PriceScale;
   A_SendOrder(Enum_Buy,Enum_Exit,A_SellPosition,myprice);
}

      PlotBool("AccountDataExist",AccountDataExist);

End

以上代码只买不卖
AccountDataExist=N/A;bool (True)

使用道具举报