欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 两个系统相互调用持仓量的问题

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有4660人关注过本帖树形打印复制链接

主题：两个系统相互调用持仓量的问题
帅哥哟，离线，有人找我吗？
lc1227
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：66 积分：95 威望：0 精华：0 注册：2012/7/13 8:16:36 		两个系统相互调用持仓量的问题  发帖心情 Post By：2014/9/30 16:57:47    Post IP：124.133.0.118[显示全部帖子]

我两个程序 互相调用 对方的持仓量，软件提示调用超过50次，我按照论坛里的办法修改Option.ini文件，参数设置成500，结果就提示超过500，应该如何解决？


第一个程序 VKONG
MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
HHL:STKINDI('','VDUO.HL',0,22,0);
IF VAR1 THEN BEGIN 
SELLSHORT(1,1,MARKET);
END
IF VAR2 THEN BEGIN 
BUYSHORT(1,1,MARKET);
END
HL:HOLDING;

第二个程序 VDUO
MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
HHL:STKINDI('','VKONG.HL',0,22,0);
IF VAR2 THEN BEGIN 
SELL(1,1,MARKET);
END
IF VAR1 THEN BEGIN 
BUY(1,1,MARKET);
END
HL:HOLDING;

麻烦看一下，我怎么做才能实现相互调用对方的持仓量？
 回到顶部
帅哥哟，离线，有人找我吗？
lc1227
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：66 积分：95 威望：0 精华：0 注册：2012/7/13 8:16:36 		  发帖心情 Post By：2014/10/9 8:50:03    Post IP：124.133.0.118[显示全部帖子]

你好，我试了你给的两个函数，还是搞不明白，能否麻烦把完整的写法写一下？

 回到顶部
帅哥哟，离线，有人找我吗？
lc1227
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：66 积分：95 威望：0 精华：0 注册：2012/7/13 8:16:36 		  发帖心情 Post By：2014/10/9 8:56:44    Post IP：124.133.0.118[显示全部帖子]

EXTGBDATA( )
EXTGBDATASET( , )
管理员说用上面两个函数可以解决，但是我搞不明白怎么写，能烦劳帮忙写一下么

 回到顶部
帅哥哟，离线，有人找我吗？
lc1227
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：66 积分：95 威望：0 精华：0 注册：2012/7/13 8:16:36 		  发帖心情 Post By：2014/10/9 13:32:11    Post IP：124.133.0.118[显示全部帖子]

MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
XX:extgbdata('chicang1');
IF VAR1 THEN BEGIN 
SELLSHORT(1,1,MARKET);
END
IF VAR2 THEN BEGIN 
BUYSHORT(1,1,MARKET);
END
extgbdataset('chicang1',holding);


我这个第一个程序的数据，但是xx并不显示数值，是什么原因？
另外，我下面这种写法
MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
XX:extgbdata('chicang1');
XY:XX+1;
IF VAR1 THEN BEGIN 
SELLSHORT(1,1,MARKET);
END
IF VAR2 THEN BEGIN 
BUYSHORT(1,1,MARKET);
END
extgbdataset('chicang1',holding);
如果XX读不到数值，那么XY有数值么？XY还有意义么？
 回到顶部
帅哥哟，离线，有人找我吗？
lc1227
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：66 积分：95 威望：0 精华：0 注册：2012/7/13 8:16:36 		  发帖心情 Post By：2014/10/9 13:38:15    Post IP：124.133.0.118[显示全部帖子]

哦 我重新问一下这个问题，不好意思

MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
XX:extgbdata('chicang2');
IF VAR1 THEN BEGIN 
SELLSHORT(1,1,MARKET);
END
IF VAR2 THEN BEGIN 
BUYSHORT(1,1,MARKET);
END
extgbdataset('chicang1',holding);


我这个第一个程序的数据，但是xx并不显示数值，是什么原因？
另外，我下面这种写法
MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
XX:extgbdata('chicang2');
XY:XX+1;
IF VAR1 THEN BEGIN 
SELLSHORT(1,1,MARKET);
END
IF VAR2 THEN BEGIN 
BUYSHORT(1,1,MARKET);
END
extgbdataset('chicang1',holding);
如果XX读不到数值，那么XY有数值么？XY还有意义么？
 回到顶部
帅哥哟，离线，有人找我吗？
lc1227
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：66 积分：95 威望：0 精华：0 注册：2012/7/13 8:16:36 		  发帖心情 Post By：2014/10/10 8:34:56    Post IP：124.133.0.118[显示全部帖子]

我两个程序这样写：

MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
HHL:extgbdata('chicang2');
IF VAR1 THEN BEGIN 
SELLSHORT(1,1,MARKET);
END
IF VAR2 THEN BEGIN 
BUYSHORT(1,1,MARKET);
END
extgbdataset('chicang1',holding);

 
第二个程序 
MA1:MA(C,20);
MA2:MA(C,200);
VAR1:=CROSS(MA1,MA2);
VAR2:=CROSS(MA2,MA1);
HHL:extgbdata('chicang1');
IF VAR2 THEN BEGIN 
SELL(1,1,MARKET);
END
IF VAR1 THEN BEGIN 
BUY(1,1,MARKET);
END
extgbdataset('chicang2',holding);
 
 
你好，我问一下，我两个HHL读不出数据是为什么
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.07813 秒, 7 次数据查询