//+------------------------------------------------------------------+
//|                                                gy_mp_rsi_ccx.mq4 |
//|                                                                  |
//+------------------------------------------------------------------+


#property indicator_separate_window

#property indicator_minimum 0
#property indicator_maximum 1

#property indicator_buffers 2
#property indicator_color1 Lime
#property indicator_color2 Red

// indicators parameters

extern bool      EveryTick = false;
extern string    CCI_Settings          = "=== CCI Settings ===";
extern int       CCIPeriod             =           14;  // CCI Period
extern int       CCI_HighBreakout        =           30;  // 
extern color     CCI_HighBreakoutC       =          Red;  // 
extern int       CCI_LowBreakout         =          -30;  // 
extern color     CCI_LowBreakoutC        =         Lime;  // 
extern color     CCIColor              =        Green;  // 


extern string    RSI_Settings          = "=== RSI Settings ===";
extern int       RSIPeriod             =           14;  // RSI  period
extern int       RSI_HighLevel        =           80;  // 
extern color     RSI_HighLevelC       =          Red;  // 
extern int       RSI_LowLevel         =           20;  // 
extern color     RSI_LowLevelC        =         Lime;  // 
extern color     RSIColor              =        Green;  // 

extern string prefix = " Input proper prefix and suffix for pairs";
extern string prefix1 = "  ie: IBFX uses suffix m for MiniAccounts";
extern string symbol_prefix = "";
extern string symbol_suffix = "";


extern bool  includeAUDCAD = False;
extern bool  includeAUDCHF = False;
extern bool  includeAUDJPY = False;
extern bool  includeAUDNZD = False;
extern bool  includeAUDUSD = False;
extern bool  includeCADJPY = False;
extern bool  includeCHFJPY = False;
extern bool  includeEURAUD = False;
extern bool  includeEURCAD = False;
extern bool  includeEURCHF = False;
extern bool  includeEURGBP = False;
extern bool  includeEURJPY = False;
extern bool  includeEURNZD = False;
extern bool  includeEURUSD = True;
extern bool  includeGBPAUD = False;
extern bool  includeGBPCAD = False;
extern bool  includeGBPCHF = False;
extern bool  includeGBPNZD = False;
extern bool  includeGBPJPY = False;
extern bool  includeGBPUSD = True;
extern bool  includeNZDCHF = False;
extern bool  includeNZDJPY = False;
extern bool  includeNZDUSD = False;
extern bool  includeUSDCAD = False;
extern bool  includeUSDCHF = True;
extern bool  includeUSDJPY = True;

int num_pairs = 26;
string pair_name[26];
string pair[26];
bool chosen_pair[26];

string symbol;
string Timeframe = "";
double timeframe;

string short_name="gy_mp_rsi_cci2";
int window;
int SignalBar;

   color color_common_line = White;
   color color_common_text = White;
   color color_connection;
   
    
//------------------------------------------

   color color_ind = PowderBlue;
   color color_indic = Green;
   color color_timeframe=SkyBlue;
   
   int time_frame;
   
   string ObjectID = "GY_MP";
   
   int CCI_HeaderX = 250; // X position for CCI label
   int RSI_HeaderX = 610; // X position for RSI label
   int CCI_ValueX = 40;   // X postition for CCI values start
   int RSI_ValueX = 400;  // X position for RSI values start 
   int CCI_SpaceX = 50;   // Spacing between CCI values
   int RSI_SpaceX = 50;   // Spacing between RSI Values

//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {

//---- name for indicator window

   IndicatorShortName(short_name);

//---- Timeframe and symbol
   
   time_frame=Period();
   symbol=Symbol();
   
   if(time_frame==1) { Timeframe = "M1"; }
   if(time_frame==5) { Timeframe = "M5"; }
   if(time_frame==15) { Timeframe = "M15"; }
   if(time_frame==30) { Timeframe = "M30"; }
   if(time_frame==60) { Timeframe = "H1"; }
   if(time_frame==240) { Timeframe = "H4"; }
   if(time_frame==1440) { Timeframe = "D1"; }
   if(time_frame==10080) { Timeframe = "W1"; }
   if(time_frame==43200) { Timeframe = "MN"; }
   
   ChoosePairSet();
   GetCorrectSymbols();
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
     delete_objects();
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
  

   int x, rt, mrt;
   int np, cp;
   string ap, kiir, fejlec, tper;
   int szorzo;

   double CCI_1=0;
   double RSI_1=0;

   static bool HaveWindow = false;
   static bool HeadersDisplayed = false;
   static bool SymbolsDisplayed = false;
   
   int yPos = 15;
   
