Как прикрутить к советнику трейлингстоп и вывод в безубыток?

Программирование на MQL

Как известно вывод позиции в безубыток и последующий трейлинг позиции, могут значительно повысить прибыльность торговой системы.

Чтобы проделать необходимые нам операции воспользуемся готовыми функциями трейлингстопа и БУ.

Наш трейлингстоп:


//+------------------------------------------------------------------+  
void Trailing()
{
   for(int i=0; i<OrdersTotal(); i++) 
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      if(OrderSymbol()==Symbol()||OrderMagicNumber()==MAGICMA)
       if(OrderType()==OP_BUY)
         {
          if(TrailingStop>0)  
            {                 
              if(Bid-OrderOpenPrice()>TrailingStop)
               {
                 if(OrderStopLoss()<Bid-TrailingStop)
                  {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TrailingStop,OrderTakeProfit(),0,Green);
                  }
               }
            }
         }
         
        if(OrderType()==OP_SELL)
         {
           if(TrailingStop>0)  
            {                 
              if((OrderOpenPrice()-Ask)>TrailingStop)
               {
                 if((OrderStopLoss()>(Ask+TrailingStop)) || (OrderStopLoss()==0))
                  {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Ask+TrailingStop,OrderTakeProfit(),0,Red);
                  }
               }
            }
         }   
   }
}
//+------------------------------------------------------------------+

Наш БУ:


//+------------------------------------------------------------------+
void BU()
{
   for(int i=0; i<OrdersTotal(); i++) 
      {
       if(OrderSelect(i, SELECT_BY_POS))
        {      
         if(OrderType()==OP_BUY) 
          {
           if(OrderOpenPrice()<=(Bid-BULevel)&&OrderOpenPrice()>OrderStopLoss())
            {      
             OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,Green);
            }
           }       
 
         if(OrderType() == OP_SELL) 
           {
            if(OrderOpenPrice()>=(Ask+BULevel)&&OrderOpenPrice()<OrderStopLoss()) 
             {
              OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,Red);
             }
           } 
         }
       }
}
//------------------------------------------------------------------+

И наконец наш советник к которому мы все это будем прикручивать:


//+------------------------------------------------------------------+
//|                                                     alya-bob.mq4 |
//|                                           Copyright © 2011, AM2. |
//|                                             www.forexsystems.biz |
//+------------------------------------------------------------------+

#property copyright "Copyright © 2011, AM2."
#property link      "www.forexsystems.biz"

#define MAGICMA  20110426

extern double StopLoss           = 0.0035;
extern double TakeProfit         = 0.007;
extern double MovingPeriod       = 20;
extern double MovingShift        = 0;
extern int StochOversold         = 30;
extern int StochOverbought       = 70;
extern double Lots               = 0.1;
//+------------------------------------------------------------------+
//| Calculate open positions                                         |
//+------------------------------------------------------------------+
int CalculateCurrentOrders(string symbol)
  {
   int buys=0,sells=0;
//----
   for(int i=0;i<OrdersTotal();i++)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
      if(OrderSymbol()==Symbol() && OrderMagicNumber()==MAGICMA)
        {
         if(OrderType()==OP_BUY)  buys++;
         if(OrderType()==OP_SELL) sells++;
        }
     }
//---- return orders volume
   if(buys>0) return(buys);
   else       return(-sells);
  }
//+------------------------------------------------------------------+
//| Check for open order conditions                                  |
//+------------------------------------------------------------------+
void CheckForOpen()
  {
//---- go trading only for first tiks of new bar
   if(Volume[0]>1) return;
//---- get Moving Average   
   int    res;  
//---- 
   double ma0=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,0); // Значение Moving  Average на текущем баре
   double ma1=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,1); // Значение Moving  Average на предыдущем баре
   double ma2=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,2); // Значение Moving  Average на предпредыдущем баре
   double st=iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_MAIN,0);
//---- buy 
   if(ma1>ma2 && ma0>ma1  && Close[1]>ma0 && st<StochOversold)  // Moving  Average растет, Stochastic ниже уровня перепроданности и цена выше Moving  Average
     {
      res=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,Ask-StopLoss,Ask+TakeProfit,"",MAGICMA,0,Blue);
      return;
     }      
//---- sell   
   if(ma1<ma2 && ma0<ma1 && Close[1]<ma0 && st>StochOverbought)  // Moving  Average убывает, Stochastic выше уровня перекупленности и цена ниже Moving  Average
     {
      res=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,Bid+StopLoss,Bid-TakeProfit,"",MAGICMA,0,Red);
      return;
     }     
  }  
//+------------------------------------------------------------------+
//| Start function                                                   |
//+------------------------------------------------------------------+
void start()
  {
//---- check for history and trading
   if(Bars<100 || IsTradeAllowed()==false) return;
//---- calculate open orders by current symbol
   if(CalculateCurrentOrders(Symbol())==0) CheckForOpen();
  }
//+------------------------------------------------------------------+

Достаточно добавить необходимые нам функции в конец советника и вызвать их из expert start function:


   if (BULevel!=0) BU();
   if (TrailingStop!=0) Trailing();

