BykovTrendAlert - MetaTrader 5のためのインディケータ

実際の著者：

Ramdass - 変換のみ

アラート、メール、モバイルデバイスへのプッシュ通知送信機能を備えたBykovTrendセマフォ⁻指標です。

アラート、電子メールメッセージ、およびプッシュ通知を実装するために、指標コードは以下のように変更されました。

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()の3つの新しい関数の追加

   //+------------------------------------------------------------------+
   //--- 買いシグナル関数
   //+------------------------------------------------------------------+
   void BuySignal(string SignalSirname,      // 電子メールとプッシュメッセージでの指標名のテキスト
                  double &BuyArrow[],        // 買いシグナルの指標バッファ
                  const int Rates_total,     // 現在のバー数
                  const int Prev_calculated, // 1つ前のティックでのバー数
                  const double &Close[],     // 終値
                  const int &Spread[])       // スプレッド
     {
   //---
      static uint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool BuySignal=false;
      bool SeriesTest=ArrayGetAsSeries(BuyArrow);
      int index;
      if(SeriesTest) index=int(NumberofBar);
      else index=Rates_total-int(NumberofBar)-1;
      if(NormalizeDouble(BuyArrow[index],_Digits) && BuyArrow[index]!=EMPTY_VALUE) 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);
        }
   
   //---
     }
   //+------------------------------------------------------------------+
   //| 売りシグナル関数                                             |
   //+------------------------------------------------------------------+
   void SellSignal(string SignalSirname,      // 電子メールとプッシュメッセージでの指標名のテキスト
                   double &SellArrow[],       // 売りシグナルの指標バッファ
                   const int Rates_total,     // 現在のバー数
                   const int Prev_calculated, // 1つ前のティックでのバー数
                   const double &Close[],     // 終値
                   const int &Spread[])       // スプレッド
     {
   //---
      static uint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool SellSignal=false;
      bool SeriesTest=ArrayGetAsSeries(SellArrow);
      int index;
      if(SeriesTest) index=int(NumberofBar);
      else index=Rates_total-int(NumberofBar)-1;
      if(NormalizeDouble(SellArrow[index],_Digits) && SellArrow[index]!=EMPTY_VALUE) 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() 関数への2回の呼び出しの追加

   //---     
      BuySignal("BykovTrendAlert",BuyBuffer,rates_total,prev_calculated,close,spread);
      SellSignal("BykovTrendAlert",SellBuffer,rates_total,prev_calculated,close,spread);
   //--- 
   

ここでBuyBufferとSellBufferは売買シグナルを格納する指標バッファの名前です。指標バッファ内の空の値はゼロまたはEMPTY_VALUEのいずれかに設定される必要があります。

BuySignal() およびSellSignal()関数は指標コードのOnCalculate() ブロックで1回のみ呼び出されることが前提です。

この指標は初めにMQL4で実装され2007年9月28日にコードベースで公開されました。

図1　チャートでのBykovTrendAlert指標

図2　BykovTrendAlert指標のアラート生成