//----
//----
   if (!HaveWindow)
   {
     window = WindowFind(short_name);
     HaveWindow = true;
   }
   
   if (EveryTick)
     SignalBar = 0;
   else
     SignalBar = 1;
   if (SignalBar == 1 && !NewBar()) return(0);   // wait until first tick after bar close to take any action; 

   if (!HeadersDisplayed) DisplayHeaders(yPos);      // Display only once to save time 
   yPos += 15;
   if (!SymbolsDisplayed) DisplaySymbols(yPos);
   
   for (np=0;np<num_pairs;np++)
   {
      ap=pair[np];
      if (ap == "NONE") continue;
      yPos += 15;
      
//      DisplayLabel("TR1"+DoubleToStr(np,2), 7, "Verdana", Green, 1, yPos, ap );
//      ObjectCreate("TR1"+DoubleToStr(np,2), OBJ_LABEL, WindowFind("gy_mp_rsi_cci"), 0, 0);
//      ObjectSetText("TR1"+DoubleToStr(np,2), ap ,7, "Verdana", Green);
//      ObjectSet("TR1"+DoubleToStr(np,2), OBJPROP_CORNER, 0);
//      ObjectSet("TR1"+DoubleToStr(np,2), OBJPROP_XDISTANCE, 1);
//      ObjectSet("TR1"+DoubleToStr(np,2), OBJPROP_YDISTANCE, 15+(np*15));  // 22, 37, 52, 67, 82, 97, 112, 127
      
      for (x=1;x<8;x++)      
      {
      
         switch (x) // faster than if statements
         {
         case 1 : {  CCI_1=iCCI(ap, PERIOD_M1 , CCIPeriod, PRICE_CLOSE,SignalBar); break;}
         case 2 : {  CCI_1=iCCI(ap, PERIOD_M5 , CCIPeriod, PRICE_CLOSE,SignalBar); break;}
         case 3 : {  CCI_1=iCCI(ap, PERIOD_M15, CCIPeriod, PRICE_CLOSE,SignalBar); break;}
         case 4 : {  CCI_1=iCCI(ap, PERIOD_M30, CCIPeriod, PRICE_CLOSE,SignalBar); break;}
         case 5 : {  CCI_1=iCCI(ap, PERIOD_H1 , CCIPeriod, PRICE_CLOSE,SignalBar); break;}
         case 6 : {  CCI_1=iCCI(ap, PERIOD_H4 , CCIPeriod, PRICE_CLOSE,SignalBar); break;}
         case 7 : {  CCI_1=iCCI(ap, PERIOD_D1 , CCIPeriod, PRICE_CLOSE,SignalBar); break;}
         }
         // fejléc kiírása


//         double CCI_1=iCCI(ap, tper , CCIPeriod, PRICE_CLOSE,0);
         
         color_indic = Green;
         if ((CCI_1 > CCI_HighBreakout)) { color_indic = CCI_HighBreakoutC;  }
         if ((CCI_1 < CCI_LowBreakout)) { color_indic = CCI_LowBreakoutC;  }

         DisplayLabel("TR"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), 7, "Verdana", color_indic, CCI_ValueX+(x*CCI_SpaceX), yPos, DoubleToStr(CCI_1,0) );
//         ObjectCreate("TR"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJ_LABEL, WindowFind("gy_mp_rsi_cci"), 0, 0);
//         ObjectSetText("TR"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), DoubleToStr(CCI_1,0) ,7, "Verdana", color_indic);
//         ObjectSet("TR"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJPROP_CORNER, 0);
//         ObjectSet("TR"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJPROP_XDISTANCE, 40+(x*60));
//         ObjectSet("TR"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJPROP_YDISTANCE, 15+(np*15));
      }
      
      for (x=1;x<8;x++)      
      {
      
         switch (x)
         {
         case 1 : { RSI_1=iRSI(ap, PERIOD_M1 , RSIPeriod, PRICE_CLOSE,SignalBar); break; }
         case 2 : { RSI_1=iRSI(ap, PERIOD_M5 , RSIPeriod, PRICE_CLOSE,SignalBar); break; }
         case 3 : { RSI_1=iRSI(ap, PERIOD_M15, RSIPeriod, PRICE_CLOSE,SignalBar); break; }
         case 4 : { RSI_1=iRSI(ap, PERIOD_M30, RSIPeriod, PRICE_CLOSE,SignalBar); break; }
         case 5 : { RSI_1=iRSI(ap, PERIOD_H1 , RSIPeriod, PRICE_CLOSE,SignalBar); break; }
         case 6 : { RSI_1=iRSI(ap, PERIOD_H4 , RSIPeriod, PRICE_CLOSE,SignalBar); break; }
         case 7 : { RSI_1=iRSI(ap, PERIOD_D1 , RSIPeriod, PRICE_CLOSE,SignalBar); break; }
         }
      
         // fejléc kiírása

//         double RSI_1=iRSI(ap, tper , RSIPeriod, PRICE_CLOSE,0);
         
         color_indic = Green;
         if ((RSI_1 > RSI_HighLevel)) { color_indic = RSI_HighLevelC;  }
         if ((RSI_1 < RSI_LowLevel)) { color_indic = RSI_LowLevelC;  }

         DisplayLabel("TRC"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), 7, "Verdana", color_indic, RSI_ValueX+(x*RSI_SpaceX), yPos, DoubleToStr(RSI_1,0) );
