以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  关于多账号分批买入  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=33995)
--  作者：soler
--  发布时间：2012/12/25 9:28:16
--  关于多账号分批买入

我是机构版用户，系统自带多账户买入功能，但不够灵活，我想用for 循环实现多账户买入，采用的是1秒轮询后天，基本代码如下，

  if extgbdata(\'m1\')<5 and islastbar then BEGIN
     for i=1 to 账号数 do begin
      tbuy(1,2,lmt,rc,0,账号[i],\'\');
     end;
     extgbdataset(\'m1\',extgbdata(\'m1\')+1);
  end;

但由始至终，只有第一个账号在买入，是否金字塔做了限制，还是我的程序有问题
--  作者：jinzhe
--  发布时间：2012/12/25 9:39:41
--  

直接枚举

tbuy();账号1

TBUY;账号2

TBUY；账号3
--  作者：soler
--  发布时间：2012/12/25 9:42:25
--  

是这样写？

 

 if extgbdata(\'m1\')<5 and islastbar then BEGIN
for i=1 to 账号数 do begin
tbuy(1,2,lmt,rc,0,\'\',\'\');账号[i]
end;
extgbdataset(\'m1\',extgbdata(\'m1\')+1);
end;
--  作者：soler
--  发布时间：2012/12/25 9:46:52
--  

问题是每个账号下单数量不一样，怎么枚举
--  作者：jinzhe
--  发布时间：2012/12/25 9:51:25
--  

tbuy(1,手数1,mkt,0,0,\'账号1\')

tbuy(1,手数2,mkt,0,0,\'账号2\')

这样枚举
--  作者：soler
--  发布时间：2012/12/25 9:54:21
--  

也就说在for 循环里不能加入tbuy函数是不是？
--  作者：jinzhe
--  发布时间：2012/12/25 10:08:08
--  

想了下，还是要用账户组下单的功能，枚举的话不能实现
--  作者：soler
--  发布时间：2012/12/25 10:25:20
--  

是不是金字塔做了限制？ 问题是账户组很不灵活，必须是整数倍， 就没有其他办法可以在后台控制 多账号分批买入吗？
--  作者：jinzhe
--  发布时间：2012/12/25 10:27:56
--  
主要是一根k线只能做一次tbuy，所以不论怎么循环都是第一个才下单
--  作者：soler
--  发布时间：2012/12/25 10:49:41
--  
用vba写程序 买入 可以解除1根k线只能有一个buy吗？