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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件交易策略发布专区 → [交易系统]动态突破系统

   

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


  共有13706人关注过本帖平板打印复制链接

主题:[交易系统]动态突破系统

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


加好友 发短信
等级:小飞侠 帖子:1882 积分:3310 威望:0 精华:15 注册:2010/3/15 13:11:56
[交易系统]动态突破系统  发帖心情 Post By:2011/10/3 12:48:44 [只看该作者]

图片点击可在新窗口打开查看

 

runmode:0;

input:ceilingamt(60),flooramt(20),bolbandtrig(2);

variable:lookbackdays=20;

todayvolatility:=std(close,30);
yesterdayvolatility:=std(ref(close,1),30);

deltavolatility:=(todayvolatility-yesterdayvolatility)/todayvolatility;

lookbackdays:=lookbackdays*(1+deltavolatility);
lookbackdays:=round(lookbackdays);
lookbackdays:=min(lookbackdays,ceilingamt);
lookbackdays:=max(lookbackdays,flooramt);

mid:=ma(close,lookbackdays);
upband:=mid+bolbandtrig*std(close,lookbackdays);
dnband:=mid-bolbandtrig*std(close,lookbackdays);

buypoint:=ref(hhv(high,lookbackdays),1);
sellpoint:=ref(llv(low,lookbackdays),1);

longliqpoint:=ma(close,lookbackdays);
shortliqpoint:=ma(close,lookbackdays);

if holding=0 then begin
 if close>upband then
  buy(1,1,limitr,max(open,buypoint));
end

if holding=0 then begin
 if close<dnband then
  buyshort(1,1,limitr,min(open,sellpoint));
end

if holding>0 then begin
 if close<dnband then begin
  sell(1,holding,limitr,min(open,sellpoint));
  buyshort(1,1,limitr,min(open,sellpoint));
 end
 
 if low<=longliqpoint then
  sell(1,holding,limitr,min(open,longliqpoint));
end

if holding<0 then begin
 if close>upband then begin
  sellshort(1,holding,limitr,max(open,buypoint));
  buy(1,1,limitr,max(open,buypoint));
 end
 
 if high>=shortliqpoint then
  sellshort(1,holding,limitr,max(open,shortliqpoint));
end

盈亏:asset-50000,noaxis,colorred,linethick2;


 回到顶部