//         ObjectCreate("TRC"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJ_LABEL, WindowFind("gy_mp_rsi_cci"), 0, 0);
//         ObjectSetText("TRC"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), DoubleToStr(RSI_1,0) ,7, "Verdana", color_indic);
//         ObjectSet("TRC"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJPROP_CORNER, 0);
//         ObjectSet("TRC"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJPROP_XDISTANCE, 500+(x*60));
//         ObjectSet("TRC"+DoubleToStr(x,0)+"-"+DoubleToStr(np,0), OBJPROP_YDISTANCE, 15+(np*15));
      }

   }
   
   return(0);
  }

void DisplaySymbols(int ypos)
{
   string ap;
   
   for (int np=0;np<num_pairs;np++)
   {
      ap=pair[np];
      if (ap == "NONE") continue;
      ypos += 15;
      
      DisplayLabel("TR1"+DoubleToStr(np,2), 7, "Verdana", Green, 1, ypos, ap );
//      ObjectCreate("TR1"+DoubleToStr(np,2), OBJ_LABEL, WindowFind("gy_mp_rsi_cci"), 0, 0);
//      ObjectSetText("TR1"+DoubleToStr(np,2), ap ,7, "Verdana", Green);
//      ObjectSet("TR1"+DoubleToStr(np,2), OBJPROP_CORNER, 0);
//      ObjectSet("TR1"+DoubleToStr(np,2), OBJPROP_XDISTANCE, 1);
//      ObjectSet("TR1"+DoubleToStr(np,2), OBJPROP_YDISTANCE, 15+(np*15));  // 22, 37, 52, 67, 82, 97, 112, 127
   }
}

void DisplayHeaders(int ypos)
{
   string fejlec;
   
      DisplayLabel("cci", 9, "Verdana", Lime, CCI_HeaderX, ypos, "CCI" );
      DisplayLabel("RSI", 9, "Verdana", Lime, RSI_HeaderX, ypos, "RSI" );
      for (int x=1;x<8;x++)      
      {
      
         if (x==1) fejlec="M1";
         if (x==2) fejlec="M5";
         if (x==3) fejlec="M15";
         if (x==4) fejlec="M30";
         if (x==5) fejlec="H1";
         if (x==6) fejlec="H4";
         if (x==7) fejlec="D1";
      
         // fejléc kiírása

         DisplayLabel("cci"+DoubleToStr(x,0), 9, "Verdana", Green, CCI_ValueX+(x*CCI_SpaceX), ypos+15, fejlec );
//         ObjectCreate("cci"+DoubleToStr(x,0), OBJ_LABEL, WindowFind("gy_mp_rsi_cci"), 0, 0);
//         ObjectSetText("cci"+DoubleToStr(x,0), fejlec ,9, "Verdana", Green);
//         ObjectSet("cci"+DoubleToStr(x,0), OBJPROP_CORNER, 0);
//         ObjectSet("cci"+DoubleToStr(x,0), OBJPROP_XDISTANCE, 40+(x*60));
//         ObjectSet("cci"+DoubleToStr(x,0), OBJPROP_YDISTANCE, 15);  

      
         DisplayLabel("RSI"+DoubleToStr(x,0), 9, "Verdana", Green, RSI_ValueX+(x*RSI_SpaceX), ypos+15, fejlec );
//         ObjectCreate("RSI"+DoubleToStr(x,0), OBJ_LABEL, WindowFind("gy_mp_rsi_cci"), 0, 0);
//         ObjectSetText("RSI"+DoubleToStr(x,0), fejlec ,9, "Verdana", Green);
//         ObjectSet("RSI"+DoubleToStr(x,0), OBJPROP_CORNER, 0);
//         ObjectSet("RSI"+DoubleToStr(x,0), OBJPROP_XDISTANCE, 500+(x*60));
//         ObjectSet("RSI"+DoubleToStr(x,0), OBJPROP_YDISTANCE, 15); 
     } 
}

