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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件交易策略发布专区 → 公布一个实盘稳定盈利的股指策略

   

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


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

主题:公布一个实盘稳定盈利的股指策略

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


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
公布一个实盘稳定盈利的股指策略  发帖心情 Post By:2012/3/28 9:54:55 [只看该作者]

感谢猎豹大周

 

runmode:0;
input:V1(1,1,100,1);
 input:f1(0.4);
 input:f2(0.07);
 input:f3(0.18);
 input:m(0.9);
 input:x(3,1,10,1);
 
variable:up=0;
 variable:bsetup=0;
 variable:senter=0;
 variable:benter=0;
 variable:bbreak=0;
 variable:sbreak=0;
 variable:ltoday=0;
 variable:h0=999999;
 variable:sn=0;
 variable:div=0;
 variable:rf=false;
 
i:=m*(callstock(stklabel,vtopen,6,0)/100);
 
if barpos=1 then begin
 sn:=0;
 div:=max(x,1);//xdiv
 end
 
hh:ref(h0,1),noaxis;

 cc:=ref(close,1);
 ll:=ref(ltoday,1);
 
if date>ref(date,1) then begin
 sn:=sn+1;
 
up:=hh+f1*(cc-ll);
 senter:=((1+f2)/2)*(hh+cc)-f2*ll;
 benter:=((1+f2)/2)*(ll+cc)-f2*hh;
 bsetup:=ll-f1*(hh-cc);
 bbreak:=up+f3*(up-bsetup);
 sbreak:=bsetup-f3*(up-bsetup);
 
h0:=high;
 ltoday:=low;
 
rf:=hh-cc>=0.2{rangemin};
 end
 
if high>h0 then h0:=high;
 if low<ltoday then ltoday:=low;
 
if time>=opentime(1) and time<closetime(0)-500 and sn>=2 and rf then begin
 if h0>=up and holding>=0 then begin
 if low<=senter+(h0-up)/div then begin
 sell(1,v1,thisclose);
 buyshort(1,v1,thisclose);
 end
end
 
if ltoday<=bsetup and holding<=0 then begin
 if high>=benter-(bsetup-ltoday)/div then begin
 if high>=benter-(bsetup-ltoday)/div then begin
 sellshort(1,v1,thisclose);
 buy(1,v1,thisclose);
 end
 end
 end
 
if holding<0 then begin
 if high-enterprice>=i then
 sellshort(1,v1,thisclose);
 end
 
if holding>0 then begin
 if enterprice-low>=i then
 sell(1,v1,thisclose);
 end
 
if holding=0 then begin
 if high>=bbreak then
 buy(1,v1);
 end
 
if holding=0 then begin
 if low<=sbreak then
 buyshort(1,v1);
 end
 end
 
if time>=closetime(0)-500 then begin
 if holding<0 then
 sellshort(1,v1);
 
if holding>0 then
 sell(1,v1);
end
资产:asset,noaxis,coloryellow,linethick2;


图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看

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


加好友 发短信 原leevolvo
等级:版主 帖子:2160 积分:10563 威望:0 精华:11 注册:2010/11/3 11:21:19
  发帖心情 Post By:2012/3/28 21:46:06 [只看该作者]


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


加好友 发短信
等级:新手上路 帖子:4 积分:4 威望:0 精华:0 注册:2012/3/29 14:13:19
  发帖心情 Post By:2012/3/29 14:14:05 [只看该作者]

谁能翻译一下呀,学习!多谢


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


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
简单的后台模型,麻烦帮忙修改  发帖心情 Post By:2012/3/29 17:31:04 [只看该作者]

欢迎大家都发些实盘策略来,可以互相学习借鉴。

 


 回到顶部
美女呀,离线,留言给我吧!
xian_0_9
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 BOO
等级:论坛游民 帖子:378 积分:1856 威望:0 精华:0 注册:2010/1/25 18:04:12
  发帖心情 Post By:2012/3/30 9:55:02 [只看该作者]

好像有些地方会反复发信号

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


加好友 发短信
等级:论坛游侠 帖子:426 积分:1074 威望:0 精华:0 注册:2011/10/21 13:03:36
  发帖心情 Post By:2012/3/30 14:29:10 [只看该作者]

确实牛的!


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


加好友 发短信
等级:新手上路 帖子:8 积分:52 威望:0 精华:0 注册:2012/3/5 16:25:21
  发帖心情 Post By:2012/3/30 17:20:04 [只看该作者]

提供了新思路,很好的模型。感谢猎豹大周。

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


加好友 发短信
等级:新手上路 帖子:7 积分:11 威望:0 精华:0 注册:2011/3/31 21:09:11
  发帖心情 Post By:2012/4/1 14:40:26 [只看该作者]

学习!多谢

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


加好友 发短信
等级:新手上路 帖子:60 积分:395 威望:0 精华:0 注册:2010/9/2 22:18:41
  发帖心情 Post By:2012/4/19 11:04:47 [只看该作者]

 不错,来验证一下有无信号漂移。

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


加好友 发短信
等级:新手上路 帖子:5 积分:5 威望:0 精华:0 注册:2011/12/6 8:38:53
  发帖心情 Post By:2012/4/20 21:39:41 [只看该作者]

似乎回测参数有不一样啊。

 回到顶部
总数 49 1 2 3 4 5 下一页