程序改编

mexicoyouzi

请教下面的文华程序怎样改编成TB

MA1:=MA(C,N1);
MA2:=MA(C,N2);
EXIST(CROSS(C,MA2),20)&&H>HV(H,20) OR C>MA1&&C>MA2&&H>HV(H,60),BK;
C<MA2&&L<LV(L,20) OR C<MA1&&L<LV(L,60),SP;
EXIST(CROSS(MA2,C),20)&&L<LV(L,20) OR C<MA1&&C<MA2&&L<LV(L,60),SK;
C>MA2&&H>HV(H,20) OR C>MA1&&H>HV(H,60),BP;
AUTOFILTER;

mexicoyouzi

这样吧，我把我的思路简单一些，请老师帮我编一下TB，就是：当均线20在120至上时，价格上穿20开多，下穿20平仓；反之，当均线20在120之下时，价格下穿20开空，上穿20平仓。开平仓价以开盘价，手数为1手。

tianlan

mexicoyouzi 发表于 2016-2-17 09:26
这样吧，我把我的思路简单一些，请老师帮我编一下TB，就是：当均线20在120至上时，价格上穿20开多，下穿20 ...

代码私信已发送，请查收

yimatouzi

Params

Numeric   LengthLong(120);
Numeric   LengthShort(20);


Vars
NumericSeries    MaLong(0);
NumericSeries    MaShort(0);


Begin

       MaLong=AverageFC(close,LengthLong);
           MaShort=AverageFC(close,LengthShort);
           PlotNumeric("MaL",MaLong,0,-1,0);
           PlotNumeric("Mas",MaShort,0,-1,0);
           If(MarketPosition==0 and MaShort>MaLong and close[2]<MaShort[2] And  close[1]>MaShort[1])
            Buy(1,open);
           If(marketposition==0 and MaShort<MaLong and close[2]>Mashort[2] And   close[1]<Mashort[1])
            SellShort(1,open);
           If(barssinceEntry>1  and marketposition==1  and close[1]<MaShort[1]) Sell(1,open);
           If(barssinceEntry>1  and marketposition==-1 and close[1]>MaLong[1])  BuyToCover(1,open);
   End