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


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

   

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


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

主题:[求助]简单的系统编写

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


加好友 发短信
等级:超级版主 帖子:18691 积分:0 威望:0 精华:0 注册:2013/7/15 9:22:16
  发帖心情 Post By:2014/7/4 11:02:22    Post IP:58.246.57.26[显示全部帖子]

VARIABLE:kd:=0,kk:=0;
ma5:ma(close,5);
ma10:ma(close,10);
ma60:ma(close,60);

t1:cross(ma5,ma10);
k1:cross(ma10,ma5);
hh:=hhv(h,10);
ll:=llv(l,10);
t2:h>=hh+2*mindiff;
k2:l<=ll-2*mindiff;
t3:vol>ref(vol,HHVBARS(h,10));
k3:vol>ref(vol,HHVBARS(l,10));
//开多
if t1 THEN kd:=1;
if kd=1 and t2 and t3 and not (l<ma60) then
begin
buy(holding=0,1,market);
kd:=0;
end
//开空
if k1 then kk:=1;
if kk=1 and k2 and k3 and not (h>ma60) then
begin
BUYSHORT(HOLDING=0,1,market);
kk:=0;
end
//止损
h1:ref(hhv(h,10),ENTERBARS+1);
l1:ref(llv(l,10),ENTERBARS+1);
if h<=h1-2*mindiff then
sell(holding>0,holding,market);
if l>=l1+2*mindiff then
sellshort(holding<0,holding,market);


 回到顶部
帅哥哟,离线,有人找我吗?
qq代人发帖
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:18691 积分:0 威望:0 精华:0 注册:2013/7/15 9:22:16
  发帖心情 Post By:2014/7/4 11:47:07    Post IP:58.246.57.26[显示全部帖子]

开仓条件t2:t2:h>=hh+2*mindiff; 这个条件不满足,没有开仓信号

可以把这个条件改下


 回到顶部