//+------------------------------------------------------------------+
//|                                              Sheko's MTF RSI.mq4 |
//|                                                         Rob Rice |
//|                                                                  |
//+------------------------------------------------------------------+
#property copyright "Rob Rice"
#property link      ""

#property indicator_chart_window

int      i, tf;
string   RSI_AUD[3], RSI_EUR[3], RSI_GBP[3], RSI_NZD[3], RSI_CAD[3], RSI_CHF[3], RSI_JPY[3];
string   Text;

extern int  RSI_Periods = 34;
extern bool mini_account = true;


//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----

   Comment ("");
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   int    counted_bars=IndicatorCounted();
   
   for(i=0; i<3; i++)
      {
      if (i == 0) tf = 240;
      if (i == 1) tf = 1440;
      if (i == 2) tf = 10080;
      
      
      if (mini_account)
         {
         RSI_AUD[i] = DoubleToStr (NormalizeDouble (iRSI("AUDUSDm",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_EUR[i] = DoubleToStr (NormalizeDouble (iRSI("EURUSDm",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_GBP[i] = DoubleToStr (NormalizeDouble (iRSI("GBPUSDm",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_NZD[i] = DoubleToStr (NormalizeDouble (iRSI("NZDUSDm",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_CAD[i] = DoubleToStr (NormalizeDouble (iRSI("USDCADm",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_CHF[i] = DoubleToStr (NormalizeDouble (iRSI("USDCHFm",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_JPY[i] = DoubleToStr (NormalizeDouble (iRSI("USDJPYm",tf,RSI_Periods,PRICE_CLOSE,0),2),1);
         }
      else
         {
         RSI_AUD[i] = DoubleToStr (NormalizeDouble (iRSI("AUDUSD",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_EUR[i] = DoubleToStr (NormalizeDouble (iRSI("EURUSD",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_GBP[i] = DoubleToStr (NormalizeDouble (iRSI("GBPUSD",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_NZD[i] = DoubleToStr (NormalizeDouble (iRSI("NZDUSD",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_CAD[i] = DoubleToStr (NormalizeDouble (iRSI("USDCAD",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_CHF[i] = DoubleToStr (NormalizeDouble (iRSI("USDCHF",tf,RSI_Periods,PRICE_CLOSE,0),1),1);
         RSI_JPY[i] = DoubleToStr (NormalizeDouble (iRSI("USDJPY",tf,RSI_Periods,PRICE_CLOSE,0),2),1);
         }
      }
 
     Text = "  " + "\n"+
            "Pair         ::: RSI 4H  :::   RSI Daily  :::  RSI Weekly" + "\n"+
            "AUDUSD :::   " + RSI_AUD[0] + "    :::      " + RSI_AUD[1] + "   :::      " + RSI_AUD[2] + "\n"  + 
            "EURUSD :::   " + RSI_EUR[0] + "     :::      " + RSI_EUR[1] + "   :::      " + RSI_EUR[2] + "\n"  + 
            "GBPUSD :::   " + RSI_GBP[0] + "     :::      " + RSI_GBP[1] + "   :::      " + RSI_GBP[2] + "\n"  + 
            "NZDUSD :::   " + RSI_NZD[0] + "     :::      " + RSI_NZD[1] + "   :::      " + RSI_NZD[2] + "\n"  + 
            "USDCAD :::   " + RSI_CAD[0] + "    :::      " + RSI_CAD[1] + "   :::      " + RSI_CAD[2] + "\n"  + 
            "USDCHF :::   " + RSI_CHF[0] + "     :::      " + RSI_CHF[1] + "   :::      " + RSI_CHF[2] + "\n"  + 
            "USDJPY  :::   " + RSI_JPY[0] + "     :::      " + RSI_JPY[1] + "   :::      " + RSI_JPY[2] + "\n";

   
   Comment(Text);
   
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+