[求助]请老师帮忙 (文华财经WH6赢顺V6.7)

Params
Numeric TakeProfitSet(15);
Numeric StopLossSet(200);
Numeric Length(20);
Numeric Y(5);

Vars
Numeric n;
NumericSeries MyEntryPrice;
Numeric MinPoint;
Numeric MyExitPrice;
Numeric Lots(1);
Numeric X;

Begin
MinPoint = MinMove*PriceScale;
X =IntPart((NetProfit()+10000)/10000);

If(MarketPosition==0)
{
If(Close[1]<Close[Length])
{
MyEntryPrice=Open;
SellShort(Lots,MyEntryPrice);
}
Else If(Close[1]>Close[Length])
{
MyEntryPrice=Open;
Buy(Lots,Open);
}
}

If(MarketPosition==-1 )
{
if(High >= MyEntryPrice + StopLossSet*MinPoint)
{
MyExitPrice = MyEntryPrice + StopLossSet*MinPoint;
If(Open > MyExitPrice) MyExitPrice = Open;
BuyToCover(0,MyExitPrice);
}
Else If(l[1]<= MyEntryPrice - TakeProfitSet*MinPoint)
{
if(Close[1]<Close[Length] && CurrentEntries<X+Y)
{
MyEntryPrice=Open;
SellShort(Lots,MyEntryPrice);
}
Else
{
MyExitPrice = Open;
BuyToCover(0,MyExitPrice);
}
}
}

If(MarketPosition==1)
{
if(Low <= MyEntryPrice - StopLossSet*MinPoint)
{
MyExitPrice = MyEntryPrice - StopLossSet*MinPoint;
If(Open < MyExitPrice) MyExitPrice = Open;
Sell(0,MyExitPrice);
}
Else If(h[1]>= MyEntryPrice + TakeProfitSet*MinPoint)
{
if(Close[1]>Close[Length] && CurrentEntries<X+Y)
{
MyEntryPrice=Open;
Buy(Lots,MyEntryPrice);
}
Else
{
MyExitPrice = Open;
Sell(0,MyExitPrice);
}
}
}


End