MFITrend_x10Full

//+------------------------------------------------------------------+
//|                                             MFITrend_x10Full.mq5 |
//|                               Copyright © 2015, Nikolay Kositsin |
//|                              Khabarovsk,   farria@mail.redcom.ru | 
//+------------------------------------------------------------------+
#property copyright "2015, Nikolay Kositsin"
#property link      "farria@mail.redcom.ru"
#property description "Èíäèêàòîð îòîáðàæàåò ïîëîæåíèå îñöèëëÿòîðà MFI ñ ðàçíûõ òàéìôðåéìîâ"
//---- íîìåð âåðñèè èíäèêàòîðà
#property version   "1.00"
//---- îòðèñîâêà èíäèêàòîðà â ãëàâíîì îêíå
#property indicator_chart_window
//---- êîëè÷åñòâî èíäèêàòîðíûõ áóôåðîâ 0
#property indicator_buffers 0 
//---- íå èñïîëüçîâàíî íè îäíîãî ãðàôè÷åñêîãî ïîñòðîåíèÿ
#property indicator_plots   0
//+-----------------------------------+
//|  îáúÿâëåíèå êîíñòàíò              |
//+-----------------------------------+
#define RESET 0          // Êîíñòàíòà äëÿ âîçâðàòà òåðìèíàëó êîìàíäû íà ïåðåñ÷¸ò èíäèêàòîðà
#define INDTOTAL 10      // Êîíñòàíòà äëÿ êîëè÷åñòâà îòîáðàæàåìûõ èíäèêàòîðîâ
//+----------------------------------------------+
// Îïèñàíèå ïåðå÷èñëåíèÿ type_font               |
// Îïèñàíèå êëàññà CFontName                     | 
//+----------------------------------------------+ 
#include <GetFontName.mqh>
//+----------------------------------------------+
//| Âõîäíûå ïàðàìåòðû èíäèêàòîðà                 |
//+----------------------------------------------+
input ENUM_TIMEFRAMES      TimeFrame1=PERIOD_H1;       //ïåðèîä ãðàôèêà 1
input uint                 MFIPeriod1=7;               //ïåðèîä MFI 1
input ENUM_APPLIED_VOLUME  VolumeType1=VOLUME_TICK;    //îáú¸ì 1
input uint                 UpLevel1=70;                //óðîâåíü ïåðåçàêóïà 1
input uint                 DnLevel1=30;                //óðîâåíü ïåðåïðîäàííîñòè 1

input ENUM_TIMEFRAMES      TimeFrame2=PERIOD_H1;       //ïåðèîä ãðàôèêà 2
input uint                 MFIPeriod2=11;              //ïåðèîä MFI 2
input ENUM_APPLIED_VOLUME  VolumeType2=VOLUME_TICK;    //îáú¸ì 2
input uint                 UpLevel2=70;                //óðîâåíü ïåðåçàêóïà 2
input uint                 DnLevel2=30;                //óðîâåíü ïåðåïðîäàííîñòè 2

input ENUM_TIMEFRAMES      TimeFrame3=PERIOD_H1;       //ïåðèîä ãðàôèêà 3
input uint                 MFIPeriod3=15;              //ïåðèîä MFI 3
input ENUM_APPLIED_VOLUME  VolumeType3=VOLUME_TICK;    //îáú¸ì 3
input uint                 UpLevel3=70;                //óðîâåíü ïåðåçàêóïà 3
input uint                 DnLevel3=30;                //óðîâåíü ïåðåïðîäàííîñòè 3

input ENUM_TIMEFRAMES      TimeFrame4=PERIOD_H1;       //ïåðèîä ãðàôèêà 4
input uint                 MFIPeriod4=19;              //ïåðèîä MFI 4
input ENUM_APPLIED_VOLUME  VolumeType4=VOLUME_TICK;    //îáú¸ì 4
input uint                 UpLevel4=70;                //óðîâåíü ïåðåçàêóïà 4
input uint                 DnLevel4=30;                //óðîâåíü ïåðåïðîäàííîñòè 4

