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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件交易策略发布专区 → 一个简单的MACD日内系统

   

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


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

主题:一个简单的MACD日内系统

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


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

重发 :

 

input:mm1(4,4,5,1);
input:mm2(4,2,5,1);
input:mm3(5,4,6,1);
input:mm4(10,8,10,1);
input:mm5(200,170,260,10);
input:mm6(7,6,10,1);

runmode:0;
variable:ema12=c,ema26=c,dea=0;
if day<>ref(day,1) then begin
  ema12:=c;
  ema26:=c;
  dea:=0;
end
ema12:=ema12*11/13+c*2/13;
ema26:=ema26*25/27+c*2/27;
diff:ema12-ema26;
dea:=dea*4/5+diff/5;
dea1:dea;
macd:2*(diff-dea),colorstick;


TYP:= (HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6));

开多1:count(diff>ref(diff,1),mm1)=mm1;
开多2:count(macd>ref(macd,1),mm2)=mm2;
开多3:count(diff>dea1,mm3)=mm3;
开多:开多1 AND 开多2 AND 开多3;

开空1:count(diff<ref(diff,1),mm1)=mm1;
开空2:count(macd<ref(macd,1),mm2)=mm2;
开空3:count(diff<dea1,mm3)=mm3;
开空:开空1 AND 开空2 AND 开空3;


平多1:=count(macd<ref(macd,1),mm4)=mm4;
平多2:=cci>mm5;
平空1:=count(macd>ref(macd,1),mm4)=mm4;
平空2:=cci<-mm5;

平多:平多1 or 平多2 or CLOSE<=(ENTERPRICE-mm6); 
平空:平空1 or 平空2 or CLOSE>=(ENTERPRICE+mm6);

 

IF HOLDING>0 AND 平多 THEN SELL(1,0,MARKET);
IF HOLDING>0 AND TIME=151200  THEN SELL(1,0,MARKET);
IF HOLDING<0 AND 平空  THEN SELLSHORT(1,0,MARKET);
IF HOLDING<0 AND TIME=151200  THEN SELLSHORT(1,0,MARKET);
IF HOLDING=0 AND 开多  AND TIME<150900  THEN BUY(1,1,MARKET); 
IF HOLDING=0 AND 开空  AND TIME<150900  THEN BUYSHORT(1,1,MARKET);

 

 


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