Теперь осталось только добавить необходимые параметры в шапку эксперта и мы можем тестировать нашу торговую систему с необходимыми нам функциями.


//+------------------------------------------------------------------+
//|                                                     alya-bob.mq4 |
//|                                           Copyright © 2011, AM2. |
//|                                             www.forexsystems.biz |
//+------------------------------------------------------------------+

#property copyright "Copyright © 2011, AM2."
#property link      "www.forexsystems.biz"

#define MAGICMA  20110427

extern double StopLoss           = 0.0035;
extern double TakeProfit         = 0.007;
extern double BULevel            = 0.001;
extern double TrailingStop       = 0.005;
extern int    MovingPeriod       = 20;
extern int    MovingShift        = 0;
extern int StochOversold         = 30;
extern int StochOverbought       = 70;
extern double Lots               = 0.1;

Вот и все! Эксперт готов!


//+------------------------------------------------------------------+
//|                                                     alya-bob.mq4 |
//|                                           Copyright © 2011, AM2. |
//|                                             www.forexsystems.biz |
//+------------------------------------------------------------------+

#property copyright "Copyright © 2011, AM2."
#property link      "www.forexsystems.biz"

#define MAGICMA  20110427

extern double StopLoss           = 0.0035;
extern double TakeProfit         = 0.007;
extern double BULevel            = 0.001;
extern double TrailingStop       = 0.005;
extern int    MovingPeriod       = 20;
extern int    MovingShift        = 0;
extern int StochOversold         = 30;
extern int StochOverbought       = 70;
extern double Lots               = 0.1;
//+------------------------------------------------------------------+
//| Calculate open positions                                         |
//+------------------------------------------------------------------+
int CalculateCurrentOrders(string symbol)
  {
   int buys=0,sells=0;
//----
   for(int i=0;i<OrdersTotal();i++)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
      if(OrderSymbol()==Symbol() && OrderMagicNumber()==MAGICMA)
        {
         if(OrderType()==OP_BUY)  buys++;
         if(OrderType()==OP_SELL) sells++;
        }
     }
//---- return orders volume
   if(buys>0) return(buys);
   else       return(-sells);
  }
//+------------------------------------------------------------------+
//| Check for open order conditions                                  |
//+------------------------------------------------------------------+
void CheckForOpen()
  {
//---- go trading only for first tiks of new bar
   if(Volume[0]>1) return;
//---- get Moving Average   
   int    res;  
//---- 
   double ma0=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,0); // Значение Moving  Average на текущем баре
   double ma1=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,1); // Значение Moving  Average на предыдущем баре
   double ma2=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,2); // Значение Moving  Average на предпредыдущем баре
   double st=iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_MAIN,0);
//---- buy 
   if(ma1>ma2 && ma0>ma1  && Close[1]>ma0 && st<StochOversold)  // Moving  Average растет, Stochastic ниже уровня перепроданности и цена выше Moving  Average
     {
      res=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,Ask-StopLoss,Ask+TakeProfit,"",MAGICMA,0,Blue);
      return;
     }      
//---- sell   
   if(ma1<ma2 && ma0<ma1 && Close[1]<ma0 && st>StochOverbought)  // Moving  Average убывает, Stochastic выше уровня перекупленности и цена ниже Moving  Average
     {
      res=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,Bid+StopLoss,Bid-TakeProfit,"",MAGICMA,0,Red);
      return;
     }     
  }  
//+------------------------------------------------------------------+
//| Start function                                                   |
//+------------------------------------------------------------------+
void start()
  {
//---- check for history and trading
   if(Bars<100 || IsTradeAllowed()==false) return;
//---- calculate open orders by current symbol
   if(CalculateCurrentOrders(Symbol())==0) CheckForOpen();
   
   if (BULevel!=0) BU();
   if (TrailingStop!=0) Trailing();     
  }
//+------------------------------------------------------------------+  
void Trailing()
{
   for(int i=0; i<OrdersTotal(); i++) 
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      if(OrderSymbol()==Symbol()||OrderMagicNumber()==MAGICMA)
       if(OrderType()==OP_BUY)
         {
          if(TrailingStop>0)  
            {                 
              if(Bid-OrderOpenPrice()>TrailingStop)
               {
                 if(OrderStopLoss()<Bid-TrailingStop)
                  {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TrailingStop,OrderTakeProfit(),0,Green);
                  }
               }
            }
         }
         
        if(OrderType()==OP_SELL)
         {
           if(TrailingStop>0)  
            {                 
              if((OrderOpenPrice()-Ask)>TrailingStop)
               {
                 if((OrderStopLoss()>(Ask+TrailingStop)) || (OrderStopLoss()==0))
                  {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Ask+TrailingStop,OrderTakeProfit(),0,Red);
                  }
               }
            }
         }   
   }
}
//+------------------------------------------------------------------+
void BU()
{
   for(int i=0; i<OrdersTotal(); i++) 
      {
       if(OrderSelect(i, SELECT_BY_POS))
        {      
         if(OrderType()==OP_BUY) 
          {
           if(OrderOpenPrice()<=(Bid-BULevel)&&OrderOpenPrice()>OrderStopLoss())
            {      
             OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,Green);
            }
           }       
 
         if(OrderType() == OP_SELL) 
           {
            if(OrderOpenPrice()>=(Ask+BULevel)&&OrderOpenPrice()<OrderStopLoss()) 
             {
              OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,Red);
             }
           } 
         }
       }
}
//------------------------------------------------------------------+

