I will code your EAs and Indicators for no charge

Quoting T4Trade

Disliked

{quote} Please do whatever and whenever you can,what you doing is very generous,we cant be asking too much,sorry about it and apologize if i dint explain well,you are right that it draws so many veritcal lines that it clutters the chart,what you coded is right if we can set up the limit of bars drawn, as shown below: may be in the future soemone will need MTF version of this,i cant ask more,otherwise you will kill me. {image} {file}

Ignored

Quoting BestTraderEv

Disliked

{quote} UPDATE because of array out of range issue... {file} Do not change the file name!!! {image}

Ignored

Quoting MwlRCT

Disliked

Key points covered in the changelog: - MTF (Multi-TimeFrame) functionality - Arrow visual customization features - EA integration capabilities ( - Added 4 EA Integration buffers (buyBuffer, sellBuffer, signalTime, isReady) for external EA access) - Instance management improvements - Bug fixes for MQL4 compatibility --- {quote} {quote} Core Logic: Signal detection now uses MTF data instead of current timeframe for enhanced accuracy {quote} --- ChangeLog: README: /*-------------------------------------------------------------------- Change-log: 4_Bar_Indi_MOD_rev1[MwlRCT]...

Ignored

Quoting T4Trade

Disliked

{quote} OPTIMUM,PERFECTION,Thanks my dear.both of you have taken my trading to next level Thanks BTEv and Mcrt {image}

Ignored

Quoting BestTraderEv

Disliked

{quote} I've got another version, it seems to work fine, but wasn't tested for long enough: {file} Do not change the file name!!! Also, I don't indend to do any fancy Timeframe +1, or +2, etc...

Ignored

Quoting T4Trade

Disliked

{quote} thank you so much for this MTF indicator as well,It is superb I already made 155$ today using the strategy using these indicators.

Ignored

Quoting BestTraderEv

Disliked

{quote} What did you trade? Symbols, Tf's, MTF?

Ignored

Quoting TraderGamer

Disliked

Helloo FF community. Hope you all doing well. I need some help with this breakout indicator. Can anyone from our dear coders here add a "unique number or ID" so that I can add multiple instances of this indicator on the same chart? I tried to add 3 instances of it to show on the same day but only one shows on the chart (as shown in the image below), perhaps they all keep overwriting on each other. Thank you very much! {file} {image}

Ignored

Quoting MwlRCT

Disliked

Key points covered in the changelog: - MTF (Multi-TimeFrame) functionality - Arrow visual customization features - EA integration capabilities

Ignored

Quoting Erebus

Disliked

{quote}...1-hour on gold...close at 3361.35 at 18:00, but when I drop to the 1-minute... but the close price is at 18:59...could be that gold is funky, the market is closed, I have a wrong setting, or maybe a coding issue?...

Ignored

Quote

Disliked

see the chart for details

Quoting mr-roma

Disliked

{quote} You can simply add Prefix: extern string Prefix = "p1"; CreateObjects(Prefix + "_BoxHL_" + TimeToStr(dtTradeDate,TIME_DATE), BoxHLColor, True); And you'll just change prefix name to every indicator, so that every indicator's object name will be unique like "p1_BoxHL_ ..." "p2_BoxHL ..." and so on ...

Ignored

Quoting BestTraderEv

Disliked

{quote} I've got another version, it seems to work fine, but wasn't tested for long enough: {file} Do not change the file name!!! Also, I don't indend to do any fancy Timeframe +1, or +2, etc...

Ignored

Quoting jeanlouie

Disliked

{quote} This should do it; Day, Week, Month Open Lines - for day, week n month - draws a line from the open, option to ray right - optional day start hour - number of periods to look back - color choice for first, and all others - can opt for gradient color to the first color {file} {image}

Ignored

Quoting TraderGamer

Disliked

{quote} Helloo, I added the changes but it didn't work unfortunately, but I appreciate your help.

Ignored

extern string UniqueID       = "Breakout1"; // Unique identifier for this indicator instance

//+------------------------------------------------------------------+
//|                                                 BreakOut_BOX.mq4 |
//|                                                        hapalkos  |
//|                                                       2007.02.10 |
//+------------------------------------------------------------------+
#property copyright "hapalkos"
#property link      ""
#property indicator_chart_window
 
extern int    NumberOfDays = 50;        
extern string periodBegin    = "06:00"; 
extern string periodEnd      = "08:00";   
extern string BoxEnd         = "20:00"; 
extern string UniqueID       = "Breakout1"; // Unique identifier for this indicator instance
extern int    BoxBreakOut_Offset = 5;  //dont change;it's the line width strangely
extern color  BoxHLColor         = Black; 
extern color  BoxBreakOutColor   = Black;
extern color  BoxPeriodColor     = "clrNONE"; 
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
void init() {
  DeleteObjects();
  datetime dtTradeDate=TimeCurrent();
  for (int i=0; i<NumberOfDays; i++) {
  
    CreateObjects(StringConcatenate(UniqueID, "_BoxHL_", TimeToStr(dtTradeDate,TIME_DATE)), BoxHLColor, True);
    CreateObjects(StringConcatenate(UniqueID, "_BoxBreakOut_", TimeToStr(dtTradeDate,TIME_DATE)), BoxBreakOutColor,True);
    CreateObjects(StringConcatenate(UniqueID, "_BoxPeriod_", TimeToStr(dtTradeDate,TIME_DATE)), BoxPeriodColor, False);
    dtTradeDate = decrementTradeDate(dtTradeDate);
    while (TimeDayOfWeek(dtTradeDate)>5) dtTradeDate = decrementTradeDate(dtTradeDate);    
    }
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
void deinit() {
  DeleteObjects();
}

//+------------------------------------------------------------------+
//| Create Rectangles                                                |
//+------------------------------------------------------------------+
void CreateObjects(string sObjName, color cObjColor, bool bProp_Back) {
  ObjectCreate(sObjName, OBJ_RECTANGLE, 0, 0, 0, 0, 0);
  ObjectSet(sObjName, OBJPROP_STYLE, STYLE_SOLID);
  ObjectSet(sObjName, OBJPROP_COLOR, cObjColor);
  ObjectSet(sObjName, OBJPROP_BACK, bProp_Back);
  ObjectSet(sObjName, OBJPROP_SELECTABLE, false);
}
//+------------------------------------------------------------------+
//| Remove all Rectangles                                            |
//+------------------------------------------------------------------+
void DeleteObjects() {
    ObjectsDeleteAll(0, StringConcatenate(UniqueID, "_")); 
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
void start() {
  datetime dtTradeDate=TimeCurrent();
  for (int i=0; i<NumberOfDays; i++) {
    DrawObjects(dtTradeDate, StringConcatenate(UniqueID, "_BoxHL_", TimeToStr(dtTradeDate,TIME_DATE)), periodBegin, periodEnd, BoxEnd, 0);
    DrawObjects(dtTradeDate, StringConcatenate(UniqueID, "_BoxBreakOut_", TimeToStr(dtTradeDate,TIME_DATE)), periodBegin, periodEnd, BoxEnd, BoxBreakOut_Offset);
    DrawObjects(dtTradeDate, StringConcatenate(UniqueID, "_BoxPeriod_", TimeToStr(dtTradeDate,TIME_DATE)), periodBegin, periodEnd, periodEnd, BoxBreakOut_Offset);
    dtTradeDate=decrementTradeDate(dtTradeDate);
    while (TimeDayOfWeek(dtTradeDate) > 5) dtTradeDate = decrementTradeDate(dtTradeDate);
  }
}
void DrawObjects(datetime dtTradeDate, string sObjName, string sTimeBegin, string sTimeEnd, string sTimeObjEnd, int iOffSet) {
  datetime dtTimeBegin, dtTimeEnd, dtTimeObjEnd;
  double   dPriceHigh,  dPriceLow;
  int      iBarBegin,   iBarEnd;
  dtTimeBegin = StrToTime(TimeToStr(dtTradeDate, TIME_DATE) + " " + sTimeBegin);
  dtTimeEnd = StrToTime(TimeToStr(dtTradeDate, TIME_DATE) + " " + sTimeEnd);
  dtTimeObjEnd = StrToTime(TimeToStr(dtTradeDate, TIME_DATE) + " " + sTimeObjEnd);
      
  iBarBegin = iBarShift(NULL, 0, dtTimeBegin);
  iBarEnd = iBarShift(NULL, 0, dtTimeEnd);
  dPriceHigh = High[Highest(NULL, 0, MODE_HIGH, iBarBegin-iBarEnd, iBarEnd)];
  dPriceLow = Low [Lowest (NULL, 0, MODE_LOW , iBarBegin-iBarEnd, iBarEnd)];
  string sObjDesc = StringConcatenate("High: ",dPriceHigh,"  Low: ", dPriceLow, " OffSet: ",iOffSet);
  
  ObjectSet(sObjName, OBJPROP_TIME1 , dtTimeBegin);
  ObjectSet(sObjName, OBJPROP_PRICE1, dPriceHigh + iOffSet*Point);
  ObjectSet(sObjName, OBJPROP_TIME2 , dtTimeObjEnd);
  ObjectSet(sObjName, OBJPROP_PRICE2, dPriceLow - iOffSet*Point);
  ObjectSetText(sObjName, sObjDesc,10,"Times New Roman",Black);
}
datetime decrementTradeDate (datetime dtTimeDate) {
  int iTimeYear=TimeYear(dtTimeDate);
  int iTimeMonth=TimeMonth(dtTimeDate);
  int iTimeDay=TimeDay(dtTimeDate);
  int iTimeHour=TimeHour(dtTimeDate);
  int iTimeMinute=TimeMinute(dtTimeDate);
  iTimeDay--;
  if (iTimeDay==0) {
    iTimeMonth--;
    if (iTimeMonth==0) {
      iTimeYear--;
      iTimeMonth=12;
    }
    
    // Thirty days hath September...  
    if (iTimeMonth==4 || iTimeMonth==6 || iTimeMonth==9 || iTimeMonth==11) iTimeDay=30;
    // ...all the rest have thirty-one...
    if (iTimeMonth==1 || iTimeMonth==3 || iTimeMonth==5 || iTimeMonth==7 || iTimeMonth==8 || iTimeMonth==10 || iTimeMonth==12) iTimeDay=31;
    // ...except...
    if (iTimeMonth==2) if (MathMod(iTimeYear, 4)==0) iTimeDay=29; else iTimeDay=28;
  }
  return(StrToTime(iTimeYear + "." + iTimeMonth + "." + iTimeDay + " " + iTimeHour + ":" + iTimeMinute));
}
// MODIFIED 2025-05-24 - Objective 1 & 2 - Added UniqueID for multiple instances
//+------------------------------------------------------------------+

Quoting MwlRCT

Disliked

{quote} Try this version: Added: extern string UniqueID = "Breakout1"; // Unique identifier for this indicator instance --- Image: {image} --- Source code: //+------------------------------------------------------------------+ //| BreakOut_BOX.mq4 | //| hapalkos | //| 2007.02.10 | //+------------------------------------------------------------------+ #property copyright "hapalkos" #property link "" #property indicator_chart_window extern int NumberOfDays = 50; extern string periodBegin = "06:00"; extern string periodEnd = "08:00"; extern string...

Ignored

Quoting serivol

Disliked

Dear BestTrader, you can add the thickness of the ZigZags to this indicator to change them. They are not changed manually. {file} {file}

Ignored

/*--------------------------------------------------------------------
[b]Change-log[/b]: MZZ9 button_v1.00
Updated:[24-05-2025]
By: MwlRCT
--------------------------------------------------------------------
- Reformatted input parameters into logical sections
- Added ZigZag thickness control via UserThickness parameter
- Enabled global thickness control for all ZigZag lines
- Organized parameters with consistent alignment and formatting
- Preserved all original functionality with improved readability
- Maintained ExtThickness parameter for default line thickness values
--------------------------------------------------------------------*/

   extern int    UserThickness = 4;  // Global thickness for all ZigZag lines (0=use ExtThickness, 1-5=override)

