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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → [求助]编写简单模型框架

   

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

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

主题：[求助]编写简单模型框架
帅哥哟，离线，有人找我吗？
wenarm
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：26632 积分：0 威望：0 精华：7 注册：2015/4/9 14:59:07 		  发帖心情 Post By：2015/12/4 9:47:44    Post IP：58.246.57.26[显示全部帖子]

取本次平仓前的持仓手数，

这个指的是你最有一次开仓的手数，还是当时的所有持仓

编程无捷径，技巧靠积累。
 回到顶部
帅哥哟，离线，有人找我吗？
wenarm
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：26632 积分：0 威望：0 精华：7 注册：2015/4/9 14:59:07 		  发帖心情 Post By：2015/12/4 10:32:48    Post IP：58.246.57.26[显示全部帖子]

类似于下面的思路。用户可以参考考自行修改

MA1:=MA(CLOSE,60);
平空开多条件:=CROSS(c,MA1);//开多平空条件
平多开空条件:=CROSS(MA1,c);//开空平多条件
SS:=2;//手数
a:NUMPROFIT(1); //取平仓盈亏值，
dd:ref(a,exitbars);//取平仓前的持仓手数，
//第一次
if 平空开多条件 and a=0 then begin
    SELLSHORT(1,holding,MARKET);
 BUY(HOLDING=0,ss,MARKET);
end

if 平多开空条件 and a=0 then begin
    SELL(1,holding,MARKET);
 BUYSHORT(HOLDING=0,ss,MARKET);
 end
 
 
 
//a1,b1,c1,不明确用户自己设置修改；下面是以A1，A2，A3作为常数进行比较为例且A1<A2<A3
if a>a1 and a<a2 then begin
 BUY(1,ss,MARKET);
end

if a>a2 and a<a3 then begin
 BUY(1,ss+1,MARKET);
end

if a>a2 then begin
 BUY(1,dd,MARKET);
end
if 平仓条件 then begin//平仓条件用户自行添加
    SELLSHORT(1,holding,MARKET);
 sell(1,HOLDING,MARKET);
end


 

[此贴子已经被作者于2015/12/4 10:39:10编辑过]

编程无捷径，技巧靠积累。
 回到顶部
帅哥哟，离线，有人找我吗？
wenarm
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：26632 积分：0 威望：0 精华：7 注册：2015/4/9 14:59:07 		  发帖心情 Post By：2015/12/4 23:24:21    Post IP：183.131.104.148[显示全部帖子]

代码少写了一个end，用红色标注出来了。建议用户根据提示调试代码，可以提高自己的编程能力。
MA1:=MA(CLOSE,60);
平空开多条件:=CROSS(c,MA1);//开多平空条件
平多开空条件:=CROSS(MA1,c);//开空平多条件
SS:=10;//手数
a:NUMPROFIT(1); //取平仓盈亏值，
dd:ref(a,exitbars);//取平仓前的持仓手数，
//第一次
if 平空开多条件 and HOLDING=0 then begin
 //   SELLSHORT(1,holding,MARKET);
 BUY(1,ss,MARKET);
end
if 平多开空条件 and HOLDING=0 then begin
  //   SELL(1,holding,MARKET);
 BUYSHORT(1,ss,MARKET);
 end
 
 
if 平空开多条件 and HOLDING>0 then begin//平仓条件用户自行添加
    SELLSHORT(1,holding,MARKET);
   end 

 

if 平多开空条件 and  anda>0 then begin
 BUYSHORT(1,ss-1,MARKET);
 end
 
if 平多开空条件 and anda<0 then begin 
BUYSHORT(1,ss+1,MARKET);
 end
if 平多开空条件 and a=0 then begin
BUYSHORT(1,dd,MARKET);
 end    
 
 if 平多开空条件 and HOLDING>0 then begin    
    sell(1,HOLDING,MARKET);
end

 if 平空开多条件 and a>0 then begin
 BUY(1,ss-1,MARKET);
end
if 平空开多条件 anda<0 then begin
 BUY(1,ss+1,MARKET);
end
if 平空开多条件 and a=0 then begin
 BUY(1,dd,MARKET);
end

编程无捷径，技巧靠积累。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.60938 秒, 7 次数据查询