以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  急求板主指正程序化模型  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=459)

--  作者:余力
--  发布时间:2009/12/12 21:31:21
--  急求板主指正程序化模型

板主,您好,请看一下我写的程序化交易下单语句是否正确。不吝赐教万分感谢。

 

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

MA1:MA(C,5);
MA3:MA(C,10);

M:=MA(TR,20);
BUYHHV:=HHV(H,20);
SELLLLV:=LLV(L,10);

ss:n,linethick0;

IF BARPOS>=21 THEN BEGIN
IF BARPOS=21 THEN
N:=M;
IF DayCount=6 OR BARPOS=21 THEN BEGIN{5天调整N值}
N:=(19*N+TR)/20;{计算N值}
DayCount:=2;
END
DayCount:=DayCount+1;
EntPoint:=ENTERBARS+1;
IF EntPoint=EntAndExitSign THEN BEGIN{说明STOP指令买进头寸成功}
PositionCount:=PositionCount+1;{头寸计数}
SellSign:=True;{开始以STOP卖出,如果达到指定的价格}
END
p1:=1;
p:p1;

if ISLASTBAR then
begin
TBUY (p>0,1,LMT,c);
TSELL(p<0,1,LMT,c);
end
IF PositionCount=1 THEN BEGIN{第一头寸}
HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
开1:BUY(1,HOW,STOP,BUYHHV);{在20日新高STOP指令买进}
END
IF PositionCount=2 THEN BEGIN{如到第二头寸}
HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
开2:BUY(1,HOW,STOP,ENTERPRICE+0.5*N);{在上头寸(即第一头寸)+0.5个N以STOP指令买进}
END
IF PositionCount=3 THEN BEGIN{如到第三头寸}
HOW:=CASH(0)*0.01/N;
开3:BUY(1,HOW,STOP,ENTERPRICE+0.5*N);{在上头寸(即第二头寸)+0.5个N以STOP指令买进}
END
IF PositionCount=4 THEN BEGIN
HOW:=CASH(0)*0.01/N;
开4:BUY(1,HOW,STOP,ENTERPRICE+0.5*N);
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(1,100%,STOP,SELLLLV);{退出离盈利头寸}
    ELSE
    SELL(1,100%,STOP,ENTERPRICE-2*N);{退出亏损头寸}
    END

p1:=1;

if ISLASTBAR then
begin
TBUYSHORT (p>0,1,LMT,c);
TSELLSHORT(p<0,1,LMT,c);
end

END;


--  作者:蔡宛宏
--  发布时间:2011/12/26 9:48:48
--  
为什么这个模型表现效果这么厉害?
--  作者:fly
--  发布时间:2011/12/26 10:18:23
--  

下单语句是正确的

只是,国内期货交易所,目前都不支持停损单(STOP)


--  作者:xian_0_9
--  发布时间:2011/12/26 10:46:36
--  

这么写能成交么?不能吧?

 


--  作者:fly
--  发布时间:2011/12/26 11:26:48
--  

能否成交,参考  问题35

http://www.weistock.com/bbs/dispbbs.asp?boardid=2&Id=49

 

金字塔自带的海龟交易法,是用市价下单的,个人觉得自带的比这个要好些.