/*--------------------------------------------------------------------
Change-log: MZZ9 button_v1.00
Updated:[24-05-2025]
By: MwlRCT
--------------------------------------------------------------------
- Reformatted input parameters into logical sections
- Added ZigZag thickness control via UserThickness parameter
- Enabled global thickness control for all ZigZag lines
- Organized parameters with consistent alignment and formatting
- Preserved all original functionality with improved readability
- Maintained ExtThickness parameter for default line thickness values
--------------------------------------------------------------------*/
// More information about this indicator can be found at:
// http://fxcodebase.com/code/viewtopic.php?f=38&t=68338
//+------------------------------------------------------------------------------------------------------------------+
//|                               Copyright :copyright: 2020, Gehtsoft USA LLC | 
//|                                            http://fxcodebase.com |
//+------------------------------------------------------------------------------------------------------------------+
//|                                      Developed by : Mario Jemic  |
//|                                          [email protected]   |
//+------------------------------------------------------------------------------------------------------------------+
//|                                 Support our efforts by donating  |
//|                                  Paypal : https://goo.gl/9Rj74e  |
//+------------------------------------------------------------------------------------------------------------------+
//|                                Patreon :  https://goo.gl/GdXWeN  |
//+------------------------------------------------------------------------------------------------------------------+

// modified by banzai from Mario Jemic template 
// July 28th, 2020
// not for sale, rent, auction, nor lease
//+------------------------------------------------------------------+
//|                        MultiZigZag                     MZZ9.mq4  |
//+------------------------------------------------------------------+
/*
  July 1, 2009

External parameters are string variables.
Each variable stores parameters for nine ZigZags.
The first digit is for the first ZigZag, the second for the second, the third for the third, the fourth for the fourth, and so on. Separated by commas.
The first four ZigZags are displayed, counting from the current timeframe. A maximum of 9 ZigZags are calculated.
ExtDepth, ExtDeviation and ExtBackstep are standard parameters for ZigZag.
If ExtDepth=0, the corresponding ZigZag will not be displayed.
ExtMaxBar - number of bars on which the ZigZag is calculated.
GrossPeriod - chart periods expressed in minutes, based on which data the ZigZag is built. When set to 0, the ZigZag is displayed on the current timeframe.
zzVisible 0 - the corresponding ZigZag is not calculated and not displayed on the chart, 1 - the ZigZag is calculated.
zzColor - sets colors for each timeframe.
extColor - additional colors, if multiple ZigZags are displayed on one timeframe.
ExtProcedureOfPayments - sequence of ZigZag calculation: true - in order of increasing timeframe, false - in order of decreasing.
showZigZag - options for displaying ZigZags. 0 - as a broken line. 1 - as diamonds at extremes. 2 - as rows of points on the section
             belonging to the bar of the timeframe on which data the ZigZag is calculated, as in DT-ZigZag
ExtReCalculate - number of ZigZag extremes, starting from 0, recalculated in real-time mode. Applied to ZigZags from higher timeframes.
ExtComplect - multiple indicators running on the same currency pair in the same window must have different values for this parameter
*/
#property link   "nen"
//  Drawing the indicator in the main window
#property indicator_chart_window
//  Number of indicator buffers
#property indicator_buffers  8
 
//=== ZIGZAG CONFIGURATION ===
input string sep_ZigZagConfig = "=== ZIGZAG CONFIGURATION ==="; // —————————————————————
   extern string ExtDepth      = "12,12,12,12,12,12,12,12,12";
   extern string ExtDeviation  = "5,5,5,5,5,5,5,5,5";
   extern string ExtBackstep   = "3,3,3,3,3,3,3,3,3";
   extern string ExtMaxBar     = "5000,1000,350,350,350,350,350,350,350,350";    // Number of calculated bars (0-all)
   extern string GrossPeriod   = "1,5,15,30,60,240,1440,10080,43200";            // Timeframes on which ZigZags are calculated, 0 - current timeframe
   extern string zzVisible     = "1,1,1,1,1,1,1,1,1";
   extern string zzColor       = "Tan,RoyalBlue,Aqua,SaddleBrown,Red,Yellow,Magenta,Purple,MediumSpringGreen";
   extern string extColor      = "Indigo,Olive,Teal";
   string       ExtThickness   = "1,1,1,1,1,1,1,1,1";                            // ZigZag line thickness (hidden from UI, used when UserThickness=0)
   extern int    UserThickness = 4;  // Global thickness for all ZigZag lines (0=use ExtThickness, 1-5=override)