void delete_objects()
{

   int i, tot;
   string object_name;

   tot = ObjectsTotal();
   
   for (i = tot; i>=0;i--)
   {
    object_name = ObjectName(i);
    if (StringFind(object_name, ObjectID) > -1 ) ObjectDelete(object_name);
   }
}

void DisplayLabel(string myID, int FontSize, string FontName, color FontColor, int xPos, int yPos, string value)
{
   string thisID = ObjectID + myID;
   
   if (ObjectFind(thisID) != 0)
   {
         ObjectCreate(thisID, OBJ_LABEL, window, 0, 0);
         ObjectSet(thisID, OBJPROP_CORNER, 0);
         ObjectSet(thisID, OBJPROP_XDISTANCE, xPos);
         ObjectSet(thisID, OBJPROP_YDISTANCE, yPos);
    }
    ObjectSetText(thisID,""+value+"", FontSize, FontName,  FontColor);
}

void GetCorrectSymbols()
{
   for (int i = 0; i<num_pairs;i++)
   {
     if (chosen_pair[i])
        pair[i] = symbol_prefix + pair_name[i] + symbol_suffix;
     else
        pair[i] = "NONE";
   }
}

void ChoosePairSet()
{
  
  pair_name[0] = "AUDCAD";
  pair_name[1] =  "AUDCHF";
  pair_name[2] =  "AUDJPY";
  pair_name[3] =  "AUDNZD";
  pair_name[4] =  "AUDUSD";
  pair_name[5] =  "CADJPY";
  pair_name[6] =  "CHFJPY";
  pair_name[7] =  "EURAUD";
  pair_name[8] =  "EURCAD";
  pair_name[9] =  "EURCHF";
  pair_name[10] =  "EURGBP";
  pair_name[11] =  "EURJPY";
  pair_name[12] =  "EURNZD";
  pair_name[13] =  "EURUSD";
  pair_name[14] =  "GBPAUD";
  pair_name[15] =  "GBPCAD";
  pair_name[16] =  "GBPCHF";
  pair_name[17] =  "GBPNZD";
  pair_name[18] =  "GBPJPY";
  pair_name[19] =  "GBPUSD";
  pair_name[20] =  "NZDCHF";
  pair_name[21] =  "NZDJPY";
  pair_name[22] =  "NZDUSD";
  pair_name[23] =  "USDCAD";
  pair_name[24] =  "USDCHF";
  pair_name[25] =  "USDJPY";

  chosen_pair[0] = includeAUDCAD;
  chosen_pair[1] =  includeAUDCHF;
  chosen_pair[2] =  includeAUDJPY;
  chosen_pair[3] =  includeAUDNZD;
  chosen_pair[4] =  includeAUDUSD;
  chosen_pair[5] =  includeCADJPY;
  chosen_pair[6] =  includeCHFJPY;
  chosen_pair[7] =  includeEURAUD;
  chosen_pair[8] =  includeEURCAD;
  chosen_pair[9] =  includeEURCHF;
  chosen_pair[10] =  includeEURGBP;
  chosen_pair[11] =  includeEURJPY;
  chosen_pair[12] =  includeEURNZD;
  chosen_pair[13] =  includeEURUSD;
  chosen_pair[14] =  includeGBPAUD;
  chosen_pair[15] =  includeGBPCAD;
  chosen_pair[16] =  includeGBPCHF;
  chosen_pair[17] =  includeGBPNZD;
  chosen_pair[18] =  includeGBPJPY;
  chosen_pair[19] =  includeGBPUSD;
  chosen_pair[20] =  includeNZDCHF;
  chosen_pair[21] =  includeNZDJPY;
  chosen_pair[22] =  includeNZDUSD;
  chosen_pair[23] =  includeUSDCAD;
  chosen_pair[24] =  includeUSDCHF;
  chosen_pair[25] =  includeUSDJPY;
   
   return;
}

//-- Check for Start of a new Bar
bool NewBar()
{
   static datetime dt = 0;
   
   if (Time[0] != dt)
   {
      dt = Time[0];
      return(true);
   }
   return(false);
}