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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 我的写的交易系统在图表中各个年份都是有信号的 但是回测的时候中间的时间段都没有交易明细 求解答 数据应该是完整的吧 代码已经贴了

   

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


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

主题:我的写的交易系统在图表中各个年份都是有信号的 但是回测的时候中间的时间段都没有交易明细 求解答 数据应该是完整的吧 代码已经贴了

帅哥哟,离线,有人找我吗?
杨鹏要交作业
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:19 积分:0 威望:0 精华:0 注册:2014/5/8 1:18:16
我的写的交易系统在图表中各个年份都是有信号的 但是回测的时候中间的时间段都没有交易明细 求解答 数据应该是完整的吧 代码已经贴了  发帖心情 Post By:2014/5/20 21:50:31    Post IP:171.221.28.244[只看该作者]


DIFF := EMA(CLOSE,S) - EMA(CLOSE,P);
DEA  := EMA(DIFF,M);
MACD := DIFF-DEA, COLORSTICK;
VOLDIFF := EMA(VOL,S) - EMA(VOL,P);
VOLDEA  := EMA(VOLDIFF,M);
VOLMACD := VOLDIFF-VOLDEA, COLORSTICK;
Y0:=IF( MACD>0, 5,0);
Y1:=IF( MACD>0.5 ,-1,0);
Y2:=IF( MACD>1 , -3,  0);
Y3:=IF(MACD<-0.5 ,1,0);
Y4:=IF(MACD<-1,3,0);    
Y5:=IF(RET(MACD,1)>MACD ,-1,0); 
Y6:=IF(RET(MACD,2)>RET(MACD,1) AND RET(MACD,1)>MACD, -3, 0);
Y7:=IF(CROSS(DIFF,DEA)AND MACD<0.1 AND VOLMACD>0, 10,0);
Y8:=IF(VOLMACD>0 AND MACD>0 , 5 , 0);
Y9:=IF(CROSS(VOLDIFF,VOLDEA) AND CROSS(DIFF,DEA), 5, 0);
Y10:=Y0+Y1+Y2+Y3+Y4+Y5+Y6+Y7+Y8+Y9;
B:=Y10;
INDEXM:=STKINDIEX('1A0001' ,'MACD' ,0 ,7 ,0,26);
INDEXMV:=STKINDIEX('1A0001','VMACD',0,7,0,26);
INDEXDIFF:=STKINDIEX('1A0001','MACD.DIFF',0,7,0,26);
INDEXDEA:=STKINDIEX('1A0001','MACD.DEA',0,7,0,26);
INDEXVDIFF:=STKINDIEX('1A0001','VMACD.DIFF',0,7,0,26);
INDEXVDEA:=STKINDIEX('1A0001','VMACD.DEA',0,7,0,26);
BEGIN
Z0:=IF(INDEXM>0, 5,0);
Z1:=IF(INDEXM>0.5 ,-1,0);
Z2:=IF(INDEXM>1 ,-3,0);
Z3:=IF(INDEXM<-0.5 ,1,0);
Z4:=IF(INDEXM<-1,3,0);    
Z5:=IF(RET(INDEXM,1)>INDEXM ,-1,0); 
Z6:=IF(RET(INDEXM,2)>RET(INDEXM,1) AND RET(INDEXM,1)>INDEXM, -3, 0);
Z7:=IF(CROSS(INDEXDIFF,INDEXDEA)AND INDEXM<0.1 AND INDEXMV>0, 10,0);
Z8:=IF(INDEXMV>0 AND INDEXM>0 , 5 , 0);
Z9:=IF( CROSS(INDEXVDIFF,INDEXVDEA) AND CROSS(INDEXDIFF,INDEXDEA), 5, 0);
Z10:=Z0+Z1+Z2+Z3+Z4+Z5+Z6+Z7+Z8+Z9;
2B:=Z10;
END
IF HOLDING>0 THEN 
BEGIN
SELL(B<2B,0,THISCLOSE);
END
IF HOLDING=0 THEN
BEGIN 
  BUY(B>2B+1,30%,THISCLOSE);
END    


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


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2014/5/21 8:50:58    Post IP:58.246.57.26[只看该作者]

勾上这个
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


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

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

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

 回到顶部