//=== INDICATOR BEHAVIOR ===
input string sep_IndicatorBehavior = "=== INDICATOR BEHAVIOR ==="; // —————————————————————
   extern bool   ExtProcedureOfPayments = false;
   extern int    showZigZag             = 0;
   extern int    ExtReCalculate         = 3;                                      // Number of ZigZag extremes of the higher timeframe, starting from 0, recalculated
                                                                                  // in real-time mode
   extern int    ExtComplect            = 0;
//=== BUTTON SETTINGS ===
input string sep_ButtonSettings = "=== BUTTON SETTINGS ==="; // —————————————————————
   extern string             button_note1          = "------------------------------";
   extern ENUM_BASE_CORNER   btn_corner            = CORNER_LEFT_UPPER;           // chart btn_corner for anchoring
   extern string             btn_text              = "MZZ9";
   extern string             btn_Font              = "Arial";
   extern int                btn_FontSize          = 10;                          // Button font size
   extern color              btn_text_ON_color     = clrWhite;
   extern color              btn_text_OFF_color    = clrRed;
   extern color              btn_background_color  = clrDimGray;
   extern color              btn_border_color      = clrBlack;
   extern int                button_x              = 20;                          // Button x position
   extern int                button_y              = 13;                          // Button y position
   extern int                btn_Width             = 60;                          // Button width
   extern int                btn_Height            = 20;                          // Button height
   extern string             button_note2          = "------------------------------";