input ENUM_TIMEFRAMES      TimeFrame5=PERIOD_H1;       //ïåðèîä ãðàôèêà 5
input uint                 MFIPeriod5=23;              //ïåðèîä MFI 5
input ENUM_APPLIED_VOLUME  VolumeType5=VOLUME_TICK;    //îáú¸ì 5
input uint                 UpLevel5=70;                //óðîâåíü ïåðåçàêóïà 5
input uint                 DnLevel5=30;                //óðîâåíü ïåðåïðîäàííîñòè 5

input ENUM_TIMEFRAMES      TimeFrame6=PERIOD_H1;       //ïåðèîä ãðàôèêà 6
input uint                 MFIPeriod6=27;              //ïåðèîä MFI 6
input ENUM_APPLIED_VOLUME  VolumeType6=VOLUME_TICK;    //îáú¸ì 6
input uint                 UpLevel6=70;                //óðîâåíü ïåðåçàêóïà 6
input uint                 DnLevel6=30;                //óðîâåíü ïåðåïðîäàííîñòè 6

input ENUM_TIMEFRAMES      TimeFrame7=PERIOD_H1;       //ïåðèîä ãðàôèêà 7
input uint                 MFIPeriod7=31;              //ïåðèîä MFI 7
input ENUM_APPLIED_VOLUME  VolumeType7=VOLUME_TICK;    //îáú¸ì 7
input uint                 UpLevel7=70;                //óðîâåíü ïåðåçàêóïà 7
input uint                 DnLevel7=30;                //óðîâåíü ïåðåïðîäàííîñòè 7

input ENUM_TIMEFRAMES      TimeFrame8=PERIOD_H1;       //ïåðèîä ãðàôèêà 8
input uint                 MFIPeriod8=35;              //ïåðèîä MFI 8
input ENUM_APPLIED_VOLUME  VolumeType8=VOLUME_TICK;    //îáú¸ì 8
input uint                 UpLevel8=70;                //óðîâåíü ïåðåçàêóïà 8
input uint                 DnLevel8=30;                //óðîâåíü ïåðåïðîäàííîñòè 8

input ENUM_TIMEFRAMES      TimeFrame9=PERIOD_H1;       //ïåðèîä ãðàôèêà 9
input uint                 MFIPeriod9=39;              //ïåðèîä MFI 9
input ENUM_APPLIED_VOLUME  VolumeType9=VOLUME_TICK;    //îáú¸ì 9
input uint                 UpLevel9=70;                //óðîâåíü ïåðåçàêóïà 9
input uint                 DnLevel9=30;                //óðîâåíü ïåðåïðîäàííîñòè 9

input ENUM_TIMEFRAMES      TimeFrame10=PERIOD_H1;      //ïåðèîä ãðàôèêà 10
input uint                 MFIPeriod10=43;             //ïåðèîä MFI 10
input ENUM_APPLIED_VOLUME  VolumeType10=VOLUME_TICK;   //îáú¸ì 10
input uint                 UpLevel10=70;               //óðîâåíü ïåðåçàêóïà 10
input uint                 DnLevel10=30;               //óðîâåíü ïåðåïðîäàííîñòè 10
//----
input color  CpColor=clrDarkOrchid;                   //öâåò íàçâàíèÿ èíäèêàòîðà
input color  UpColor=clrBlue;                         //öâåò ïåðåêóïëåííîñòè èíäèêàòîðà
input color  DnColor=clrGold;                         //öâåò ïåðåïðîäàííîñòè èíäèêàòîðà
input color  ZrColor=clrGray;                         //öâåò áåç èçìåíåíèÿ
input int    FontSize=11;                             //ðàçìåð øðèôòà
input type_font FontType=Font14;                      //òèï øðèôòà
input ENUM_BASE_CORNER  WhatCorner=CORNER_LEFT_LOWER; //óãîë ðàñïîëîæåíèÿ
input uint Y_=20;                                     //ðàñïîëîæåíèå ïî âåðòèêàëè
input uint X_=5;                                      //ðàñïîëîæåíèå ïî ãîðèçîíòàëè
//+----------------------------------------------+
string sFontType;
int min_rates_total;
uint xshift,shift[11];
string sPer[10],sPerA[10],sPerB[10],Cap;
ENUM_TIMEFRAMES ePer[10];
//+------------------------------------------------------------------+
//| Ïîëó÷åíèå òàéìôðåéìà â âèäå ñòðîêè                               |
//+------------------------------------------------------------------+
string GetStringTimeframe(ENUM_TIMEFRAMES timeframe)
  {return(StringSubstr(EnumToString(timeframe),7,-1));}
