Скачать MetaTrader 5

помогите пожалуйста переделать советника под MetaTrader4

Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий
Зарегистрируйтесь продавцом и начните зарабатывать!
Forex Trader
114255
Forex Trader 2005.10.02 00:53 
Помогте пожалуйста переделать советника для MetaTrader3 под MetaTrader4 (у меня никак не получается)
Вот советник:
Name :=MA8-13 cross
Author := Copyright
Link := http://www.metaquotes.net/
Lots := 1.00
Stop Loss := 0
Take Profit := 0
Trailing Stop := 0


Variables: PrevTime(0);
Variables: Ma8Current(0),Ma8Previous(0),Ma8 Previous2(0);
Variables: Ma13Current(0),Ma13Previous(0),Ma13 Previous2(0);
Variables: cnt(0),WasClosedSell(False),WasClosedBuy(False);
Variables: IsCrossDown(False), IsCrossUp(False);


If PrevTime=Time And WasClosedSell=False And WasClosedBuy=False Then
Exit;
PrevTime=Time;



Ma8Current=iMA(8,MODE_SMA,1);
Ma8Previous=iMA(8, MODE_SMA,2);
Ma8Previous2=iMA(8, MODE_SMA,3);
Ma13Current=iMA(13, MODE_SMA,1);
Ma13Previous=iMA(13, MODE_SMA,2);
Ma13 Previous2=iMA(13, MODE_SMA,3);


IsCrossDown=Ma8Current<Ma13current And Ma8Previous>=Ma13Previous And Ma8Previous2>Ma13Previous2;
IsCrossUp = Ma8Current>Ma13current And Ma8Previous<=Ma13Previous And
Ma8Previous2<Ma13Previous2;

If IsCrossDown Or WasClosedBuy=True Then Begin
For cnt=1 To TotalTrades Begin
If OrderValue(cnt,VAL_SYMBOL)=Symbol And
OrderValue(cnt,VAL_TYPE)=OP_BUY Then Begin

CloseOrder(OrderValue(cnt,VAL_TICKET), OrderValue(cnt,VAL_LOTS),
Ask,3,Violet);
WasClosedBuy=True;
Exit;
End;
End;

If CurTime-LastTradeTime < 30 Then Begin
Print(«Wait up to 30 seconds please»);
WasClosedBuy=False;
If IsCrossDown Then Begin

SetOrder(OP_SELL,1,Bid,3,0,0,RED);
Exit;
End;
End;


If IsCrossUp Or WasClosedSell=True Then Begin
For cnt=1 To TotalTrades Begin
If OrderValue(cnt,VAL_SYMBOL)=Symbol And
OrderValue(cnt,VAL_TYPE)=OP_SELL Then Begin

CloseOrder(OrderValue(cnt,VAL_TICKET), OrderValue(cnt,VAL_LOTS),
Bid,3,Violet);
WasClosedSell=True;
Exit;
End;
End;


If CurTime-LastTradeTime < 30 Then Begin
Print(«Wait up to 30 seconds please»);
WasClosedSell=True;
Exit;
End;
WasClosedSell=False;
If IsCrossUp Then SetOrder(OP_BUY,Lots,Ask,3,0,0,Green);
End;
End.
Forex Trader
114255
Forex Trader 2005.10.04 20:41  
Может кто нибудь ответит?
А то без вас мне никак не разобраться!
Forex Trader
114255
Forex Trader 2005.10.04 23:11  
А что вы можете предложить в замен?
Forex Trader
114255
Forex Trader 2005.10.05 00:59  
Варивнтов как всегда несколько:
- либо "переводчик" заинтерисован финансово
- либо "переводчик" заинтерисован стратегией
- либо он же заинтерисован дальнейшим сотрудничеством, или ещё чем либо...

Благотворительность, если она и есть, ни чем хорошим не заканчивается ;)
Forex Trader
114255
Forex Trader 2005.10.05 10:54  
Варивнтов как всегда несколько:
- либо "переводчик" заинтерисован финансово
- либо "переводчик" заинтерисован стратегией
- либо он же заинтерисован дальнейшим сотрудничеством, или ещё чем либо...

Благотворительность, если она и есть, ни чем хорошим не заканчивается ;)


Это вы верно подметили!
Forex Trader
114255
Forex Trader 2005.10.07 10:45  
Все это вы заметили совершенно праведливо!
Я готов поделиться стратегией (точнее её основой) и если мы сможем быть друг другу, то возможно дальнейшее сотрудничество.
Ответ оставляйте здесь, но лучше пишите на tabula19@yandex.ru.
Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий