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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 老师麻烦改为可以双向交易的谢谢

   

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


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

主题:老师麻烦改为可以双向交易的谢谢

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


加好友 发短信
等级:新手上路 帖子:91 积分:180 威望:0 精华:0 注册:2012/10/11 10:43:18
老师麻烦改为可以双向交易的谢谢  发帖心情 Post By:2012/10/11 11:09:06    Post IP:121.11.129.226[只看该作者]

VARIABLE:dayCount=1,PositionCount=1,SellSign=0;
VARIABLE:EntAndExitSign=1,EntPoint=0,ExitPoint=0;
VARIABLE:N=0;

MA1:MA(C,3);
MA3:MA(C,15);

M:=MA(TR,25);
BUYHHV:=HHV(H,25);
SELLLLV:=LLV(L,15);

ss:n,linethick0;

IF BARPOS>=25 THEN BEGIN
IF BARPOS=25 THEN
N:=M;
IF DayCount=6 OR BARPOS=25THEN BEGIN
N:=(19*N+TR)/25;
DayCount:=2;
END
DayCount:=DayCount+1;
EntPoint:=ENTERBARS+1;
IF EntPoint=EntAndExitSign THEN BEGIN

PositionCount:=PositionCount+1;
SellSign:=True;

END
IF PositionCount=1 THEN BEGIN
HOW:=CASH(0)*0.01/N;
开1:BUY(H>=BUYHHV,HOW,MARKET);
END
IF PositionCount=2 THEN BEGIN
HOW:=CASH(0)*0.01/N;
开2:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);
END
IF PositionCount=3 THEN BEGIN
HOW:=CASH(0)*0.01/N;
开3:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);
END
IF PositionCount=4 THEN BEGIN
HOW:=CASH(0)*0.01/N;
开4:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);
END
IF SellSign=True THEN BEGIN
    ExitPoint:=EXITBARS+1;
    IF ExitPoint=EntAndExitSign THEN BEGIN  
       PositionCount:=1;
       SellSign:=False;
    END
    IF ENTERPRICE-2*N then SELL(L<=SELLLLV,100%,MARKET); 
    ELSE
    SELL(L<=ENTERPRICE-2*N,100%,MARKET); 
    END
END;

 


 回到顶部