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


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

   

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


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

主题:[交易系统]Dual Thrust

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


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

input:k(0.7,0.1,1,0.1);

dist1:=barslast(day>ref(day,1))+1;
dist2:=ref(dist1,dist1);

predayhigh:=ref(hhv(high,dist2),dist1);
predaylow:=ref(llv(low,dist2),dist1);
predayclose:=ref(close,dist1);
predayrange:=max(predayhigh-predayclose,predayclose-predaylow);

dayopen:=ref(open,dist1-1);

upperband:=dayopen+k*predayrange;
lowerband:=dayopen-k*predayrange;

if holding=0 then begin
 if high>=upperband then
  buy(1,volunit,limitr,max(open,upperband));
end

if holding=0 then begin
 if low<=lowerband then
  buyshort(1,volunit,limitr,min(open,lowerband));
end

if holding>0 then begin
 if low<=lowerband then begin
  sell(1,holding,limitr,min(open,lowerband));
  buyshort(1,volunit,limitr,min(open,lowerband));
 end
 
 if time>=closetime(0) then
  sell(1,holding,limitr,close);
end

if holding<0 then begin
 if high>=upperband then begin
  sellshort(1,holding,limitr,max(open,upperband));
  buy(1,volunit,limitr,max(open,upperband));
 end
 
 if time>=closetime(0) then
  sellshort(1,holding,limitr,close);
end

资产:asset,noaxis,colorred,linethick2;

 

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


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


加好友 发短信
等级:新手上路 帖子:86 积分:572 威望:0 精华:0 注册:2010/4/5 17:26:37
  发帖心情 Post By:2011/10/20 11:09:45 [只看该作者]

不错 可程序编得有误

  if high>=upperband then
buy(1,volunit,limitr,max(open,upperband));

if time>=closetime(0) then
sellshort(1,holding,limitr,close);
 

都有问题

 看了几个你编得几个程序 都有一样的问题。

[此贴子已经被作者于2011-10-20 11:15:57编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
前线小卒
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:46 积分:324 威望:0 精华:0 注册:2010/1/10 14:30:18
  发帖心情 Post By:2011/10/24 15:03:40 [只看该作者]

很好的日内交易系统,要是能修改成前台图表交易就好了。

 回到顶部
帅哥哟,离线,有人找我吗?
豆芽
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:33 积分:143 威望:0 精华:0 注册:2010/2/1 11:23:51
  发帖心情 Post By:2011/10/25 8:43:38 [只看该作者]

以下是引用前线小卒在2011-10-24 15:03:40的发言:
很好的日内交易系统,要是能修改成前台图表交易就好了。 这就能用在前台图表啊!!!
[此贴子已经被作者于2011-10-25 8:44:35编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
rogerhylt
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:86 积分:572 威望:0 精华:0 注册:2010/4/5 17:26:37
  发帖心情 Post By:2011/10/25 14:46:08 [只看该作者]

拷代码到你的系统里面 就能用了。 不过代码只能看看,用于指导你写策略 不能用于实盘。 有未来数据

 回到顶部
帅哥哟,离线,有人找我吗?
sxpms
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:109 积分:360 威望:0 精华:0 注册:2011/7/9 18:05:33
  发帖心情 Post By:2011/10/31 23:26:59 [只看该作者]

连续数据测试时,每个月末和月初时的最高最低价一样,应该是软件系统问题


 回到顶部
帅哥哟,离线,有人找我吗?
liuche001
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:11 积分:44 威望:0 精华:0 注册:2011/11/22 18:18:24
  发帖心情 Post By:2011/11/22 18:21:01 [只看该作者]

请问老师我把它导入新建交易系统,怎么一个信号都没有啊?图表交易可以用吗?


 回到顶部
帅哥哟,离线,有人找我吗?
fly
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:5082 积分:17642 威望:0 精华:6 注册:2010/7/15 9:05:58
  发帖心情 Post By:2011/12/5 11:32:09 [只看该作者]

//等价改写,1分钟周期

 

input:k(0.7,0.1,1,0.1);

 

N:=barslast(date<>ref(date,1))+1;

predayhigh:=ref(hhv(h,N),N); //昨日最高价
predaylow:=ref(LLv(L,N),N);  //昨日最低价
predayclose:=VALUEWHEN(DATE<>REF(DATE,1),REF(CLOSE,1)); //昨收
predayrange:=max(predayhigh-predayclose,predayclose-predaylow);

dayopen:=valuewhen(date<>ref(date,1),o);       //当日开盘价

 

upperband:=dayopen+k*predayrange;
lowerband:=dayopen-k*predayrange;

 

if low<=lowerband then
begin
  sell(holding>0,holding,limitr,min(open,lowerband));
  buyshort(holding=0,volunit,limitr,min(open,lowerband));
end

 

if high>=upperband then
begin
  sellshort(holding<0,holding,limitr,max(open,upperband));
  buy(holding=0,volunit,limitr,max(open,upperband));
end

 

if time>=closetime(0)-300 then
begin
  sell(holding>0,holding,limitr,close);
  sellshort(holding<0,holding,limitr,close);
end

 

资产:asset,noaxis,colorred,linethick2;



金字塔—专业程序化交易量化投资平台

客户服务部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到

service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

 回到顶部
帅哥哟,离线,有人找我吗?
solarhe2006
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:252 积分:1001 威望:0 精华:0 注册:2010/2/15 16:47:58
  发帖心情 Post By:2012/8/16 13:28:54 [只看该作者]

input:k(0.7,0.1,1,0.1);

dist1:=barslast(day>ref(day,1))+1;
dist2:=ref(dist1,dist1);

predayhigh:=ref(hhv(high,dist2),dist1);
predaylow:=ref(llv(low,dist2),dist1);
predayclose:=ref(close,dist1);
predayrange:=max(predayhigh-predayclose,predayclose-predaylow);

dayopen:=ref(open,dist1-1);

upperband:=dayopen+k*predayrange;
lowerband:=dayopen-k*predayrange;

if holding=0 then begin
 if high>=upperband then
  buy(1,volunit,limitr,max(open,upperband));
end

if holding=0 then begin
 if low<=lowerband then
  buyshort(1,volunit,limitr,min(open,lowerband));
end

if holding>0 then begin
 if low<=lowerband then begin
  sell(1,holding,limitr,min(open,lowerband));
  buyshort(1,volunit,limitr,min(open,lowerband));
 end
 
 if time>=closetime(0) then
  sell(1,holding,limitr,close);
end

if holding<0 then begin
 if high>=upperband then begin
  sellshort(1,holding,limitr,max(open,upperband));
  buy(1,volunit,limitr,max(open,upperband));
 end
 
 if time>=closetime(0) then
  sellshort(1,holding,limitr,close);
end

资产:asset,noaxis,colorred,linethick2;


 回到顶部
帅哥哟,离线,有人找我吗?
erichu168
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:2 积分:5 威望:0 精华:0 注册:2012/7/12 9:15:51
  发帖心情 Post By:2012/8/19 18:29:17 [只看该作者]

感谢大师们

 


 回到顶部
总数 16 1 2 下一页