bool                      show_data             = true;
string IndicatorName, IndicatorObjPrefix;
//template code end1
int ExtDepth_[]={0,0,0,0,0,0,0,0,0}, ExtDeviation_[]={0,0,0,0,0,0,0,0,0}, ExtBackstep_[]={0,0,0,0,0,0,0,0,0}, ExtMaxBar_[]={0,0,0,0,0,0,0,0,0}, GrossPeriod_[]={0,0,0,0,0,0,0,0,0}, zzVisible_[]={0,0,0,0,0,0,0,0,0};
int zzColor_[]={0,0,0,0,0,0,0,0,0}, extColor_[]={0,0,0}, currentBars_[]={0,0,0,0,0,0,0,0,0};
int ExtThickness_[]={1,1,1,1,1,1,1,1,1}; // Array to store ZigZag line thickness values
//  Indicator buffers
double LowestBuffer1[],HighestBuffer1[],LowestBuffer2[],HighestBuffer2[],LowestBuffer3[],HighestBuffer3[],LowestBuffer4[],HighestBuffer4[];
//  Auxiliary buffers
double LowestBufferGross1[],HighestBufferGross1[],LowestBufferGross2[],HighestBufferGross2[],LowestBufferGross3[],HighestBufferGross3[],LowestBufferGross4[],HighestBufferGross4[];
double LowestBufferGross5[],HighestBufferGross5[],LowestBufferGross6[],HighestBufferGross6[],LowestBufferGross7[],HighestBufferGross7[],LowestBufferGross8[],HighestBufferGross8[];
double LowestBufferGross9[],HighestBufferGross9[];
//  Flags indicating that the initial transformation of the ZigZag from the higher timeframe has been performed
bool Grosstf_DT[]={false, false, false, false, false, false, false, false, false};
//  Flags indicating that the ZigZag has been built on history
bool ZZ_tf[]={false, false, false, false, false, false, false, false, false};
//  Time value of the beginning and end of the third ray
datetime L2LTime[]={0,0,0,0,0,0,0,0,0},L2HTime[]={0,0,0,0,0,0,0,0,0};
//  When exceeding the values of variables lBar, hBar and tiZZ, the ZigZag is calculated
//  That is, calculation is performed only when going beyond the already calculated bar.
//  This allows calculation not on every tick.
double lBar[]={0,0,0,0,0,0,0,0,0}, hBar[]={0,0,0,0,0,0,0,0,0};
datetime tiZZ[]={0,0,0,0,0,0,0,0,0};
//  Array for storing Bars values
int saveBars[]={0,0,0,0,0,0,0,0,0};
int currentBars;
// Array for storing the order of ZigZag calculations. Which ZigZag is calculated after which.
int ProcedureOfPayments[9][3];
//  Variable storing the number of bars on which the ZigZag is calculated
int limit;
//+------------------------------------------------------------------------------------------------------------------+
string GenerateIndicatorName(const string target) //don't change anything here
{
   string name = target;
   int try = 2;
   while (WindowFind(name) != -1)
   {
      name = target + " #" + IntegerToString(try++);
   }
   return name;
}
//+------------------------------------------------------------------------------------------------------------------+
string buttonId;
//+------------------------------------------------------------------+
//| Initialization function. Beginning.                                 |
//+------------------------------------------------------------------+
int init2()
  {
   int i,j,k,m,n,q;
   string str="";
// Ïî äâà èíäèêàòîðíûõ áóôôåðà èñïîëüçîâàíî äëÿ âûâîäà íà ãðàôèê êàæäîãî çèãçàãà
   SetIndexBuffer(0,LowestBuffer1);
   SetIndexBuffer(1,HighestBuffer1);
   SetIndexBuffer(2,LowestBuffer2);
   SetIndexBuffer(3,HighestBuffer2);
   SetIndexBuffer(4,LowestBuffer3);
   SetIndexBuffer(5,HighestBuffer3);
   SetIndexBuffer(6,LowestBuffer4);
   SetIndexBuffer(7,HighestBuffer4);
// Óñòàíîâêà çíà÷åíèé èíäèêàòîðà, êîòîðûå íå áóäóò âèäèìû íà ãðàôèêå
   SetIndexEmptyValue(0,0.0);
   SetIndexEmptyValue(1,0.0);
   SetIndexEmptyValue(2,0.0);
   SetIndexEmptyValue(3,0.0);
   SetIndexEmptyValue(4,0.0);
   SetIndexEmptyValue(5,0.0);
   SetIndexEmptyValue(6,0.0);
   SetIndexEmptyValue(7,0.0);
   _stringtointarray (ExtDepth,     ExtDepth_,     9);
   _stringtointarray (ExtDeviation, ExtDeviation_, 9);
   _stringtointarray (ExtBackstep,  ExtBackstep_,  9);
   _stringtointarray (ExtMaxBar,    ExtMaxBar_,    9);
   _stringtointarray (GrossPeriod,  GrossPeriod_,  9);
   _stringtointarray (zzVisible,    zzVisible_,    9);
   _stringtocolorarray (zzColor,    zzColor_,      9);
   _stringtocolorarray (extColor,   extColor_,     3);
   _stringtointarray (ExtThickness, ExtThickness_, 9); // Parse thickness values from string
   // Validate UserThickness parameter
   if (UserThickness > 5) UserThickness = 5;  // Cap at 5 if too large
   
   for (i=0;i<9;i++)
     {
      Grosstf_DT[i]=false; ZZ_tf[i]=false;
      j=GrossPeriod_[i];
      GrossPeriod_[i]=_period(i,j);
      
      // Validate thickness values
      if (ExtThickness_[i] <= 0) ExtThickness_[i] = 1; // If too small, set to default
      if (ExtThickness_[i] > 5) ExtThickness_[i] = 5;  // If too large, cap at 5
      if (ExtDepth_[i]<=0) zzVisible_[i]=0;
      
      // Apply UserThickness if it's set (non-zero)
      if (UserThickness > 0) ExtThickness_[i] = UserThickness;
      if (zzVisible_[i]>0)
        {
         m=ExtBackstep_[i]+ExtDepth_[i];
         if ((ExtMaxBar_[i]>iBars(NULL,GrossPeriod_[i])-m) || (ExtMaxBar_[i]==0)) limit=iBars(NULL,GrossPeriod_[i])- m; else limit=ExtMaxBar_[i];
         if (i==0) arr_resize(LowestBufferGross1, HighestBufferGross1, limit+m, i);
         else if (i==1) arr_resize(LowestBufferGross2, HighestBufferGross2, limit+m, i);
         else if (i==2) arr_resize(LowestBufferGross3, HighestBufferGross3, limit+m, i);
         else if (i==3) arr_resize(LowestBufferGross4, HighestBufferGross4, limit+m, i);
         else if (i==4) arr_resize(LowestBufferGross5, HighestBufferGross5, limit+m, i);
         else if (i==5) arr_resize(LowestBufferGross6, HighestBufferGross6, limit+m, i);
         else if (i==6) arr_resize(LowestBufferGross7, HighestBufferGross7, limit+m, i);
         else if (i==7) arr_resize(LowestBufferGross8, HighestBufferGross8, limit+m, i);
         else if (i==8) arr_resize(LowestBufferGross9, HighestBufferGross9, limit+m, i);
        }
      ProcedureOfPayments[i][0]=GrossPeriod_[i];
      ProcedureOfPayments[i][1]=i;
     }
   ArraySort(ProcedureOfPayments,WHOLE_ARRAY,0,MODE_ASCEND);
   if (showZigZag<0) showZigZag=0;
   if (showZigZag>2) showZigZag=2;
   j=1;k=0;q=-1;
   for (n=0;n<9;n++)
     {
      i=ProcedureOfPayments[n][1];
      if (zzVisible_[i]==0 || j>4) ProcedureOfPayments[n][2]=0;
      else if (GrossPeriod_[i]==0 || GrossPeriod_[i]>Period())
        {
         if (GrossPeriod_[i]==q)
           {
            zzColor_[i]=extColor_[k];
            k++;
           }
         q=GrossPeriod_[i];
         if (j==1)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(0,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
               SetIndexStyle(1,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
              }
            else
              {
               SetIndexStyle(0,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(1,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(0, 116); 
                  SetIndexArrow(1, 116);
                 }
               else
                 {
                  SetIndexArrow(0, 159); 
                  SetIndexArrow(1, 159);
                 }
              }
           }
         else if (j==2)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(2,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
               SetIndexStyle(3,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
              }
            else
              {
               SetIndexStyle(2,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(3,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(2, 116); 
                  SetIndexArrow(3, 116);
                 }
               else
                 {
                  SetIndexArrow(2, 159); 
                  SetIndexArrow(3, 159);
                 }
              }
           }
         else if (j==3)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(4,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
               SetIndexStyle(5,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
              }
            else
              {
               SetIndexStyle(4,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(5,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(4, 116); 
                  SetIndexArrow(5, 116);
                 }
               else
                 {
                  SetIndexArrow(4, 159); 
                  SetIndexArrow(5, 159);
                 }
              }
           }
         else if (j==4)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(6,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
               SetIndexStyle(7,DRAW_ZIGZAG, EMPTY, ExtThickness_[i], zzColor_[i]);
              }
            else
              {
               SetIndexStyle(6,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(7,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(6, 116); 
                  SetIndexArrow(7, 116);
                 }
               else
                 {
                  SetIndexArrow(6, 159); 
                  SetIndexArrow(7, 159);
                 }
              }
           }
         ProcedureOfPayments[n][2]=j; j++;
        }
     }
   if (ExtProcedureOfPayments) ArraySort(ProcedureOfPayments,WHOLE_ARRAY,0,MODE_ASCEND); else ArraySort(ProcedureOfPayments,WHOLE_ARRAY,0,MODE_DESCEND);
// Èìåíà äëÿ îêîí äàííûõ è ëýéáû äëÿ ñóáúîêîí
   for (n=0;n<9;n++)
     {
      if (GrossPeriod_[ProcedureOfPayments[n][1]]==0) str=""+Period(); else str=""+GrossPeriod_[ProcedureOfPayments[n][1]];
      if (ProcedureOfPayments[n][2]==1)
        {
         SetIndexLabel(0,"Low1_"+str );
         SetIndexLabel(1,"High1_"+str);
        }
      else if (ProcedureOfPayments[n][2]==2)
        {
         SetIndexLabel(2,"Low2_"+str );
         SetIndexLabel(3,"High2_"+str);
        }
      else if (ProcedureOfPayments[n][2]==3)
        {
         SetIndexLabel(4,"Low3_"+str );
         SetIndexLabel(5,"High3_"+str);
        }
      else if (ProcedureOfPayments[n][2]==4)
        {
         SetIndexLabel(6,"Low4_"+str );
         SetIndexLabel(7,"High4_"+str);
        }
     }
   currentBars=0;
// Çàâåðøåíèå èíèöèàëèçàöèè
   return(0);
  }
//+------------------------------------------------------------------+
int OnInit()
  {
   IndicatorName = GenerateIndicatorName(btn_text);
   IndicatorObjPrefix = "__" + IndicatorName + "__";
   IndicatorShortName(IndicatorName);
   IndicatorDigits(Digits);
   
   double val;
   if (GlobalVariableGet(IndicatorName + "_visibility", val))
      show_data = val != 0;
   ChartSetInteger(ChartID(), CHART_EVENT_MOUSE_MOVE, 1);
   buttonId = IndicatorObjPrefix + "ForexStation";
   createButton(buttonId, btn_text, btn_Width, btn_Height, btn_Font, btn_FontSize, btn_background_color, btn_border_color, btn_text_ON_color);
   ObjectSetInteger(ChartID(), buttonId, OBJPROP_YDISTANCE, button_y);
   ObjectSetInteger(ChartID(), buttonId, OBJPROP_XDISTANCE, button_x);
// put init() here
   int i,j,k,m,n,q;
   string str="";
// Ïî äâà èíäèêàòîðíûõ áóôôåðà èñïîëüçîâàíî äëÿ âûâîäà íà ãðàôèê êàæäîãî çèãçàãà
   SetIndexBuffer(0,LowestBuffer1);
   SetIndexBuffer(1,HighestBuffer1);
   SetIndexBuffer(2,LowestBuffer2);
   SetIndexBuffer(3,HighestBuffer2);
   SetIndexBuffer(4,LowestBuffer3);
   SetIndexBuffer(5,HighestBuffer3);
   SetIndexBuffer(6,LowestBuffer4);
   SetIndexBuffer(7,HighestBuffer4);
// Óñòàíîâêà çíà÷åíèé èíäèêàòîðà, êîòîðûå íå áóäóò âèäèìû íà ãðàôèêå
   SetIndexEmptyValue(0,0.0);
   SetIndexEmptyValue(1,0.0);
   SetIndexEmptyValue(2,0.0);
   SetIndexEmptyValue(3,0.0);
   SetIndexEmptyValue(4,0.0);
   SetIndexEmptyValue(5,0.0);
   SetIndexEmptyValue(6,0.0);
   SetIndexEmptyValue(7,0.0);
   _stringtointarray (ExtDepth,     ExtDepth_,     9);
   _stringtointarray (ExtDeviation, ExtDeviation_, 9);
   _stringtointarray (ExtBackstep,  ExtBackstep_,  9);
   _stringtointarray (ExtMaxBar,    ExtMaxBar_,    9);
   _stringtointarray (GrossPeriod,  GrossPeriod_,  9);
   _stringtointarray (zzVisible,    zzVisible_,    9);
   _stringtocolorarray (zzColor,    zzColor_,      9);
   _stringtocolorarray (extColor,   extColor_,     3);
   _stringtointarray (ExtThickness, ExtThickness_, 9);
   // Validate UserThickness parameter
   if (UserThickness > 5) UserThickness = 5;  // Cap at 5 if too large
   
   for (i=0;i<9;i++)
     {
      Grosstf_DT[i]=false; ZZ_tf[i]=false;
      j=GrossPeriod_[i];
      GrossPeriod_[i]=_period(i,j);
      
      // Validate thickness values
      if (ExtThickness_[i] <= 0) ExtThickness_[i] = 1; // If too small, set to default
      if (ExtThickness_[i] > 5) ExtThickness_[i] = 5;  // If too large, cap at 5
      
      // Apply UserThickness if it's set (non-zero)
      if (UserThickness > 0) ExtThickness_[i] = UserThickness;
      if (ExtDepth_[i]<=0) zzVisible_[i]=0;
      if (zzVisible_[i]>0)
        {
         m=ExtBackstep_[i]+ExtDepth_[i];
         if ((ExtMaxBar_[i]>iBars(NULL,GrossPeriod_[i])-m) || (ExtMaxBar_[i]==0)) limit=iBars(NULL,GrossPeriod_[i])- m; else limit=ExtMaxBar_[i];
         if (i==0) arr_resize(LowestBufferGross1, HighestBufferGross1, limit+m, i);
         else if (i==1) arr_resize(LowestBufferGross2, HighestBufferGross2, limit+m, i);
         else if (i==2) arr_resize(LowestBufferGross3, HighestBufferGross3, limit+m, i);
         else if (i==3) arr_resize(LowestBufferGross4, HighestBufferGross4, limit+m, i);
         else if (i==4) arr_resize(LowestBufferGross5, HighestBufferGross5, limit+m, i);
         else if (i==5) arr_resize(LowestBufferGross6, HighestBufferGross6, limit+m, i);
         else if (i==6) arr_resize(LowestBufferGross7, HighestBufferGross7, limit+m, i);
         else if (i==7) arr_resize(LowestBufferGross8, HighestBufferGross8, limit+m, i);
         else if (i==8) arr_resize(LowestBufferGross9, HighestBufferGross9, limit+m, i);
        }
      ProcedureOfPayments[i][0]=GrossPeriod_[i];
      ProcedureOfPayments[i][1]=i;
     }
   ArraySort(ProcedureOfPayments,WHOLE_ARRAY,0,MODE_ASCEND);
   if (showZigZag<0) showZigZag=0;
   if (showZigZag>2) showZigZag=2;
   j=1;k=0;q=-1;
   for (n=0;n<9;n++)
     {
      i=ProcedureOfPayments[n][1];
      if (zzVisible_[i]==0 || j>4) ProcedureOfPayments[n][2]=0;
      else if (GrossPeriod_[i]==0 || GrossPeriod_[i]>Period())
        {
         if (GrossPeriod_[i]==q)
           {
            zzColor_[i]=extColor_[k];
            k++;
           }
         q=GrossPeriod_[i];
         if (j==1)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(0,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(1,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
              }
            else
              {
               SetIndexStyle(0,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(1,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(0, 116); 
                  SetIndexArrow(1, 116);
                 }
               else
                 {
                  SetIndexArrow(0, 159); 
                  SetIndexArrow(1, 159);
                 }
              }
           }
         else if (j==2)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(2,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(3,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
              }
            else
              {
               SetIndexStyle(2,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(3,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(2, 116); 
                  SetIndexArrow(3, 116);
                 }
               else
                 {
                  SetIndexArrow(2, 159); 
                  SetIndexArrow(3, 159);
                 }
              }
           }
         else if (j==3)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(4,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(5,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
              }
            else
              {
               SetIndexStyle(4,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(5,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(4, 116); 
                  SetIndexArrow(5, 116);
                 }
               else
                 {
                  SetIndexArrow(4, 159); 
                  SetIndexArrow(5, 159);
                 }
              }
           }
         else if (j==4)
           {
            if (showZigZag==0)
              {
               SetIndexStyle(6,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(7,DRAW_ZIGZAG, EMPTY, 0, zzColor_[i]);
              }
            else
              {
               SetIndexStyle(6,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               SetIndexStyle(7,DRAW_ARROW, EMPTY, 0, zzColor_[i]);
               if (showZigZag==1)
                 {
                  SetIndexArrow(6, 116); 
                  SetIndexArrow(7, 116);
                 }
               else
                 {
                  SetIndexArrow(6, 159); 
                  SetIndexArrow(7, 159);
                 }
              }
           }
         ProcedureOfPayments[n][2]=j; j++;
        }
     }
   if (ExtProcedureOfPayments) ArraySort(ProcedureOfPayments,WHOLE_ARRAY,0,MODE_ASCEND); else ArraySort(ProcedureOfPayments,WHOLE_ARRAY,0,MODE_DESCEND);
// Èìåíà äëÿ îêîí äàííûõ è ëýéáû äëÿ ñóáúîêîí
   for (n=0;n<9;n++)
     {
      if (GrossPeriod_[ProcedureOfPayments[n][1]]==0) str=""+Period(); else str=""+GrossPeriod_[ProcedureOfPayments[n][1]];
      if (ProcedureOfPayments[n][2]==1)
        {
         SetIndexLabel(0,"Low1_"+str );
         SetIndexLabel(1,"High1_"+str);
        }
      else if (ProcedureOfPayments[n][2]==2)
        {
         SetIndexLabel(2,"Low2_"+str );
         SetIndexLabel(3,"High2_"+str);
        }
      else if (ProcedureOfPayments[n][2]==3)
        {
         SetIndexLabel(4,"Low3_"+str );
         SetIndexLabel(5,"High3_"+str);
        }
      else if (ProcedureOfPayments[n][2]==4)
        {
         SetIndexLabel(6,"Low4_"+str );
         SetIndexLabel(7,"High4_"+str);
        }
     }
   currentBars=0;
// Çàâåðøåíèå èíèöèàëèçàöèè
   return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Initialization function. End.                                  |
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//| Custom indicator deinitialization function. Beginning.              |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------------------------------------------------------+
//don't change anything here
void createButton(string buttonID,string buttonText,int width,int height,string font,int fontSize,color bgColor,color borderColor,color txtColor)
{
      ObjectDelete    (ChartID(),buttonID);
      ObjectCreate    (ChartID(),buttonID,OBJ_BUTTON,0,0,0);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_COLOR,txtColor);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_BGCOLOR,bgColor);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_BORDER_COLOR,borderColor);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_XSIZE,width);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_YSIZE,height);
      ObjectSetString (ChartID(),buttonID,OBJPROP_FONT,font);
      ObjectSetString (ChartID(),buttonID,OBJPROP_TEXT,buttonText);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_FONTSIZE,fontSize);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_SELECTABLE,0);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_CORNER,btn_corner);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_HIDDEN,1);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_XDISTANCE,9999);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_YDISTANCE,9999);
}
//+------------------------------------------------------------------------------------------------------------------+
int deinit()
{
   ObjectsDeleteAll(ChartID(), IndicatorObjPrefix);
//put deinit() here
    return(0);
}
//+------------------------------------------------------------------------------------------------------------------+
//don't change anything here
bool recalc = true;
void handleButtonClicks()
{
   if (ObjectGetInteger(ChartID(), buttonId, OBJPROP_STATE))
   {
      ObjectSetInteger(ChartID(), buttonId, OBJPROP_STATE, false);
      show_data = !show_data;
      GlobalVariableSet(IndicatorName + "_visibility", show_data ? 1.0 : 0.0);
      recalc = true;
      start();
   }
}
//+------------------------------------------------------------------------------------------------------------------+
void OnChartEvent(const int id, //don't change anything here
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
{
   handleButtonClicks();
}
//+------------------------------------------------------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function. End.               |
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//| Indicator calculation. Beginning.                                       |
//+------------------------------------------------------------------+
int start()
  {
   handleButtonClicks();
   recalc = false;
   //put start () here
   int i, m, n;
   bool calculate;
   if (Bars-currentBars>1)
     {
      for (n=0;n<9;n++)
        {
         if (ProcedureOfPayments[n][2]>0) {i=ProcedureOfPayments[n][1]; saveBars[i]=0; currentBars_[i]=0;}
        }
     }
   currentBars=Bars;
   for (n=0;n<9;n++)
     {
      i=ProcedureOfPayments[n][1];
      if (zzVisible_[i]==0) continue;
      if (iBars(NULL, GrossPeriod_[i])-currentBars_[i]>1) {saveBars[i]=0;}
      currentBars_[i]=iBars(NULL, GrossPeriod_[i]);
      m=ExtBackstep_[i]+ExtDepth_[i];
      if ((currentBars_[i]-1<m) || (m<=0)) continue;
      calculate=false;
      limit=iBars(NULL,GrossPeriod_[i])-saveBars[i]+1;
      if (limit>2)
        {
         calculate=true;
         Grosstf_DT[i]=false;
         ZZ_tf[i]=false;
         if ((ExtMaxBar_[i]>iBars(NULL,GrossPeriod_[i])-m) || (ExtMaxBar_[i]==0)) limit=iBars(NULL,GrossPeriod_[i])- m; else limit=ExtMaxBar_[i];
         if      (i==0) arr_resize(LowestBufferGross1, HighestBufferGross1, limit+m, i);
         else if (i==1) arr_resize(LowestBufferGross2, HighestBufferGross2, limit+m, i);
         else if (i==2) arr_resize(LowestBufferGross3, HighestBufferGross3, limit+m, i);
         else if (i==3) arr_resize(LowestBufferGross4, HighestBufferGross4, limit+m, i);
         else if (i==4) arr_resize(LowestBufferGross5, HighestBufferGross5, limit+m, i);
         else if (i==5) arr_resize(LowestBufferGross6, HighestBufferGross6, limit+m, i);
         else if (i==6) arr_resize(LowestBufferGross7, HighestBufferGross7, limit+m, i);
         else if (i==7) arr_resize(LowestBufferGross8, HighestBufferGross8, limit+m, i);
         else if (i==8) arr_resize(LowestBufferGross9, HighestBufferGross9, limit+m, i);
         if (ProcedureOfPayments[n][2]==1)
           {
            ArrayInitialize(LowestBuffer1,0); ArrayInitialize(HighestBuffer1,0);
           }
         else if (ProcedureOfPayments[n][2]==2)
           {
            ArrayInitialize(LowestBuffer2,0); ArrayInitialize(HighestBuffer2,0); 
           }
         else if (ProcedureOfPayments[n][2]==3)
           {
            ArrayInitialize(LowestBuffer3,0); ArrayInitialize(HighestBuffer3,0); 
           }
         else if (ProcedureOfPayments[n][2]==4)
           {
            ArrayInitialize(LowestBuffer4,0); ArrayInitialize(HighestBuffer4,0); 
           }
        }
      else
        {
         if (lBar[i]>iLow(NULL,GrossPeriod_[i],0) || hBar[i]<iHigh(NULL,GrossPeriod_[i],0) || tiZZ[i]!=iTime(NULL,GrossPeriod_[i],0))
           {
            calculate=true;
           }
        }
      if (calculate)
        {
         if      (i==0) _Gross(LowestBufferGross1, HighestBufferGross1, limit, n);
         else if (i==1) _Gross(LowestBufferGross2, HighestBufferGross2, limit, n);
         else if (i==2) _Gross(LowestBufferGross3, HighestBufferGross3, limit, n);
         else if (i==3) _Gross(LowestBufferGross4, HighestBufferGross4, limit, n);
         else if (i==4) _Gross(LowestBufferGross5, HighestBufferGross5, limit, n);
         else if (i==5) _Gross(LowestBufferGross6, HighestBufferGross6, limit, n);
         else if (i==6) _Gross(LowestBufferGross7, HighestBufferGross7, limit, n);
         else if (i==7) _Gross(LowestBufferGross8, HighestBufferGross8, limit, n);
         else if (i==8) _Gross(LowestBufferGross9, HighestBufferGross9, limit, n);
        }
     }
      if (show_data)
         {
         ObjectSetInteger(ChartID(),buttonId,OBJPROP_COLOR,btn_text_ON_color);
         init2();
         }
      else
      {
       ObjectSetInteger(ChartID(),buttonId,OBJPROP_COLOR,btn_text_OFF_color);
       for (int banzai=0; banzai<indicator_buffers; banzai++)
           SetIndexStyle(banzai,DRAW_NONE);
      }
 // Çàâåðøåíèå âû÷èñëåíèé èíäèêàòîðà
   return(0);
  }
//+------------------------------------------------------------------+
//| Ðàñ÷åò èíäèêàòîðà. Êîíåö.                                        |
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//|               Ïîäïðîãðàììû è ôóíêöèè                             |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Ïîäáîð ìàññèâîâ äëÿ ðàñ÷åòà Grossperiod. Íà÷àëî.                 |
//+------------------------------------------------------------------+
int _Gross(double& GLB[],double& GHB[],int limit2,int n)
  {
   int x=ProcedureOfPayments[n][1];
   if (GrossPeriod_[x]==0)
    {
     if      (ProcedureOfPayments[n][2]==1) ZigZag_(LowestBuffer1, HighestBuffer1, x);
     else if (ProcedureOfPayments[n][2]==2) ZigZag_(LowestBuffer2, HighestBuffer2, x);
     else if (ProcedureOfPayments[n][2]==3) ZigZag_(LowestBuffer3, HighestBuffer3, x);
     else if (ProcedureOfPayments[n][2]==4) ZigZag_(LowestBuffer4, HighestBuffer4, x);
     else
      {
       if (limit2==2) Shift_elements(GLB,GHB);
       ZigZag_(GLB, GHB, x);
      }
    }
   else
    {
     if (limit2==2) Shift_elements(GLB,GHB);
     if (ZigZag_(GLB, GHB, x)==0)
       {
        if      (ProcedureOfPayments[n][2]==1) ZigZagDT (LowestBuffer1, HighestBuffer1, GLB, GHB, x);
        else if (ProcedureOfPayments[n][2]==2) ZigZagDT (LowestBuffer2, HighestBuffer2, GLB, GHB, x);
        else if (ProcedureOfPayments[n][2]==3) ZigZagDT (LowestBuffer3, HighestBuffer3, GLB, GHB, x);
        else if (ProcedureOfPayments[n][2]==4) ZigZagDT (LowestBuffer4, HighestBuffer4, GLB, GHB, x);
       }
    }
   return(0);
  }
//+------------------------------------------------------------------+
//| Selection of arrays for Grossperiod calculation. End.                  |
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//|  Main ZigZag. Beginning.                                        |
//+------------------------------------------------------------------+
int ZigZag_(double& LB[],double& HB[],int x)
  {
   int j, jl, jh, bar_l, bar_h, limit1;
   int    bar,back,lasthighpos=-1,lastlowpos=-1;
   double curlow,curhigh,lasthigh,lastlow,val,deviation=ExtDeviation_[x]*Point;
   if (ZZ_tf[x]) // Ðåæèì ðåàëüíîãî âðåìåíè.
     {
      // Determining the bar from which calculation begins
      bar_l=iBarShift(NULL,GrossPeriod_[x],L2LTime[x],true);
      bar_h=iBarShift(NULL,GrossPeriod_[x],L2HTime[x],true);
      if ((bar_l<0) || (bar_h<0)) {saveBars[x]=0; return (-1);}
      if (L2LTime[x]<=L2HTime[x]) limit=bar_l; else limit=bar_h;
      limit1=limit-1;
      // Restoring variables
      lastlow=iLow(NULL,GrossPeriod_[x],bar_l);
      lasthigh=iHigh(NULL,GrossPeriod_[x],bar_h);
     }
   else // Ïîñòðîåíèå çèãçàãà íà èñòîðèè.
     {
      ZZ_tf[x]=true;
      bar_l=limit;
      bar_h=limit;
      limit1=limit;
     }
   // Beginning of the first large cycle
   for(bar=limit1; bar>=0; bar--)
     {
      //--- low
      if (bar<bar_l)
        {
         j=iLowest(NULL,GrossPeriod_[x],MODE_LOW,ExtDepth_[x],bar);
         val=iLow(NULL,GrossPeriod_[x],j);
         if(val==lastlow) val=0.0;
         else 
           { 
            lastlow=val; 
            if((iLow(NULL,GrossPeriod_[x],bar)-val)>deviation) val=0.0;
            else
              {
               for(back=1; back<=ExtBackstep_[x]; back++)
                 {
                  if(val<LB[j+back])LB[j+back]=0.0; 
                 }
              }
           } 
         if (j==bar) LB[j]=val;
        }
      //--- high
      if (bar<bar_h)
        {
         j=iHighest(NULL,GrossPeriod_[x],MODE_HIGH,ExtDepth_[x],bar);
         val=iHigh(NULL,GrossPeriod_[x],j);
         if(val==lasthigh) val=0.0;
         else 
           {
            lasthigh=val;
            if((val-iHigh(NULL,GrossPeriod_[x],bar))>deviation) val=0.0;
            else
              {
               for(back=1; back<=ExtBackstep_[x]; back++)
                 {
                  if(val>HB[j+back])HB[j+back]=0.0; 
                 } 
              }
           }
         if (j==bar) HB[j]=val;
        }
     }
   // End of the first large cycle
   // Beginning of the second large cycle. ZigZag filtering
   lasthigh=-1; lastlow=-1;
   for(bar=limit; bar>=0; bar--)
     {
      curlow=LB[bar];
      curhigh=HB[bar];
      if((curlow==0)&&(curhigh==0)) continue;
      if(curhigh!=0)
        {
         if(lasthigh>0) 
           {
            if(lasthigh<curhigh) HB[lasthighpos]=0;
            else HB[bar]=0;
           }
         if(lasthigh<curhigh || lasthigh<0)
           {
            lasthigh=curhigh;
            lasthighpos=bar;
           }
         lastlow=-1;
        }
      if(curlow!=0)
        {
         if(lastlow>0)
           {
            if(lastlow>curlow) LB[lastlowpos]=0;
            else LB[bar]=0;
           }
         if((curlow<lastlow)||(lastlow<0))
           {
            lastlow=curlow;
            lastlowpos=bar;
           } 
         lasthigh=-1;
        }
     } 
   // End of the second large cycle
   // Updating variables
   saveBars[x]=iBars(NULL,GrossPeriod_[x]);
   lBar[x]=iLow(NULL,GrossPeriod_[x],0); hBar[x]=iHigh(NULL,GrossPeriod_[x],0); tiZZ[x]=iTime(NULL,GrossPeriod_[x],0);
   // Saving the start and end time of the third ray or the last ray, less than the third
   jl=0;jh=0;
   for (bar=0;bar<saveBars[x];bar++)
     {
      if (LB[bar]>0) {if (jl<=1) {L2LTime[x]=iTime(NULL,GrossPeriod_[x],bar);} jl++;}
      if (HB[bar]>0) {if (jh<=1) {L2HTime[x]=iTime(NULL,GrossPeriod_[x],bar);} jh++;}
      if (jl>1 && jh>1) break;
     }
   return(0);
  }
//+------------------------------------------------------------------+
//|  Main ZigZag. End.                                         |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Transformation of ZigZag from higher timeframe to current. Beginning.|
//+------------------------------------------------------------------+
int ZigZagDT (double& LB[], double& HB[], double& LBG[], double& HBG[], int x)
  {
   int i=0, j, jl, jh, ext3=0, end, k;
   double el=-1, eh=-1;
   datetime t1, t2, t3=GrossPeriod_[x]*60-1;
   bool tdelta=false;
   if (Grosstf_DT[x]) // Ðåæèì ðåàëüíîãî âðåìåíè.
     {
      end=ExtReCalculate+1;
      t1=iTime(NULL, GrossPeriod_[x],i);
      for (j=0;ext3<end && j<Bars;j++)
        {
         if (Period()==10080)
           {
            if (el<0 && eh<0) tdelta=Time[j]<t1;
            else tdelta=Time[j]+t3<t1;
           }
         else
           {
            tdelta=Time[j]<t1;
           }
         if (tdelta) {i++; if (showZigZag==2) {t2=t1+GrossPeriod_[x]*60;} t1=iTime(NULL, GrossPeriod_[x],i);}
         LB[j]=0;
         HB[j]=0;
         if (LBG[i]>0)
           {
            if (el>=Low[j] || el<0) {el=Low[j]; jl=j;}
           }
         else
           {
            if (el>0)
              {
               if (showZigZag==2)
                 {
                  for (k=j-1;Time[k]<t2;k--)
                    {
                     if (k<0) break;
                     LB[k]=el;
                    }
                 }
               LB[jl]=el; el=-1; ext3++;
              }
           }
         if  (HBG[i]>0)
           {
            if (eh<=High[j]) {eh=High[j]; jh=j;}
           }
         else
           {
            if (eh>0)
              {
               if (showZigZag==2)
                 {
                  for (k=j-1;Time[k]<t2;k--)
                    {
                     if (k<0) break;
                     HB[k]=eh;
                    }
                 }
               HB[jh]=eh; eh=-1; ext3++;
              }
           } 
        }
     }
   else // Ïîñòðîåíèå çèãçàãà íà èñòîðèè.
     {
      if (limit<=ExtDepth_[x]+ExtBackstep_[x]) {saveBars[x]=0; return (-1);}
      end=iBarShift(NULL,Period(),iTime(NULL, GrossPeriod_[x],limit),false);
      if (end<=0) {saveBars[x]=0; return (-1);}
      Grosstf_DT[x]=true;
      t1=iTime(NULL, GrossPeriod_[x],i);
      for (j=0;j<end;j++)
        {
         if (Period()==10080)
           {
            if (el<0 && eh<0) tdelta=Time[j]<t1;
            else tdelta=Time[j]+t3<t1;
           }
         else
           {
            tdelta=Time[j]<t1;
           }
         if (tdelta) {i++; if (showZigZag==2) {t2=t1+GrossPeriod_[x]*60;} t1=iTime(NULL, GrossPeriod_[x],i);}
         if (LBG[i]>0)
           {
            if (el>=Low[j] || el<0) {el=Low[j]; jl=j;}
           }
         else
           {
            if (el>0)
              {
               if (showZigZag==2)
                 {
                  for (k=j-1;Time[k]<t2;k--)
                    {
                     if (k<0) break;
                     LB[k]=el;
                    }
                 }
               LB[jl]=el; el=-1;
              }
           }
         if  (HBG[i]>0)
           {
            if (eh<=High[j]) {eh=High[j]; jh=j;}
           }
         else
           {
            if (eh>0)
              {
               if (showZigZag==2)
                 {
                  for (k=j-1;Time[k]<t2;k--)
                    {
                     if (k<0) break;
                     HB[k]=eh;
                    }
                 }
               HB[jh]=eh; eh=-1;
              }
           } 
        }
     }
   return (0);
  }
//+------------------------------------------------------------------+
//| Ïðåîáðàçîâàíèå çèãçàãà ñî ñòàðøåãî òàéìôðåéìà íà òåêóùèé. Êîíåö. |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Ïðîâåðêà êîððåêòíîñòè çàäàíèÿ òàéìôðåéìà. Íà÷àëî.                |
//+------------------------------------------------------------------+
int _period(int x, int tf)
  {
   if (tf<Period() && tf>0) ExtDepth_[x]=0;
   if (tf==Period()) return (0);
   return (tf);
  }
//+------------------------------------------------------------------+
//| Ïðîâåðêà êîððåêòíîñòè çàäàíèÿ òàéìôðåéìà. Êîíåö.                 |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Ñäâèã ýëåìåíòîâ ìàññèâà íà 1 îò 0 ýëåìåíòà â ñòîðîíó óâåëè÷åíèÿ  |
//| èíäåêñà. Íà÷àëî.                                                 |
//+------------------------------------------------------------------+
void Shift_elements (double& arr[], double& arr1[])
  {
   int i,j;
   j=ArraySize(arr)-1;
   for (i=j;i>0;i--)
     {
      arr[i]=arr[i-1];
      arr1[i]=arr1[i-1];
     }
   arr[0]=0;
   arr1[0]=0;
  }
//-------------------------------------------------------------------+
//| Ñäâèã ýëåìåíòîâ ìàññèâà íà 1 îò 0 ýëåìåíòà â ñòîðîíó óâåëè÷åíèÿ  |
//| èíäåêñà. Êîíåö.                                                  |
//-------------------------------------------------------------------+

//+------------------------------------------------------------------+
//| Èçìåíåíèå ðàçìåðà ìàññèâîâ è ïðèñâîåíèå âñåì ýëåìåíòàì çíà÷åíèÿ 0|
//| Íà÷àëî.                                                          |
//+------------------------------------------------------------------+
void arr_resize (double& arr[], double& arr1[], int size, int x)
  {
   if (GrossPeriod_[x]>0)
     {
      ArrayResize(arr,size); ArrayResize(arr1,size);
      ArrayInitialize(arr,0); ArrayInitialize(arr1,0);
     }
  }
//+------------------------------------------------------------------+
//| Èçìåíåíèå ðàçìåðà ìàññèâîâ è ïðèñâîåíèå âñåì ýëåìåíòàì çíà÷åíèÿ 0|
//| Êîíåö.                                                           |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Ïåðåíîñ çíà÷åíèé ïàðàìåòðîâ èç ñòðîêè â ÷èñëîâîé ìàññèâ. Íà÷àëî. |
//+------------------------------------------------------------------+
void _stringtointarray (string str, int& arr[], int x)
  {
   int i,j,k=0;
   for (i=0;i<x;i++)
     {
      j=StringFind(str,",",k);
      if (j<0) {arr[i]=StrToInteger(StringSubstr(str,k)); break;}
      arr[i]=StrToInteger(StringSubstr(str,k,j-k));
      k=j+1;
     }
  }
//+------------------------------------------------------------------+
//| Ïåðåíîñ çíà÷åíèé ïàðàìåòðîâ èç ñòðîêè â ÷èñëîâîé ìàññèâ.Êîíåö.   |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Ïåðåíîñ çíà÷åíèé ïàðàìåòðîâ èç ñòðîêè â ÷èñëîâîé ìàññèâ. Íà÷àëî. |
//+------------------------------------------------------------------+
void _stringtocolorarray (string str, int& arr[], int x)
  {
   int i,j,k=0;
   for (i=0;i<x;i++)
     {
      j=StringFind(str,",",k);
      if (j<0) {arr[i]=fStrToColor(StringSubstr(str,k)); break;}
      arr[i]=fStrToColor(StringSubstr(str,k,j-k));
      k=j+1;
     }
  }
//+------------------------------------------------------------------+
//| Ïåðåíîñ çíà÷åíèé ïàðàìåòðîâ èç ñòðîêè â ÷èñëîâîé ìàññèâ.Êîíåö.   |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Ïðåîáðàçîâàíèå ñòðîêè â öâåò. Íà÷àëî.                            |
//| Ôóíêöèþ íàïèñàë Integer.  http://forum.mql4.com/ru/7134          |
//+------------------------------------------------------------------+
color fStrToColor(string aName)
  {
 
   color tColor[]={  Black, DarkGreen, DarkSlateGray, Olive, Green, Teal, Navy, Purple, 
                     Maroon, Indigo, MidnightBlue, DarkBlue, DarkOliveGreen, SaddleBrown, 
                     ForestGreen, OliveDrab, SeaGreen, DarkGoldenrod, DarkSlateBlue, 
                     Sienna, MediumBlue, Brown, DarkTurquoise, DimGray, LightSeaGreen, 
                     DarkViolet, FireBrick, MediumVioletRed, MediumSeaGreen, Chocolate, 
                     Crimson, SteelBlue, Goldenrod, MediumSpringGreen, LawnGreen, 
                     CadetBlue, DarkOrchid, YellowGreen, LimeGreen, OrangeRed, DarkOrange, 
                     Orange, Gold, Yellow, Chartreuse, Lime, SpringGreen, Aqua, DeepSkyBlue, 
                     Blue, Magenta, Red, Gray, SlateGray, Peru, BlueViolet, LightSlateGray, 
                     DeepPink, MediumTurquoise, DodgerBlue, Turquoise, RoyalBlue, SlateBlue, 
                     DarkKhaki, IndianRed, MediumOrchid, GreenYellow, MediumAquamarine, 
                     DarkSeaGreen, Tomato, RosyBrown, Orchid, MediumPurple, PaleVioletRed, 
                     Coral, CornflowerBlue, DarkGray, SandyBrown, MediumSlateBlue, Tan, 
                     DarkSalmon, BurlyWood, HotPink, Salmon, Violet, LightCoral, SkyBlue, 
                     LightSalmon, Plum, Khaki, LightGreen, Aquamarine, Silver, LightSkyBlue, 
                     LightSteelBlue, LightBlue, PaleGreen, Thistle, PowderBlue, PaleGoldenrod, 
                     PaleTurquoise, LightGray, Wheat, NavajoWhite, Moccasin, LightPink, 
                     Gainsboro, PeachPuff, Pink, Bisque, LightGoldenrod, BlanchedAlmond, 
                     LemonChiffon, Beige, AntiqueWhite, PapayaWhip, Cornsilk, LightYellow, 
                     LightCyan, Linen, Lavender, MistyRose, OldLace, WhiteSmoke, Seashell, 
                     Ivory, Honeydew, AliceBlue, LavenderBlush, MintCream, Snow, White
                  };  
   string tName[]={   "Black", "DarkGreen", "DarkSlateGray", "Olive", "Green", "Teal", "Navy", "Purple", 
                     "Maroon", "Indigo", "MidnightBlue", "DarkBlue", "DarkOliveGreen", "SaddleBrown", 
                     "ForestGreen", "OliveDrab", "SeaGreen", "DarkGoldenrod", "DarkSlateBlue", 
                     "Sienna", "MediumBlue", "Brown", "DarkTurquoise", "DimGray", "LightSeaGreen", 
                     "DarkViolet", "FireBrick", "MediumVioletRed", "MediumSeaGreen", "Chocolate", 
                     "Crimson", "SteelBlue", "Goldenrod", "MediumSpringGreen", "LawnGreen", 
                     "CadetBlue", "DarkOrchid", "YellowGreen", "LimeGreen", "OrangeRed", "DarkOrange", 
                     "Orange", "Gold", "Yellow", "Chartreuse", "Lime", "SpringGreen", "Aqua", "DeepSkyBlue", 
                     "Blue", "Magenta", "Red", "Gray", "SlateGray", "Peru", "BlueViolet", "LightSlateGray", 
                     "DeepPink", "MediumTurquoise", "DodgerBlue", "Turquoise", "RoyalBlue", "SlateBlue", 
                     "DarkKhaki", "IndianRed", "MediumOrchid", "GreenYellow", "MediumAquamarine", 
                     "DarkSeaGreen", "Tomato", "RosyBrown", "Orchid", "MediumPurple", "PaleVioletRed", 
                     "Coral", "CornflowerBlue", "DarkGray", "SandyBrown", "MediumSlateBlue", "Tan", 
                     "DarkSalmon", "BurlyWood", "HotPink", "Salmon", "Violet", "LightCoral", "SkyBlue", 
                     "LightSalmon", "Plum", "Khaki", "LightGreen", "Aquamarine", "Silver", "LightSkyBlue", 
                     "LightSteelBlue", "LightBlue", "PaleGreen", "Thistle", "PowderBlue", "PaleGoldenrod", 
                     "PaleTurquoise", "LightGray", "Wheat", "NavajoWhite", "Moccasin", "LightPink", 
                     "Gainsboro", "PeachPuff", "Pink", "Bisque", "LightGoldenrod", "BlanchedAlmond", 
                     "LemonChiffon", "Beige", "AntiqueWhite", "PapayaWhip", "Cornsilk", "LightYellow", 
                     "LightCyan", "Linen", "Lavender", "MistyRose", "OldLace", "WhiteSmoke", "Seashell", 
                     "Ivory", "Honeydew", "AliceBlue", "LavenderBlush", "MintCream", "Snow", "White"
                  };
   aName=StringTrimLeft(StringTrimRight(aName));      
   for(int i=0;i<ArraySize(tName);i++)
     {
      if(aName==tName[i])return(tColor[i]);
     }
  return(Red);                                     
                
 }
//+------------------------------------------------------------------+
//| Ïðåîáðàçîâàíèå ñòðîêè â öâåò. Êîíåö.                             |
//| Ôóíêöèþ íàïèñàë Integer.  http://forum.mql4.com/ru/7134          |
//+------------------------------------------------------------------+