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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 客服能帮忙看里面的程序吗?为什么每天都会多次开仓?谢谢!

   

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


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

主题:客服能帮忙看里面的程序吗?为什么每天都会多次开仓?谢谢!

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


加好友 发短信
等级:论坛游侠 帖子:188 积分:939 威望:0 精华:0 注册:2012/8/18 15:21:26
客服能帮忙看里面的程序吗?为什么每天都会多次开仓?谢谢!  发帖心情 Post By:2013/1/31 21:03:57    Post IP:61.140.39.127[只看该作者]


INPUT:P(26,20,100,8);
INPUT:S(12,5,40,4);
INPUT:M(5,5,300,30);

DIFF := EMA(CLOSE,S) - EMA(CLOSE,P);
DEA  := EMA(DIFF,M);
MACD1 := 2*(DIFF-DEA);

KD:=CROSS(DIFF,DEA);          //开多条件
KK:=CROSS(DEA,DIFF);          //开空条件

VARIABLE: N = 0;

DAYOPEN: = CALLSTOCK('IF00',VTOPEN,6,0),LINEDASH;

IF HOLDING=0 AND N = 0 THEN BEGIN 
     //多头开仓 
     IF KD THEN BEGIN 
         BUY(1,1,THISCLOSE);
     END 
      
     //空头开仓 
     IF KK THEN BEGIN 
         BUYSHORT(1,1,THISCLOSE); 
     END 
     N = 1;
     
END 
 
 
IF HOLDING > 0  THEN BEGIN 
       
     IF HIGH > (DAYOPEN + 8) THEN BEGIN
        SELL(1,1,THISCLOSE); 
        N = 1;
     END
     
     IF TIME = 151400 THEN BEGIN
        SELL(1,1,THISCLOSE);
        N = 0;
     END
END 
 
IF HOLDING < 0 THEN BEGIN 
     
     
     IF LOW < (DAYOPEN -8 ) THEN BEGIN
         SELLSHORT(1,1,THISCLOSE); 
         N = 1;
     END
     
     
     IF TIME = 151400 THEN BEGIN
         SELLSHORT(1,1,THISCLOSE);
         N = 0;
     END    
END

;
 



开盘价:DAYOPEN,NOAXIS;
KWFH: N,NOAXIS;




 回到顶部