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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件金字塔软件问题提交 → 后台账户全平范例

   

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


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

主题:后台账户全平范例

帅哥哟,离线,有人找我吗?
雪梨
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:19 积分:0 威望:0 精华:2 注册:2016/3/5 22:51:14
后台账户全平范例  发帖心情 Post By:2016/3/6 17:50:16 [显示全部帖子]

该范例使用3.9BEAT2版本新增的若干后台交易函数对指定账户做全平操作
注意:由于后台的工作特殊性,每个监控品种都会扫描执行,如果要执行下面的全平操作,只要监控一个品种就好了。

 

//只在最后周期有效,防止逐K线模式前面K线刷新进入,可以提高效率。对序列模式不影响。

IF NOT(ISLASTBAR) THEN
EXIT;

 

//取得当前活动账户的总持仓品种数量

HC:=THOLDCOUNT('');
//MSGOUT(1,NUMTOSTR(HC,0));
//循环取得持仓
FOR I = 1 TO HC do
BEGIN
//获取第I个序号的账户持仓品种代码
HLABEL:= THOLDINDEXLABEL(I,'');
//MSGOUT(1,HLABEL);
//取该品种多仓数量,然后平仓
THC:=TBUYHOLDINGEX('' ,HLABEL,1);
//MSGOUT(1,'buyholdig'&NUMTOSTR(THC,0));
TSELL(THC>0,THC,MKT,0,0,'',HLABEL),ALLOWREPEAT;
//取空仓数量,然后平仓
THC:=TSELLHOLDINGEX('' ,HLABEL,1);
//MSGOUT(1,'sellholdig'&NUMTOSTR(THC,0));
TSELLSHORT(THC>0,THC,MKT,0,0,'',HLABEL),ALLOWREPEAT;
END

[本帖被加为精华]
 回到顶部