Точно таким же образом можно добавлять в эксперт и многие другие уже готовые функции.

Успешного обучения вам, дорогие друзья!

+3
Просмотров: 141410
27 апреля 2011, 17:16
AM2

Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

Вступите в группу "Программирование на MQL", чтобы следить за обновлениями
ПРИСОЕДИНИТЬСЯ К ГРУППЕ

Предыдущая запись в группе Как написать простейший советник на MQL4?	Следующая запись в группе Эффективное использование MagicNumber ордеров для упрощения анализа при торговле советниками.
26 апреля 2011	10 октября 2011

Брокер для ваших роботов, 15 лет на рынке

Молодец! Полезные для трейдерской общественности вещи

32 Nord Сообщений: 1327 - Дмитрий

27 апреля 2011, 17:27
↓

Пишу пока есть свободное время.

35 AM2 Автор Сообщений: 16392 - Андрей

27 апреля 2011, 17:38
↑
↓

А топики писать может только организатор группы? Участники не могут?

9 amyrgan145 Сообщений: 428 - Амыр

17 июня 2011, 18:29
↑
↓

Топик может написать любой человек. «Кликните добавить новую запись».

35 AM2 Автор Сообщений: 16392 - Андрей

17 июня 2011, 19:46
↑
↓

amygran145, если в списке доступных групп нет нужной, то, вероятно, недостаточно уровня.
В таком случае Вы можете написать в своем блоге и сделать пометку с просьбой переместить в нужную группу. Я перемещу.

Inside Сообщений: 986 - модератор

17 июня 2011, 20:51
↑
↓

Большое спасибо! *улыбается*

Хочу создать топик как внедрить Мартингейл в советник! *улыбается*

Для особо агрессивных торговцев

AM2, скажите, а как вы прикрепили в топик код MQL чтобы он просматривался так красиво?

9 amyrgan145 Сообщений: 428 - Амыр

18 июня 2011, 07:31
↑
↓

AM2, скажите, а как вы прикрепили в топик код MQL чтобы он просматривался так красиво?

Для этого нужно вставить код в текст, выделить его и нажать кнопку code в панели форматирования.

Добавил более подробное описание функций форматирования в Справку Там же в комментариях Вы можете задавать дальнейшие вопросы по использованию сайта, созданию топика, форматированию и т.д.

Inside Сообщений: 986 - модератор

18 июня 2011, 08:49
↑
↓

Самый простой способ — скачать любого мартина и переделать его под себя.

35 AM2 Автор Сообщений: 16392 - Андрей

18 июня 2011, 18:48
↑
↓

Этот способ можно применить ко всему

amyrgan145 хочет полноценный мануал сделать — лишним точно не будет!

11 pilot Сообщений: 410

19 июня 2011, 21:17
↑
↓

Да да да

Вот только я сейчас домой приехал с учебы, а тут ничего выше 3G от Мегафона нету, так что к концу недели только создам топик…

9 amyrgan145 Сообщений: 428 - Амыр

20 июня 2011, 14:52
↑
↓

предлагаю написать еще как к советнику приделать мартингейл.

15 div15 Сообщений: 71 - div15

4 сентября 2012, 19:34
↓

есть уже: mql.opentraders.ru/1663.html

35 AM2 Автор Сообщений: 16392 - Андрей

4 сентября 2012, 19:45
↑
↓

Всё это писалось довольно давно, т.е. под билд до 600 скорее всего.
А с новым билдом будет работать этот код БУ и Трала?

И как регулировать параметры: условие БУ, старт трала, шаг трала и расстояние до цены?
Редактирован: 1 ноября 2015, 18:08

3 Lagoda Сообщений: 53

1 ноября 2015, 18:03
↓

А трейлингстарт(с какой прибыли стартовать трейлингстопу)можно прикрутить?

20 alex30774 Сообщений: 757

5 декабря 2018, 15:07
↓

Зарегистрируйтесь или авторизуйтесь, чтобы оставить комментарий

Группа "Программирование на MQL"

Лучшее от AM2

Как прикрутить к советнику трейлингстоп и вывод в безубыток?

Комментарии (14)

Рейтинг брокеров FOREX

Из недавнего:

	AM2 Андрей Уровень 35

Авторизация

Группа "Программирование на MQL"

Лучшее от AM2

Как прикрутить к советнику трейлингстоп и вывод в безубыток?

Вставка изображения

СМАЙЛИКИ

Позитив

Негатив

Роли

Еще

Плакаты, знаки

Комментарии (14)

Рейтинг брокеров FOREX

Из недавнего: