Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[原创]各位高手,这段语句正确吗?怎么没有信号出现?

1楼
jery 发表于:2010/9/3 7:16:51

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,10);
SELLLLV:=LLV(L,20);

ss:n,linethick0;

IF BARPOS>=21 THEN BEGIN
IF BARPOS=21 THEN
N:=M;
IF DayCount=6 OR BARPOS=21 THEN BEGIN
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
IF PositionCount=1 THEN BEGIN{第一头寸}
HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
空1:TBUYSHORT(H<=SELLLLV,HOW,MARKET);{在20日新高STOP指令买进}
END
IF PositionCount=2 THEN BEGIN{如到第二头寸}
HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
空2:TBUYSHORT(H<=ENTERPRICE+0.5*N,HOW,MARKET);{在上头寸(即第一头寸)+0.5个N以STOP指令买进}
END
IF PositionCount=3 THEN BEGIN{如到第三头寸}
HOW:=CASH(0)*0.01/N;
空3:TBUYSHORT(H<=ENTERPRICE+0.5*N,HOW,MARKET);{在上头寸(即第二头寸)+0.5个N以STOP指令买进}
END
IF PositionCount=4 THEN BEGIN
HOW:=CASH(0)*0.01/N;
空4:TBUYSHORT(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 TSELLSHORT(L>=BUYHHV,100%,MARKET);{退出离盈利头寸}
    ELSE
    TSELLSHORT(L>=ENTERPRICE-2*N,100%,MARKET);{退出亏损头寸}
    END
END;

2楼
fly 发表于:2010/9/3 8:57:19

TSELLSHORT(L>=ENTERPRICE-2*N,100%,MARKET);{退出亏损头寸}

 

这是止赢呢,还是止损呢

共2 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.03125 s, 3 queries.