求解一个难题，平仓公式问题出在哪里平不了仓

dingyubin

历史回测平不了仓，回测结果只有一个开仓

Params
     Numeric AfStep( 0.02);
    Numeric AfLimit( 0.15 ) ;

Vars
        NumericSeries A;
        Numeric oParCl( 0 );
        Numeric oParOp( 0 );
        Numeric oPosition( 0 );
        Numeric oTransition( 0 );
Begin

        A = oParCl;
        ParabolicSAR( AfStep, AfLimit, oParCl, oParOp, oPosition, oTransition );

        //平仓指令
        if (MarketPosition==1 And CrossOver(Close[1],A))
        {
                Sell(0,Open);
                }
        if (MarketPosition==-1 And CrossUnder(Close[1],A))
        {
                BuyToCover(0,Open);
                }

End