BalanceOfPower_Histogram_Alert - индикатор для MetaTrader 5

Реальный автор:

RoboFx

Индикатор Balance of Power (BOP) в виде цветной гистограммы силы и направления действующего тренда с подачей алертов, с отправкой почтовых сообщений и push-сообщений на смартфон. Раскраска гистограммы происходит в соответствии со значениями входных параметров уровней перекупленности и перепроданности и направления движения гистограммы.

Для алертов, почтовых сообщений и push-сообщений на смартфон в коде индикатора были сделаны следующие изменения:

1. Во входные параметры индикатора дописаны новые входные переменные

   //---- Входные переменные для алертов 
   input uint NumberofBar=1;                    //Номер бара для подачи сигнала
   input bool SoundON=true;                     //Разрешение алерта
   input uint NumberofAlerts=2;                 //Количество алертов
   input bool EMailON=false;                    //Разрешение почтовой отправки сигнала
   input bool PushON=false;                     //Разрешение отправки сигнала на мобильный

2. Добавлены три новые функции BuySignal(), SellSignal() и GetStringTimeframe() в конец индикаторного кода

   //+------------------------------------------------------------------+
   //| Buy signal function                                              |
   //+------------------------------------------------------------------+
   void BuySignal(string SignalSirname,// текст имени индикатора для почтовых и пуш-сигналов
                  double &ColorArray[],// цветовой индексный буфер
                  int ColorIndex,// индекс цвета в цветовом индексном буфере для подачи сигнала 
                  const int Rates_total,     // текущее количество баров
                  const int Prev_calculated, // количество баров на предыдущем тике
                  const double &Close[],     // цена закрытия
                  const int &Spread[])       // спред
     {
   //---
      static uint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool BuySignal=false;
      bool SeriesTest=ArrayGetAsSeries(ColorArray);
      int index,index1;
      if(SeriesTest)
        {
         index=int(NumberofBar);
         index1=index+1;
        }
      else
        {
         index=Rates_total-int(NumberofBar)-1;
         index1=index-1;
        }
      if(ColorArray[index1]!=ColorIndex && ColorArray[index]==ColorIndex) BuySignal=true;
      if(BuySignal && counter<=NumberofAlerts)
        {
         counter++;
         MqlDateTime tm;
         TimeToStruct(TimeCurrent(),tm);
         string text=TimeToString(TimeCurrent(),TIME_DATE)+" "+string(tm.hour)+":"+string(tm.min);
         SeriesTest=ArrayGetAsSeries(Close);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         double Ask=Close[index];
         double Bid=Close[index];
         SeriesTest=ArrayGetAsSeries(Spread);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         Bid+=Spread[index];
         string sAsk=DoubleToString(Ask,_Digits);
         string sBid=DoubleToString(Bid,_Digits);
         string sPeriod=GetStringTimeframe(ChartPeriod());
         if(SoundON) Alert("BUY signal \n Ask=",Ask,"\n Bid=",Bid,"\n currtime=",text,"\n Symbol=",Symbol()," Period=",sPeriod);
         if(EMailON) SendMail(SignalSirname+": BUY signal alert","BUY signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
         if(PushON) SendNotification(SignalSirname+": BUY signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
        }
   
   //---
     }
   //+------------------------------------------------------------------+
   //| Sell signal function                                             |
   //+------------------------------------------------------------------+
   void SellSignal(string SignalSirname,      // текст имени индикатора для почтовых и пуш-сигналов
                   double &ColorArray[],       // цветовой индексный буфер
                   int ColorIndex,             // индекс цвета в цветовом индексном буфере для подачи сигнала 
                   const int Rates_total,     // текущее количество баров
                   const int Prev_calculated, // количество баров на предыдущем тике
                   const double &Close[],     // цена закрытия
                   const int &Spread[])       // спред
     {
   //---
      static uint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool SellSignal=false;
      bool SeriesTest=ArrayGetAsSeries(ColorArray);
      int index,index1;
      if(SeriesTest)
        {
         index=int(NumberofBar);
         index1=index+1;
        }
      else
        {
         index=Rates_total-int(NumberofBar)-1;
         index1=index-1;
        }
      if(ColorArray[index1]!=ColorIndex && ColorArray[index]==ColorIndex) SellSignal=true;
      if(SellSignal && counter<=NumberofAlerts)
        {
         counter++;
         MqlDateTime tm;
         TimeToStruct(TimeCurrent(),tm);
         string text=TimeToString(TimeCurrent(),TIME_DATE)+" "+string(tm.hour)+":"+string(tm.min);
         SeriesTest=ArrayGetAsSeries(Close);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         double Ask=Close[index];
         double Bid=Close[index];
         SeriesTest=ArrayGetAsSeries(Spread);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         Bid+=Spread[index];
         string sAsk=DoubleToString(Ask,_Digits);
         string sBid=DoubleToString(Bid,_Digits);
         string sPeriod=GetStringTimeframe(ChartPeriod());
         if(SoundON) Alert("SELL signal \n Ask=",Ask,"\n Bid=",Bid,"\n currtime=",text,"\n Symbol=",Symbol()," Period=",sPeriod);
         if(EMailON) SendMail(SignalSirname+": SELL signal alert","SELL signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
         if(PushON) SendNotification(SignalSirname+": SELL signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
        }
   //---
     }
   //+------------------------------------------------------------------+
   //|  Получение таймфрейма в виде строки                              |
   //+------------------------------------------------------------------+
   string GetStringTimeframe(ENUM_TIMEFRAMES timeframe)
     {
   //----
      return(StringSubstr(EnumToString(timeframe),7,-1));
   //----
     }

3. В блоке OnCalculate() после циклов расчёта индикатора добавлена пара обращений к функциям BuySignal() и SellSignal()

   //---     
      BuySignal("BalanceOfPower_Histogram_Alert",ColorIndBuffer,0,rates_total,prev_calculated,close,spread);
      SellSignal("BalanceOfPower_Histogram_Alert",ColorIndBuffer,7,rates_total,prev_calculated,close,spread);
   //---

Где ColorIndBuffer — это имя цветового индексного буфера для хранения цветовой окраски свечи в виде индекса.

Предполагается, что в коде индикатора в блоке OnCalculate() будет использовано всего по одному обращению к функциям BuySignal() и SellSignal().

Индикатор использует классы библиотеки SmoothAlgorithms.mqh (нужно скопировать в <каталог_данных_терминала>\MQL5\Include), подробное описание работы с которыми было опубликовано в статье "Усреднение ценовых рядов без дополнительных буферов для промежуточных расчетов".

Впервые этот индикатор был реализован на MQL5 и опубликован в Code Base 07.02.2013.

Рис.1. Индикатор BalanceOfPower_Histogram_Alert на графике

Рис.2. Индикатор BalanceOfPower_Histogram_Alert. Подача алерта