//+------------------------------------------------------------------+
//|  Êëàññ ìàññèâîâ                                                  |
//+------------------------------------------------------------------+  
class CIndArrow
  {
   //----
public:
   double               m_Ind[1];
   int                  m_Handle;
   ENUM_TIMEFRAMES      m_TimeFrame;
   uint                 m_Period;
   ENUM_APPLIED_VOLUME  m_VolumeType;
   double               m_UpLevel;
   double               m_DnLevel;
   //---- 
  };
//---- îáúÿâëåíèå ìàññèâîâ, êîòîðûå áóäóò â 
// äàëüíåéøåì èñïîëüçîâàíû äëÿ ïîëó÷åíèÿ èíäèêàòîðíûõ çíà÷åíèé
CIndArrow Ind[INDTOTAL];
//+------------------------------------------------------------------+   
//| Custom indicator initialization function                         | 
//+------------------------------------------------------------------+ 
int OnInit()
  {
//----  
   ePer[0]=TimeFrame1;
   ePer[1]=TimeFrame2;
   ePer[2]=TimeFrame3;
   ePer[3]=TimeFrame4;
   ePer[4]=TimeFrame5;
   ePer[5]=TimeFrame6;
   ePer[6]=TimeFrame7;
   ePer[7]=TimeFrame8;
   ePer[8]=TimeFrame9;
   ePer[9]=TimeFrame10;
   for(int poz=0; poz<INDTOTAL; poz++) Ind[poz].m_TimeFrame=ePer[poz];
   //----  
   Ind[0].m_Period=MFIPeriod1;
   Ind[1].m_Period=MFIPeriod2;
   Ind[2].m_Period=MFIPeriod3;
   Ind[3].m_Period=MFIPeriod4;
   Ind[4].m_Period=MFIPeriod5;
   Ind[5].m_Period=MFIPeriod6;
   Ind[6].m_Period=MFIPeriod7;
   Ind[7].m_Period=MFIPeriod8;
   Ind[8].m_Period=MFIPeriod9;
   Ind[9].m_Period=MFIPeriod10;
   //----  
   Ind[0].m_VolumeType=VolumeType1;
   Ind[1].m_VolumeType=VolumeType2;
   Ind[2].m_VolumeType=VolumeType3;
   Ind[3].m_VolumeType=VolumeType4;
   Ind[4].m_VolumeType=VolumeType5;
   Ind[5].m_VolumeType=VolumeType6;
   Ind[6].m_VolumeType=VolumeType7;
   Ind[7].m_VolumeType=VolumeType8;
   Ind[8].m_VolumeType=VolumeType9;
   Ind[9].m_VolumeType=VolumeType10;
   //----  
   Ind[0].m_UpLevel=UpLevel1;
   Ind[1].m_UpLevel=UpLevel2;
   Ind[2].m_UpLevel=UpLevel3;
   Ind[3].m_UpLevel=UpLevel4;
   Ind[4].m_UpLevel=UpLevel5;
   Ind[5].m_UpLevel=UpLevel6;
   Ind[6].m_UpLevel=UpLevel7;
   Ind[7].m_UpLevel=UpLevel8;
   Ind[8].m_UpLevel=UpLevel9;
   Ind[9].m_UpLevel=UpLevel10;
   //----  
   Ind[0].m_DnLevel=DnLevel1;
   Ind[1].m_DnLevel=DnLevel2;
   Ind[2].m_DnLevel=DnLevel3;
   Ind[3].m_DnLevel=DnLevel4;
   Ind[4].m_DnLevel=DnLevel5;
   Ind[5].m_DnLevel=DnLevel6;
   Ind[6].m_DnLevel=DnLevel7;
   Ind[7].m_DnLevel=DnLevel8;
   Ind[8].m_DnLevel=DnLevel9;
   Ind[9].m_DnLevel=DnLevel10;
//---- Ïîëó÷åíèå õåíäëîâ èíäèêàòîðîâ
   for(int poz=0; poz<INDTOTAL; poz++)
     {
      Ind[poz].m_Handle=iMFI(Symbol(),Ind[poz].m_TimeFrame,Ind[poz].m_Period,Ind[poz].m_VolumeType);

      if(Ind[poz].m_Handle==INVALID_HANDLE)
        {
         Print("OnInit()(",poz,"): Íå óäàëîñü ïîëó÷èòü õåíäë èíäèêàòîðà MFI",poz);
         return(false);
        }
     }
//----   
   CFontName FONT;
   sFontType=FONT.GetFontName(FontType);
   Deinit();
   uint max=0;
   for(int poz=0; poz<INDTOTAL; poz++) if(Ind[poz].m_Period>max) max=Ind[poz].m_Period;
   min_rates_total=int(max+1);
//----  
   xshift=int(X_+8.3*FontSize);
   Cap="MFITrend_x10Full";
//----
   switch(WhatCorner)
     {
      case CORNER_RIGHT_LOWER:
        {
         for(int poz=0; poz<=INDTOTAL; poz++) shift[10-poz]=Y_+22*poz;
         break;
        }

      case CORNER_LEFT_LOWER:
        {
         for(int poz=0; poz<=INDTOTAL; poz++) shift[10-poz]=Y_+22*poz;
         break;
        }
      default:
        {
         for(int poz=0; poz<=INDTOTAL; poz++) shift[poz]=Y_+22*poz;
        }
     }

   for(int poz=0; poz<INDTOTAL; poz++)
     {
      sPer[poz]=string(poz+1)+" "+GetStringTimeframe(ePer[poz]);
      sPerA[poz]=sPer[poz]+"Stat+";
      sPerB[poz]=sPer[poz]+"Stat_";
     }
//--- çàâåðøåíèå èíèöèàëèçàöèè
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//----
   Deinit();
//----
   ChartRedraw(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+    
void Deinit()
  {
//----
   for(int poz=0; poz<INDTOTAL; poz++)
     {
      ObjectDelete(0,sPerA[poz]);
      ObjectDelete(0,sPerB[poz]);
     }
   ObjectDelete(0,Cap);
//----
  }
//+------------------------------------------------------------------+
//|  Ñîçäàíèå òåêñòîâîé ëåéáû                                        |
//+------------------------------------------------------------------+
void CreateTLabel
(
long   chart_id,         // èäåíòèôèêàòîð ãðàôèêà
string name,             // èìÿ îáúåêòà
int    nwin,             // èíäåêñ îêíà
ENUM_BASE_CORNER corner, // ïîëîæåíèå óãëà ïðèâÿçêè
ENUM_ANCHOR_POINT point, // ïîëîæåíèå òî÷êè ïðèâÿçêè
int    X,                // äèñòàíöèÿ â ïèêñåëÿõ ïî îñè X îò óãëà ïðèâÿçêè
int    Y,                // äèñòàíöèÿ â ïèêñåëÿõ ïî îñè Y îò óãëà ïðèâÿçêè
string text,             // òåêñò
color  Color,            // öâåò òåêñòà
string Font,             // øðèôò òåêñòà
int    Size              // ðàçìåð øðèôòà
)
//---- 
  {
//----
   ObjectCreate(chart_id,name,OBJ_LABEL,0,0,0);
   ObjectSetInteger(chart_id,name,OBJPROP_CORNER,corner);
   ObjectSetInteger(chart_id,name,OBJPROP_ANCHOR,point);
   ObjectSetInteger(chart_id,name,OBJPROP_XDISTANCE,X);
   ObjectSetInteger(chart_id,name,OBJPROP_YDISTANCE,Y);
   ObjectSetString(chart_id,name,OBJPROP_TEXT,text);
   ObjectSetInteger(chart_id,name,OBJPROP_COLOR,Color);
   ObjectSetString(chart_id,name,OBJPROP_FONT,Font);
   ObjectSetInteger(chart_id,name,OBJPROP_FONTSIZE,Size);
   ObjectSetInteger(chart_id,name,OBJPROP_BACK,false);
//----
  }
//+------------------------------------------------------------------+
//|  Ïåðåóñòàíîâêà òåêñòîâîé ëåéáû                                   |
//+------------------------------------------------------------------+
void SetTLabel
(
long   chart_id,         // èäåíòèôèêàòîð ãðàôèêà
string name,             // èìÿ îáúåêòà
int    nwin,             // èíäåêñ îêíà
ENUM_BASE_CORNER corner,// ïîëîæåíèå óãëà ïðèâÿçêè
ENUM_ANCHOR_POINT point, // ïîëîæåíèå òî÷êè ïðèâÿçêè
int    X,                // äèñòàíöèÿ â ïèêñåëÿõ ïî îñè X îò óãëà ïðèâÿçêè
int    Y,                // äèñòàíöèÿ â ïèêñåëÿõ ïî îñè Y îò óãëà ïðèâÿçêè
string text,             // òåêñò
color  Color,            // öâåò òåêñòà
string Font,             // øðèôò òåêñòà
int    Size              // ðàçìåð øðèôòà
)
//---- 
  {
//----
   if(ObjectFind(chart_id,name)==-1) CreateTLabel(chart_id,name,nwin,corner,point,X,Y,text,Color,Font,Size);
   else
     {
      ObjectSetString(chart_id,name,OBJPROP_TEXT,text);
      ObjectSetInteger(chart_id,name,OBJPROP_XDISTANCE,X);
      ObjectSetInteger(chart_id,name,OBJPROP_YDISTANCE,Y);
      ObjectSetInteger(chart_id,name,OBJPROP_COLOR,Color);
     }
//----
  }
//+------------------------------------------------------------------+ 
//| Custom indicator iteration function                              | 
//+------------------------------------------------------------------+ 
int OnCalculate(
                const int rates_total,    // êîëè÷åñòâî èñòîðèè â áàðàõ íà òåêóùåì òèêå
                const int prev_calculated,// êîëè÷åñòâî èñòîðèè â áàðàõ íà ïðåäûäóùåì òèêå
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[]
                )
  {
//--- ïðîâåðêà êîëè÷åñòâà áàðîâ íà äîñòàòî÷íîñòü äëÿ ðàñ÷åòà
   for(int poz=0; poz<INDTOTAL; poz++) if(Bars(Symbol(),ePer[poz])<min_rates_total) return(RESET);

//---- êîïèðóåì âíîâü ïîÿâèâøèåñÿ äàííûå â ìàññèâû 
   for(int poz=0; poz<INDTOTAL; poz++) if(CopyBuffer(Ind[poz].m_Handle,MAIN_LINE,1,1,Ind[poz].m_Ind)<=0) return(RESET);
//----
   color ColorGain[INDTOTAL];
   ArrayInitialize(ColorGain,ZrColor);
//---- êîïèðóåì âíîâü ïîÿâèâøèåñÿ äàííûå â ìàññèâû 
   for(int poz=0; poz<INDTOTAL; poz++)
     {
      if(Ind[poz].m_Ind[0]>Ind[poz].m_UpLevel) ColorGain[poz]=UpColor;
      if(Ind[poz].m_Ind[0]<Ind[poz].m_DnLevel) ColorGain[poz]=DnColor;
     }
//----
   for(int poz=0; poz<INDTOTAL; poz++)
     {
      SetTLabel(0,sPerA[poz],0,WhatCorner,ENUM_ANCHOR_POINT(2*WhatCorner),X_,shift[poz+1],sPer[poz]+": ",ColorGain[poz],sFontType,FontSize);
      SetTLabel(0,sPerB[poz],0,WhatCorner,ENUM_ANCHOR_POINT(2*WhatCorner),xshift,shift[poz+1],"n",ColorGain[poz],"Wingdings",FontSize);
     }
   SetTLabel(0,Cap,0,WhatCorner,ENUM_ANCHOR_POINT(2*WhatCorner),X_,shift[0],Cap,CpColor,sFontType,FontSize);
//----
   ChartRedraw(0);
   return(rates_total);
  }
//+------------------------------------------------------------------+