创建多交易品种、多周期指标·综合运用

ENUM_LINE_STATE  BufferLineStateRelative(const class="type">class="kw">string symbol_from,const ENUM_TIMEFRAMES timeframes_from,const class="type">int buffer_num,const class="type">int index,const class="type">class="kw">double level0,const class="type">class="kw">double level1=EMPTY_VALUE);
class=class="str">"cmt">//--- Returns(class="num">1) success flag, (class="num">2) calculation error type
  class="type">bool               IsSuccess(class="type">void)                const { class="kw">return this.m_success;     }
  ENUM_ERR_TYPE      TypeError(class="type">void)                const { class="kw">return this.m_type_err;    }

class=class="str">"cmt">//--- Sets(class="num">1) identifier, (class="num">2) Digits, (class="num">3) custom description, (class="num">4) description of the specified buffer
  class="type">void               SetID(const class="type">int id)                              { this.m_id=id;                    }
  class="type">void               SetDigits(const class="type">uint digits)                     { this.m_digits=(class="type">int)digits;      }
  class="type">void               SetDescription(const class="type">class="kw">string descr)               { this.m_description=descr;       }
  class="type">void               SetBufferDescription(const class="type">uint buffer_num,const class="type">class="kw">string descr);
class=class="str">"cmt">//--- Sets the indexing of buffer arrays of the calculation part not as in the timeseries
  class="type">void               SetAsSeriesOff(class="type">void);
class=class="str">"cmt">//--- Returns flag of whether the buffer is set as series, (class="num">2) historical data for symbol/period is synchronized
  class="type">bool               IsSeries(const class="type">uint buffer_num) const;
  class="type">bool               IsSynchronized(class="type">void) const
     {
       class="kw">return (class="type">bool)::SeriesInfoInteger(this.m_symbol,this.m_timeframe,SERIES_SYNCHRONIZED);
     }

class=class="str">"cmt">//--- Returns(class="num">1) timeframe, (class="num">2) symbol, (class="num">3) name, (class="num">4) list of parameters, (class="num">5) handle, (class="num">6) Digits
class=class="str">"cmt">//--- number of(class="num">7) buffers, (class="num">8) bars, (class="num">9) identifier, (class="num">10) description, (class="num">11) title, (class="num">12) category,
class=class="str">"cmt">//--- (class="num">13) number of parameters, (class="num">14) program type, description of(class="num">15) category, (class="num">16) indicator buffer

ENUM_TIMEFRAMES Timeframe(class="type">void) const { class="kw">return this.m_timeframe; }
class="type">class="kw">string Symbol(class="type">void) const { class="kw">return this.m_symbol; }
class="type">class="kw">string Name(class="type">void) const { class="kw">return this.m_name; }
class="type">class="kw">string Parameters(class="type">void) const { class="kw">return this.m_parameters; }
class="type">int Handle(class="type">void) const { class="kw">return this.m_handle; }
class="type">int Digits(class="type">void) const { class="kw">return this.m_digits; }
class="type">uint BuffersTotal(class="type">void) const { class="kw">return this.m_buffers.Size(); }
class="type">uint RatesTotal(class="type">void) const { class="kw">return this.m_rates_total; }
class="type">int ID(class="type">void) const { class="kw">return this.m_id; }
class="type">class="kw">string Description(class="type">void) const { class="kw">return this.m_description; }
class="type">class="kw">string Title(class="type">void) const { class="kw">return this.m_title; }

ENUM_IND_CATEGORY Category(class="type">void) const { class="kw">return this.m_category; }
 class="type">uint ParamsTotal(class="type">void) const { class="kw">return this.m_param.Size(); }
 ENUM_PROGRAM_TYPE Program(class="type">void) const { class="kw">return this.m_program; }
 class="type">class="kw">string CategoryDescription(class="type">void);
 class="type">class="kw">string BufferDescription(const class="type">uint buffer_num);
class=class="str">"cmt">//--- Returns(class="num">1) structure of parameters by index from array, (class="num">2) flag of indicator program, (class="num">3) timeframe description
 class="type">MqlParam GetMqlParam(const class="type">int index) const { class="kw">return this.m_param[index]; }
 class="type">bool IsIndicator() const { class="kw">return(this.Program()==PROGRAM_INDICATOR); }
 class="type">class="kw">string TimeframeDescription(class="type">void) const
 {
 class="kw">return ::StringSubstr(::EnumToString(this.m_timeframe),class="num">7);
 }
class=class="str">"cmt">//--- Returns amount of calculated data
 class="type">int Calculated(class="type">void) const { class="kw">return ::BarsCalculated(this.m_handle); }

class=class="str">"cmt">//--- Virtual method returning the type of object(indicator)
 class="kw">virtual class="type">int Type(class="type">void) const { class="kw">return this.m_type; }
class=class="str">"cmt">//--- Virtual method for comparing two objects
 class="kw">virtual class="type">int Compare(const CObject *node,const class="type">int mode=class="num">0) const
 {
 const CIndMSTF *compared=node;
 class="kw">switch(mode)

{
 case COMPARE_MODE_ID        : class="kw">return(this.ID()>compared.ID()         ? class="num">1 : this.ID()<compared.ID()         ? -class="num">1 : class="num">0);
 case COMPARE_MODE_HANDLE    : class="kw">return(this.Handle()>compared.Handle()   ? class="num">1 : this.Handle()<compared.Handle()   ? -class="num">1 : class="num">0);
 case COMPARE_MODE_CATEGORY  : class="kw">return(this.Category()>compared.Category() ? class="num">1 : this.Category()<compared.Category() ? -class="num">1 : class="num">0);
 case COMPARE_MODE_SYMBOL    : class="kw">return(this.Symbol()>compared.Symbol()   ? class="num">1 : this.Symbol()<compared.Symbol()   ? -class="num">1 : class="num">0);
 case COMPARE_MODE_TIMEFRAME : class="kw">return(this.Timeframe()>compared.Timeframe() ? class="num">1 : this.Timeframe()<compared.Timeframe() ? -class="num">1 : class="num">0);
 case COMPARE_MODE_DESCRIPTION : class="kw">return(this.Description()>compared.Description() ? class="num">1 : this.Description()<compared.Description() ? -class="num">1 : class="num">0);
 class=class="str">"cmt">//--- Equality of all object parameters
 class="kw">default                     : class="kw">return(this.IsEqualIndicators(compared) ? class="num">0 : -class="num">1);
}
class=class="str">"cmt">//--- Returns the flag of equality of parameters of two indicator objects
class="type">bool IsEqualIndicators(const CIndMSTF *compared) const
 {
  if(this.Type()!=compared.Type() || this.ParamsTotal()!=compared.ParamsTotal())
   class="kw">return false;

class="type">bool res=true;
class="type">int total=(class="type">int)this.ParamsTotal();
for(class="type">int i=class="num">0;i<total;i++)
  res &=this.IsEqualParameters(this.m_param[i],compared.GetMqlParam(i));
res &=(this.Timeframe()==compared.Timeframe());
res &=(this.Symbol()==compared.Symbol());
class="kw">return res;

class="type">void OnTimer(class="type">void);

CIndMSTF(){}
CIndMSTF(const ENUM_INDICATOR type,const class="type">uint buffers,const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe);
~CIndMSTF();

CIndMSTF::CIndMSTF(const ENUM_INDICATOR type,const class="type">uint buffers,const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe)
  {
  ::ResetLastError();
  if(!::EventSetTimer(class="num">1))
     ::PrintFormat("%s: EventSetTimer failed. Error %lu",__FUNCTION__,::GetLastError());
  this.m_program=(ENUM_PROGRAM_TYPE)::MQLInfoInteger(MQL_PROGRAM_TYPE);
  this.m_type=type;
  this.m_symbol=(symbol==NULL || symbol=="" ? ::Symbol() : symbol);
  this.m_timeframe=(timeframe==PERIOD_CURRENT ? ::Period() : timeframe);
  this.m_handle=INVALID_HANDLE;
  this.m_digits=::Digits();
  this.m_success=true;
  this.m_type_err=ERR_TYPE_NO_ERROR;
  ::ResetLastError();
  if(::ArrayResize(this.m_buffers,buffers)!=buffers)
     ::PrintFormat("%s: Buffers ArrayResize failed. Error  %lu"__FUNCTION__,::GetLastError());
  }

CIndMSTF::~CIndMSTF()
  {
class=class="str">"cmt">//--- Delete timer
  ::EventKillTimer();
class=class="str">"cmt">//--- Release indicator handle
  ::ResetLastError();
  if(this.m_handle!=INVALID_HANDLE && !::IndicatorRelease(this.m_handle))
    ::PrintFormat("%s: %s, handle %ld IndicatorRelease failed. Error %ld",__FUNCTION__,this.Title(),m_handle,::GetLastError());
class=class="str">"cmt">//--- Free up the memory of buffer arrays
  for(class="type">int i=class="num">0;i<(class="type">int)this.BuffersTotal();i++)
    ::ArrayFree(this.m_buffers[i].array);
  }

class="type">void CIndMSTF::OnTimer(class="type">void)
  {
  if(this.Symbol()==::Symbol() && this.Timeframe()==::Period())
    class="kw">return;
  class="kw">static class="type">int count1=class="num">0;
  class="kw">static class="type">int count2=class="num">0;
  if(count1>=TIMER_COUNT_1)
    {
    class="type">class="kw">datetime array[class="num">1];
    ::CopyTime(this.m_symbol,this.m_timeframe,class="num">0,class="num">1,array);
    count1=class="num">0;
    }
  if(count2>=TIMER_COUNT_2)
    {
    class="kw">static class="type">int count=class="num">0;

CIndMSTF::~CIndMSTF()
  {
class=class="str">"cmt">//--- Delete timer
  ::EventKillTimer();
class=class="str">"cmt">//--- Release indicator handle
  ::ResetLastError();
  if(this.m_handle!=INVALID_HANDLE && !::IndicatorRelease(this.m_handle))
    ::PrintFormat("%s: %s, handle %ld IndicatorRelease failed. Error %ld",__FUNCTION__,this.Title(),m_handle,::GetLastError());
class=class="str">"cmt">//--- Free up the memory of buffer arrays
  for(class="type">int i=class="num">0;i<(class="type">int)this.BuffersTotal();i++)
    ::ArrayFree(this.m_buffers[i].array);
  }

class="type">void CIndMSTF::OnTimer(class="type">void)
  {
  if(this.Symbol()==::Symbol() && this.Timeframe()==::Period())
    class="kw">return;
  class="kw">static class="type">int count1=class="num">0;
  class="kw">static class="type">int count2=class="num">0;
  if(count1>=TIMER_COUNT_1)
    {
    class="type">class="kw">datetime array[class="num">1];
    ::CopyTime(this.m_symbol,this.m_timeframe,class="num">0,class="num">1,array);
    count1=class="num">0;
    }
  if(count2>=TIMER_COUNT_2)
    {
    class="kw">static class="type">int count=class="num">0;

class=class="str">"cmt">//--- 若上一次指标计算失败，模拟一个 tick 并打印日志
if(!this.m_success)
  {
   if(::ChartSetSymbolPeriod(class="num">0,::Symbol(),::Period()))
     {
      count++;
      ::PrintFormat("%s::%s: Tick emulation. Attempt %ld of class="num">3 ...",__FUNCTION__,this.Title(),count);
      if(count>class="num">2)
        {
         count=class="num">0;
         this.m_success=true;
        }
     }
  }
class=class="str">"cmt">//--- 重置计数器
count2=class="num">0;
}
class=class="str">"cmt">//--- 增加定时器计数
count1++;
count2++;
}

class="type">int CIndMSTF::CreateIndicator(class="type">void)
  {
   class="type">class="kw">string name=::StringFormat("%s(%s,%s)",::StringSubstr(::EnumToString(this.m_type),class="num">4),this.m_symbol,this.TimeframeDescription());
   ::ResetLastError();
   this.m_handle=::IndicatorCreate(this.m_symbol,this.m_timeframe,this.m_type,this.m_param.Size(),this.m_param);
   if(this.m_handle==INVALID_HANDLE)
      ::PrintFormat("%s: Failed to create indicator handle %s. Error %ld",__FUNCTION__,name,::GetLastError());
   else
      this.SetAsSeriesOff();
   class="kw">return this.m_handle;
  }

if(!this.m_success)
  {
   if(::ChartSetSymbolPeriod(class="num">0,::Symbol(),::Period()))
     {
      count++;
      ::PrintFormat("%s::%s: Tick emulation. Attempt %ld of class="num">3 ...",__FUNCTION__,this.Title(),count);
      if(count>class="num">2)
        {
         count=class="num">0;
         this.m_success=true;
        }
     }
  }
count2=class="num">0;
}
count1++;
count2++;
}

class="type">int CIndMSTF::CreateIndicator(class="type">void)
  {
   class="type">class="kw">string name=::StringFormat("%s(%s,%s)",::StringSubstr(::EnumToString(this.m_type),class="num">4),this.m_symbol,this.TimeframeDescription());
   ::ResetLastError();
   this.m_handle=::IndicatorCreate(this.m_symbol,this.m_timeframe,this.m_type,this.m_param.Size(),this.m_param);
   if(this.m_handle==INVALID_HANDLE)
      ::PrintFormat("%s: Failed to create indicator handle %s. Error %ld",__FUNCTION__,name,::GetLastError());
   else
      this.SetAsSeriesOff();
   class="kw">return this.m_handle;
  }

class="type">bool CIndMSTF::BufferResize(const class="type">uint buffer_num,const class="type">int new_buff_size)
  {
   if(buffer_num>this.BuffersTotal()-class="num">1)
     {
      class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));

::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
   class="kw">return false;
   }
class=class="str">"cmt">//--- Resize the buffer
  ::ResetLastError();
  class="type">bool res=this.m_buffers[buffer_num].BuffResize(new_buff_size);
class=class="str">"cmt">//--- If unsuccessful, print a message to the log
  if(!res)
    ::PrintFormat("%s::%s: Buffer(%lu) resize failed. Error %lu",__FUNCTION__,this.Title(),buffer_num,::GetLastError());
class=class="str">"cmt">//--- Return the result of resizing the buffer array
  class="kw">return res;
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Resize all indicator buffers                                      |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">bool CIndMSTF::BuffersResize(const class="type">int new_buff_size)
  {
class=class="str">"cmt">//--- In a loop through all indicator buffers, add to the &class="macro">#x27;res&class="macro">#x27; variable the resizing result of each next buffer
  class="type">bool res=true;
  class="type">int total=(class="type">int)this.BuffersTotal();
  for(class="type">int i=class="num">0;i<total;i++)
    res &=this.m_buffers[i].BuffResize(new_buff_size);
class=class="str">"cmt">//--- Return the result of resizing all arrays of indicator buffers
  class="kw">return res;
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Initialize the specified indicator buffer                         |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">bool CIndMSTF::BufferInitialize(const class="type">uint buffer_num,const class="type">int new_buff_size)
  {
class=class="str">"cmt">//--- Validate the buffer number passed to the method and, if the number is incorrect, print a message to the log and class="kw">return &class="macro">#x27;false&class="macro">#x27;
  if(buffer_num>this.BuffersTotal()-class="num">1)
   {
    class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
    ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
    class="kw">return false;
   }
class=class="str">"cmt">//--- resizing the buffer array
  class="type">bool res=this.BufferResize(buffer_num,new_buff_size);
class=class="str">"cmt">//--- If successfully resized, initialize the buffer with the set initializing value
  if(res)
    this.m_buffers[buffer_num].InitBuffer();
class=class="str">"cmt">//--- Return the result
  class="kw">return res;
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Initialize all indicator buffers                                 |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">bool CIndMSTF::BuffersInitialize(const class="type">int new_buff_size)
  {
class=class="str">"cmt">//--- In a loop through all indicator buffers, add to the &class="macro">#x27;res&class="macro">#x27; variable the resizing result of each next buffer
class=class="str">"cmt">//--- If successfully resized, initialize the buffer with the set initializing value
  class="type">bool res=true;
  class="type">int total=(class="type">int)this.BuffersTotal();

for(class="type">int i=class="num">0;i<total;i++)
  {
   res &=this.m_buffers[i].BuffResize(new_buff_size);
   if(res)
     this.m_buffers[i].InitBuffer();
  }
class=class="str">"cmt">//--- Return the overall result
  class="kw">return res;
}
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Set the initializing value for the specified buffer               |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">void CIndMSTF::SetBufferInitValue(const class="type">uint buffer_num,const class="type">class="kw">double value)
  {
class=class="str">"cmt">//--- Validate the buffer number passed to the method and, if the number is incorrect, print a message to the log and exit
   if(buffer_num>this.BuffersTotal()-class="num">1)
     {
      class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
      ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
      class="kw">return;
     }
class=class="str">"cmt">//--- Set a new initializing value for the specified buffer
   this.m_buffers[buffer_num].SetInitValue(value);
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Return the initialization value of the specified buffer            |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">class="kw">double CIndMSTF::BufferInitValue(const class="type">uint buffer_num) const
  {
class=class="str">"cmt">//--- Validate the buffer number passed to the method and, if the number is incorrect, print a message to log
   if(buffer_num>this.BuffersTotal()-class="num">1)
     {
      class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
      ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
      class=class="str">"cmt">//--- If the indicator has buffers, class="kw">return the initializing value of the first one, otherwise EMPTY_VALUE
      class="kw">return(this.BuffersTotal()>class="num">0 ? this.BufferInitValue(class="num">0) : EMPTY_VALUE);
     }
class=class="str">"cmt">//--- Return the initializing value of the requested buffer
   class="kw">return this.m_buffers[buffer_num].InitValue();
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Sets the offset value for the specified buffer                     |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">void CIndMSTF::SetBufferShift(const class="type">uint buffer_num,const class="type">int value)
  {
class=class="str">"cmt">//--- Validate the buffer number passed to the method and, if the number is incorrect, print a message to the log and exit
   if(buffer_num>this.BuffersTotal()-class="num">1)
     {
      class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));

::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
   class="kw">return;
   }
class=class="str">"cmt">//--- Set the offset value for the buffer
  this.m_buffers[buffer_num].SetShift(value);
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Return the offset value of the specified buffer                    |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">class="kw">double CIndMSTF::BufferShift(const class="type">uint buffer_num) const
  {
class=class="str">"cmt">//--- Validate the buffer number passed to the method and, if the number is incorrect, print a message to log
  if(buffer_num>this.BuffersTotal()-class="num">1)
   {
     class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
     ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
     class=class="str">"cmt">//--- If the indicator has buffers, class="kw">return the shift value of the very first one, otherwise class="num">0
     class="kw">return(this.BuffersTotal()>class="num">0 ? this.m_buffers[class="num">0].Shift() : class="num">0);
   }
class=class="str">"cmt">//--- Return the offset value of the requested buffer
  class="kw">return this.m_buffers[buffer_num].Shift();
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Fill object buffers with data from the calculation part buffer   |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">bool CIndMSTF::Calculate(class="type">void)
  {
class=class="str">"cmt">//--- Set the success flag to true, and the error type to no error
  this.m_success=true;
  this.m_type_err=ERR_TYPE_NO_ERROR;
class=class="str">"cmt">//--- If the data is not yet synchronized with the trade server,
  if(!this.IsSynchronized())
   {
     class=class="str">"cmt">//--- Log a message about non-synchronized data,
     ::PrintFormat("%s::%s: Waiting for data to sync...",__FUNCTION__,this.Title());
     class=class="str">"cmt">//--- set the error type, add &class="macro">#x27;false&class="macro">#x27; to the error flag and class="kw">return &class="macro">#x27;false&class="macro">#x27;
     this.m_type_err=ERR_TYPE_NO_CYNC;
     this.m_success &=false;
     class="kw">return false;
   }
class=class="str">"cmt">//--- If the Calculated method returned -class="num">1, this means the start of data downloading
  if(this.Calculated()==WRONG_VALUE)
   {
     class=class="str">"cmt">//--- Log a message about the start of data downloading,
     ::PrintFormat("%s::%s: Start downloading data by %s/%s. Waiting for the next tick...",__FUNCTION__,this.Title(),this.m_symbol,this.TimeframeDescription());
     class=class="str">"cmt">//--- set the error type, add &class="macro">#x27;false&class="macro">#x27; to the error flag and class="kw">return &class="macro">#x27;false&class="macro">#x27;
     this.m_type_err=ERR_TYPE_NO_DATA;
     this.m_success &=false;
     class="kw">return false;
   }
class=class="str">"cmt">//--- If the Calculated method returned class="num">0, this means that the indicator has not yet been calculated
  if(this.Calculated()==class="num">0)
   {
     class=class="str">"cmt">//--- Log a message about waiting for the indicator to be calculated,

  ::PrintFormat("%s::%s: Waiting for a new tick and when the indicator will be calculated...",__FUNCTION__,this.Title());
  class=class="str">"cmt">//--- set the error type, add &class="macro">#x27;false&class="macro">#x27; to the error flag and class="kw">return &class="macro">#x27;false&class="macro">#x27;
  this.m_type_err=ERR_TYPE_NO_CALC;
  this.m_success &=false;
  class="kw">return false;
   }
class=class="str">"cmt">//--- Get the number of data bars for the indicator symbol/period
  class="type">int bars=::Bars(this.m_symbol,this.m_timeframe);
class=class="str">"cmt">//--- If the Bars function returned a zero value, which often happens on weekends, calculate the available number of bars
  if(bars==class="num">0)
   {
  class=class="str">"cmt">//--- Get the date of the very first available bar in history for the symbol/period
  class="type">class="kw">datetime firstdate=(class="type">class="kw">datetime)::SeriesInfoInteger(this.m_symbol,this.m_timeframe,SERIES_FIRSTDATE);
  class=class="str">"cmt">//--- Get the date of the last(current) bar in history for the symbol/period
  class="type">class="kw">datetime lastdate=(class="type">class="kw">datetime)::SeriesInfoInteger(this.m_symbol,this.m_timeframe,SERIES_LASTBAR_DATE);
  class=class="str">"cmt">//--- Calculate the number of bars between the first and last dates of history
  class="type">int sec=::PeriodSeconds(this.m_timeframe);
  class="type">ulong date_bars=(((class="type">ulong)lastdate-(class="type">ulong)firstdate)/(sec>class="num">0 ? sec : class="num">1))+class="num">1;
  class=class="str">"cmt">//--- Write to the &class="macro">#x27;bars&class="macro">#x27; variable the smaller value of the calculated number of bars and the maximum number of bars available in the terminal
  bars=(class="type">int)fmin(date_bars,::TerminalInfoInteger(TERMINAL_MAXBARS));
   }
class=class="str">"cmt">//--- Write the resulting number of available bars to m_rates_total
  if(this.m_rates_total!=bars)
    this.m_rates_total=bars;
class=class="str">"cmt">//--- If the number of available bars is received, and it is class="num">2 or less,
  if(this.m_rates_total>=class="num">0 && this.m_rates_total<class="num">3)
   {
  class=class="str">"cmt">//--- Log a message about the number of available bars being too small
  ::PrintFormat("%s::%s: Not enough data for calculation: %ld bars. Waiting for the next tick...",__FUNCTION__,this.Title(),this.m_rates_total);
  class=class="str">"cmt">//--- set the error type, add &class="macro">#x27;false&class="macro">#x27; to the error flag and class="kw">return &class="macro">#x27;false&class="macro">#x27;
  this.m_type_err=ERR_TYPE_NO_DATA;
  this.m_success &=false;
  class="kw">return false;
   }
class=class="str">"cmt">//--- Calculate the number of bars required to calculate the indicator
class=class="str">"cmt">//--- Either the entire available history, or class="num">1 when a new bar opens, or class="num">0 on the current tick
  this.m_limit=this.m_rates_total-this.m_prev_calculated;
  this.m_prev_calculated=this.Calculated();
class=class="str">"cmt">//--- Declare an array of size class="num">2 to receive data into it from the indicator&class="macro">#x27;s calculation part buffer
class=class="str">"cmt">//--- We always get two bars: previous and current
  class="type">class="kw">double array[class="num">2];
class=class="str">"cmt">//--- Get the number of indicator buffers
  class="type">int total=(class="type">int)this.BuffersTotal();
class=class="str">"cmt">//--- If the calculated m_limit is greater than class="num">1, it means either the first launch or changes in historical data

if(this.m_limit>class="num">1)
  {
  class=class="str">"cmt">//--- In a loop over the number of indicator buffers
  for(class="type">int i=class="num">0;i<total;i++)
    {
    class=class="str">"cmt">//--- resize the indicator buffer array and initialize it to the "empty" value set for this buffer
    this.BufferInitialize(i,this.m_rates_total);
    ::ResetLastError();
    class=class="str">"cmt">//--- Copy all available historical data from indicator&class="macro">#x27;s calculation part array to buffer array of indicator object
    class="type">int copied=::CopyBuffer(this.m_handle,i,-this.m_buffers[i].Shift(),this.m_rates_total,this.m_buffers[i].array);
    class=class="str">"cmt">//--- If not all data is copied
    if(copied!=this.m_rates_total)
      {
      class=class="str">"cmt">//--- If CopyBuffer returned -class="num">1, this means the start of historical data downloading
      class=class="str">"cmt">//--- print a message about this to the log
      if(copied==WRONG_VALUE)
        ::PrintFormat("%s::%s: Start downloading data by %s/%s. Waiting for the next tick...",__FUNCTION__,this.Title(),this.m_symbol,this.TimeframeDescription());
      class=class="str">"cmt">//--- In any other case, not all data has been copied yet
      class=class="str">"cmt">//--- print a message about this to the log
      else
        ::PrintFormat("%s::%s: Not all data was copied. Data available: %lu, total copied: %ld",__FUNCTION__,this.Title(),this.m_rates_total,copied);
      class=class="str">"cmt">//--- Write the absence of data to the error type
      this.m_type_err=ERR_TYPE_NO_DATA;
      class=class="str">"cmt">//--- Add &class="macro">#x27;false&class="macro">#x27; to the result and class="kw">return &class="macro">#x27;false&class="macro">#x27; to exit the method and wait for the next tick
      this.m_success &=false;
      class="kw">return false;
      }
    }
  class=class="str">"cmt">//--- If we exited the loop of copying all indicator buffers, then everything was successful - class="kw">return &class="macro">#x27;true&class="macro">#x27;
  class="kw">return true;
  }
class=class="str">"cmt">//--- If calculated m_limit is less than or equal to class="num">1, this means either opening of a new bar(m_limit==class="num">1) or current tick(m_limit==class="num">0)
class=class="str">"cmt">//--- In this case, it is necessary to calculate two bars - the first and the current
if(this.m_limit<=class="num">1)
  {
  class=class="str">"cmt">//--- In a loop over the number of indicator buffers
  for(class="type">int i=class="num">0;i<total;i++)
    {
    class=class="str">"cmt">//--- If this is the opening of a new bar and resizing the indicator buffer failed,
    if(this.m_limit==class="num">1 && !this.BufferResize(i,this.m_rates_total))
      {

this.m_success &= false;
class="kw">return false;

::ResetLastError();
if(::CopyBuffer(this.m_handle,i,-this.m_buffers[i].Shift(),class="num">2,array)!=class="num">2)
  {
   ::PrintFormat("%s::%s: CopyBuffer(%lu) failed. Error %lu",__FUNCTION__,this.Title(),i,::GetLastError());
   this.m_success &= false;
   class="kw">return false;
  }
this.m_buffers[i].array[this.DataTotal(i)-class="num">1]=array[class="num">1];
this.m_buffers[i].array[this.DataTotal(i)-class="num">2]=array[class="num">0];

class="kw">return true;

class="kw">return false;

class="type">bool CIndMSTF::DataToBuffer(const class="type">class="kw">string symbol_to,const ENUM_TIMEFRAMES timeframe_to,const class="type">uint buffer_num,const class="type">int limit,class="type">class="kw">double &buffer[])
  {
   this.m_success=true;
   class="type">bool as_series=::ArrayGetAsSeries(buffer);
   if(!as_series)
      ::ArraySetAsSeries(buffer,true);
   class="type">class="kw">string symbol=(symbol_to=="" || symbol_to==NULL ? ::Symbol() : symbol_to);
   ENUM_TIMEFRAMES timeframe=(timeframe_to==PERIOD_CURRENT ? ::Period() : timeframe_to);
   class="type">class="kw">datetime array[class="num">2];
   if(limit>class="num">1 && this.m_limit>class="num">1)
     {
      ::PrintFormat("%s::%s First start, or historical data has been changed. Initialize Buffer(%lu)",__FUNCTION__,this.Title(),buffer_num);

::ArrayInitialize(buffer,this.BufferInitValue(buffer_num));
class=class="str">"cmt">//--- Set the value of the loop counter(no more than the maximum number of bars in the terminal on the chart)
class="type">int count=(limit<=class="num">1 ? class="num">2 : ::fmin(::TerminalInfoInteger(TERMINAL_MAXBARS),limit));
class=class="str">"cmt">//--- In a loop from the zero bar to the value of the loop counter
for(class="type">int i=class="num">0;i<count;i++)
  {
   class=class="str">"cmt">//--- If the chart timeframe matches the class object timeframe, fill the buffer directly from the class object array
   if(timeframe==::Period() && this.m_timeframe==::Period())
      buffer[i]=this.GetData(buffer_num,i);
   class=class="str">"cmt">//--- Otherwise, if the chart timeframe is not equal to the timeframe of the class object
   else
     {
      class=class="str">"cmt">//--- Find out which time of this class the bar of the current chart timeframe, corresponding to the loop index, belongs to
      ::ResetLastError();
      if(::CopyTime(symbol,timeframe,i,class="num">2,array)!=class="num">2)
        {
         class=class="str">"cmt">//--- If there is no data in the terminal, move on
         if(::GetLastError()==class="num">4401)
            class="kw">continue;
         class=class="str">"cmt">//--- Error in obtaining existing data - class="kw">return false
         this.m_success &=false;
         class="kw">return false;
        }
      class=class="str">"cmt">//--- Using time of bar of current chart timeframe, find corresponding index of bar of class object&class="macro">#x27;s chart period
      ::ResetLastError();
      class="type">int bar=::iBarShift(this.m_symbol,this.m_timeframe,array[class="num">0]);
      if(bar==WRONG_VALUE)
        {
         this.m_success &=false;
         class="kw">continue;
        }
      class=class="str">"cmt">//--- If this is historical data(not the first or zero bar) -
      class=class="str">"cmt">//--- in the indicator buffer at the loop index, write the value obtained from the calculation part buffer
      if(i>class="num">1)
         buffer[i]=this.GetData(buffer_num,bar);
      class=class="str">"cmt">//--- If this is the current(zero) or previous(first) bar
      else
        {
         class=class="str">"cmt">//--- Get the time of bars class="num">0 and class="num">1 by symbol/timeframe of the class object
         if(::CopyTime(this.m_symbol,this.m_timeframe,class="num">0,class="num">2,array)!=class="num">2)
           {
            this.m_success &=false;

      class="kw">return false;
      }
      class=class="str">"cmt">//--- Using time, get indexes of current and previous bars on the chart whose symbol/period was passed to method
      class="type">int bar0=::iBarShift(symbol,timeframe,array[class="num">1]);
      class="type">int bar1=::iBarShift(symbol,timeframe,array[class="num">0]);
      if(bar0==WRONG_VALUE || bar1==WRONG_VALUE)
        {
         this.m_success &=false;
         class="kw">return false;
        }
      class=class="str">"cmt">//--- If the chart timeframe is lower than the timeframe of the class object,
      if(timeframe<this.m_timeframe)
        {
         class=class="str">"cmt">//--- in a loop from bar with smaller time to current chart bar, fill the buffer with data from the last class="num">2 cells of the indicator buffer array
         for(class="type">int j=bar1;j>=class="num">0;j--)
            buffer[j]=this.GetData(buffer_num,(j>bar0 ? class="num">1 : class="num">0));
        }
      class=class="str">"cmt">//--- If the chart timeframe is higher than the timeframe of the class object,
      else
        {
         class=class="str">"cmt">//--- Get the time of the current and previous bars by symbol/timeframe of the current chart
         if(::CopyTime(symbol,timeframe,class="num">0,class="num">2,array)!=class="num">2)
            {
             this.m_success &=false;
             class="kw">return false;
            }
         class=class="str">"cmt">//--- Using time, get indexes of bars in indicator&class="macro">#x27;s calculation part buffer, corresponding to time of current and previous bars on the chart
         class="type">int bar0=::iBarShift(this.m_symbol,this.m_timeframe,array[class="num">1]);
         class="type">int bar1=::iBarShift(this.m_symbol,this.m_timeframe,array[class="num">0]);
         class=class="str">"cmt">//--- Write into indicator buffer, at indexes class="num">1 and class="num">0, values from corresponding indexes of calculation part buffer
         buffer[class="num">1]=this.GetData(buffer_num,bar1);
         buffer[class="num">0]=this.GetData(buffer_num,bar0);
        }
     }
   }
class=class="str">"cmt">//--- Set initial indexing of the buffer array passed to the method

  ::ArraySetAsSeries(buffer,as_series);
class=class="str">"cmt">//--- Successful
  class="kw">return true;
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Return the data of the specified buffer as is                     |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">class="kw">double CIndMSTF::GetData(const class="type">uint buffer_num,const class="type">int index) const
  {
class=class="str">"cmt">//--- Validate the buffer number passed to the method and, if the number is incorrect, print a message to log
  if(buffer_num>this.BuffersTotal()-class="num">1)
    {
      class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
      ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
      class=class="str">"cmt">//--- If the indicator has buffers, class="kw">return "empty" value of the first one, otherwise EMPTY_VALUE
      class="kw">return(this.BuffersTotal()>class="num">0 ? this.BufferInitValue(class="num">0) : EMPTY_VALUE);
    }
class=class="str">"cmt">//--- If an incorrect index is specified, class="kw">return the "empty" value of the specified buffer
  if(index<class="num">0 || index>(class="type">int)this.DataTotal(buffer_num)-class="num">1)
    class="kw">return this.BufferInitValue(buffer_num);
class=class="str">"cmt">//--- Calculate the real index in the buffer array and class="kw">return the value at this index
  class="type">int n=class="type">int(this.DataTotal(buffer_num)-class="num">1-index);
  class="kw">return this.m_buffers[buffer_num].array[n];
  }
class=class="str">"cmt">//+-------------------------------------------------------------------+
class=class="str">"cmt">//| Returns data from specified buffer for specified symbol/timeframe |
class=class="str">"cmt">//+-------------------------------------------------------------------+
class="type">class="kw">double CIndMSTF::GetDataTo(const class="type">class="kw">string symbol_to,const ENUM_TIMEFRAMES timeframe_to,const class="type">uint buffer_num,const class="type">int index) const
  {
class=class="str">"cmt">//--- If current symbol/period of the chart is specified
  if(timeframe_to==::Period() && this.m_timeframe==::Period() && symbol_to==::Symbol() && this.m_symbol==::Symbol())
    class="kw">return this.GetData(buffer_num,index);
class=class="str">"cmt">//--- Find out which time of this class the current chart timeframe&class="macro">#x27;s bar, corresponding to the loop index, belongs to
  class="type">class="kw">datetime array[];
  if(::CopyTime(symbol_to,timeframe_to,index,class="num">1,array)!=class="num">1)
    class="kw">return this.BufferInitValue(buffer_num);
class=class="str">"cmt">//--- Using time of bar of current chart timeframe, find corresponding bar index of bar this class chart period
  class="type">int bar=iBarShift(this.m_symbol,this.m_timeframe,array[class="num">0]);
class=class="str">"cmt">//--- If the bar is not found, class="kw">return the "empty" value set for the buffer
  if(bar==WRONG_VALUE)
    class="kw">return this.BufferInitValue(buffer_num);
class=class="str">"cmt">//--- Return value from the indicator object buffer at the found index
  class="kw">return this.GetData(buffer_num,bar);
  }
class=class="str">"cmt">//+------------------------------------------------------------------+

ENUM_LINE_STATE CIndMSTF::BufferLineState(const class="type">uint buffer_num,const class="type">int index) const
  {
  const class="type">class="kw">double value0=this.GetData(buffer_num,index);
  const class="type">class="kw">double value1=this.GetData(buffer_num,index+class="num">1);
  const class="type">class="kw">double value2=this.GetData(buffer_num,index+class="num">2);
  if(value0==EMPTY_VALUE || value1==EMPTY_VALUE || value2==EMPTY_VALUE)
    class="kw">return LINE_STATE_NONE;
  if(::NormalizeDouble(value2-value1,this.m_digits)>class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)>class="num">0)
    class="kw">return LINE_STATE_TURN_UP;
  else if(::NormalizeDouble(value2-value1,this.m_digits)<=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)>class="num">0)
    class="kw">return LINE_STATE_UP;
  else if(::NormalizeDouble(value2-value1,this.m_digits)<=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)==class="num">0)
    class="kw">return LINE_STATE_STOP_UP;
  if(::NormalizeDouble(value2-value1,this.m_digits)<class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)<class="num">0)
    class="kw">return LINE_STATE_TURN_DOWN;
  else if(::NormalizeDouble(value2-value1,this.m_digits)>=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)<class="num">0)
    class="kw">return LINE_STATE_DOWN;
  else if(::NormalizeDouble(value2-value1,this.m_digits)>=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)==class="num">0)
    class="kw">return LINE_STATE_STOP_DOWN;
  class="kw">return LINE_STATE_NONE;
  }
ENUM_LINE_STATE CIndMSTF::BufferLineState(const class="type">class="kw">string symbol_from,const ENUM_TIMEFRAMES timeframes_from,const class="type">uint buffer_num,const class="type">int index) const
  {
  class="type">class="kw">string symbol=(symbol_from=="" || symbol_from==NULL ? ::Symbol() : symbol_from);

ENUM_TIMEFRAMES timeframe=(timeframes_from==PERIOD_CURRENT ? ::Period() : timeframes_from);
class=class="str">"cmt">//--- If we get data from symbol/period equal to current chart, class="kw">return state from the buffer "as is"
if(symbol==::Symbol() && symbol==this.m_symbol && timeframe==::Period() && timeframe==this.m_timeframe)
   class="kw">return this.BufferLineState(buffer_num,index);
class=class="str">"cmt">//--- Declare variables to search for the required bars on the current chart
class="type">class="kw">datetime array[class="num">1];
class="type">int      bar0=WRONG_VALUE;
class="type">int      bar1=WRONG_VALUE;
class="type">int      bar2=WRONG_VALUE;
class=class="str">"cmt">//--- Get the time of the first bar on the chart
::ResetLastError();
if(::CopyTime(symbol,timeframe,index,class="num">1,array)!=class="num">1)
  {
   ::PrintFormat("%s: CopyTime for %s/%s, bar %ld failed. Error %lu",__FUNCTION__,symbol,::StringSubstr(::EnumToString(timeframe),class="num">7),index,::GetLastError());
   class="kw">return LINE_STATE_NONE;
  }
class=class="str">"cmt">//--- Get index of the first bar in indicator object buffer based on bar opening time on the chart
bar0=::iBarShift(this.m_symbol,this.m_timeframe,array[class="num">0]);
if(bar0==WRONG_VALUE)
  {
   ::PrintFormat("%s: iBarShift for %s/%s, time %s failed. Error %lu",__FUNCTION__,this.m_symbol,this.TimeframeDescription(),class="type">class="kw">string(array[class="num">0]),::GetLastError());
   class="kw">return LINE_STATE_NONE;
  }
class=class="str">"cmt">//--- Get the time of the second bar on the chart
::ResetLastError();
if(::CopyTime(symbol,timeframe,index+class="num">1,class="num">1,array)!=class="num">1)
  {
   ::PrintFormat("%s: CopyTime for %s/%s, bar %ld failed. Error %lu",__FUNCTION__,symbol,::StringSubstr(::EnumToString(timeframe),class="num">7),index+class="num">1,::GetLastError());
   class="kw">return LINE_STATE_NONE;
  }
class=class="str">"cmt">//--- Get index of the second bar in indicator object buffer based on bar opening time on the chart
bar1=::iBarShift(this.m_symbol,this.m_timeframe,array[class="num">0]);
if(bar1==WRONG_VALUE)
  {
   ::PrintFormat("%s: iBarShift for %s/%s, time %s failed. Error %lu",__FUNCTION__,this.m_symbol,this.TimeframeDescription(),class="type">class="kw">string(array[class="num">0]),::GetLastError());
   class="kw">return LINE_STATE_NONE;
  }
class=class="str">"cmt">//--- Get the time of the third bar on the chart
::ResetLastError();
if(::CopyTime(symbol,timeframe,index+class="num">2,class="num">1,array)!=class="num">1)
  {
   ::PrintFormat("%s: CopyTime for %s/%s, bar %ld failed. Error %lu",__FUNCTION__,symbol,::StringSubstr(::EnumToString(timeframe),class="num">7),index+class="num">2,::GetLastError());
   class="kw">return LINE_STATE_NONE;
  }

class=class="str">"cmt">//--- Get index of the third bar in indicator object buffer based on bar opening time on the chart
  bar2=::iBarShift(this.m_symbol,this.m_timeframe,array[class="num">0]);
  if(bar2==WRONG_VALUE)
    {
      ::PrintFormat("%s: iBarShift for %s/%s, time %s failed. Error %lu",__FUNCTION__,this.m_symbol,this.TimeframeDescription(),class="type">class="kw">string(array[class="num">0]),::GetLastError());
      class="kw">return LINE_STATE_NONE;
    }
   
class=class="str">"cmt">//--- Get the values of the indicator line with the shift(class="num">0,class="num">1,class="num">2) relative to the passed index
  const class="type">class="kw">double value0=this.GetData(buffer_num,bar0);
  const class="type">class="kw">double value1=this.GetData(buffer_num,bar1);
  const class="type">class="kw">double value2=this.GetData(buffer_num,bar2);
class=class="str">"cmt">//--- If at least one of the values could not be obtained, class="kw">return an undefined value 
  if(value0==EMPTY_VALUE || value1==EMPTY_VALUE || value2==EMPTY_VALUE)
      class="kw">return LINE_STATE_NONE;
class=class="str">"cmt">//--- Line upward reversal(value2>value1 && value0>value1)
  if(::NormalizeDouble(value2-value1,this.m_digits)>class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)>class="num">0)
      class="kw">return LINE_STATE_TURN_UP;
class=class="str">"cmt">//--- Line upward direction(value2<=value1 && value0>value1)
  else if(::NormalizeDouble(value2-value1,this.m_digits)<=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)>class="num">0)
      class="kw">return LINE_STATE_UP;
class=class="str">"cmt">//--- Line upward stop(value2<=value1 && value0==value1)
  else if(::NormalizeDouble(value2-value1,this.m_digits)<=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_STOP_UP;
class=class="str">"cmt">//--- Line downward reversal(value2<value1 && value0<value1)
  if(::NormalizeDouble(value2-value1,this.m_digits)<class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)<class="num">0)
      class="kw">return LINE_STATE_TURN_DOWN;
class=class="str">"cmt">//--- Line downward direction(value2>=value1 && value0<value1)
  else if(::NormalizeDouble(value2-value1,this.m_digits)>=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)<class="num">0)
      class="kw">return LINE_STATE_DOWN;
class=class="str">"cmt">//--- Line downward stop(value2>=value1 && value0==value1)
  else if(::NormalizeDouble(value2-value1,this.m_digits)>=class="num">0 && ::NormalizeDouble(value0-value1,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_STOP_DOWN;
class=class="str">"cmt">//--- Undefined state
  class="kw">return LINE_STATE_NONE;
  }

ENUM_LINE_STATE CIndMSTF::BufferLineStateRelative(const class="type">int buffer_num,const class="type">int index,const class="type">class="kw">double level0,const class="type">class="kw">double level1=EMPTY_VALUE)
  {
class=class="str">"cmt">//--- Get the values of the indicator line with the shift(class="num">0,class="num">1) relative to the passed index
   const class="type">class="kw">double value0=this.GetData(buffer_num,index);
   const class="type">class="kw">double value1=this.GetData(buffer_num,index+class="num">1);
class=class="str">"cmt">//--- If at least one of the values could not be obtained, class="kw">return an undefined value 
   if(value0==EMPTY_VALUE || value1==EMPTY_VALUE)
      class="kw">return LINE_STATE_NONE;
class=class="str">"cmt">//--- Define the second level to compare
   class="type">class="kw">double level=(level1==EMPTY_VALUE ? level0 : level1);
class=class="str">"cmt">//--- The line is below the level(value1<level && value0<level0)
   if(::NormalizeDouble(value1-level,this.m_digits)<class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)<class="num">0)
      class="kw">return LINE_STATE_BELOW;
class=class="str">"cmt">//--- The line is above the level(value1>level && value0>level0)
   if(::NormalizeDouble(value1-level,this.m_digits)>class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)>class="num">0)
      class="kw">return LINE_STATE_ABOVE;
class=class="str">"cmt">//--- The line crossed the level upwards(value1<=level && value0>level0)
   if(::NormalizeDouble(value1-level,this.m_digits)<=class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)>class="num">0)
      class="kw">return LINE_STATE_CROSS_UP;
class=class="str">"cmt">//--- The line crossed the level downwards(value1>=level && value0<level0)
   if(::NormalizeDouble(value1-level,this.m_digits)>=class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)<class="num">0)
      class="kw">return LINE_STATE_CROSS_DOWN;
class=class="str">"cmt">//--- The line touched the level from below(value1<level0 && value0==level0)
   if(::NormalizeDouble(value1-level,this.m_digits)<class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_TOUCH_BELOW;
class=class="str">"cmt">//--- The line touched the level from above(value1>level0 && value0==level0)
   if(::NormalizeDouble(value1-level,this.m_digits)>class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_TOUCH_BELOW;
class=class="str">"cmt">//--- Line is equal to the level value(value1==level0 && value0==level0)
   if(::NormalizeDouble(value1-level,this.m_digits)==class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_EQUALS;
class=class="str">"cmt">//--- Undefined state
   class="kw">return LINE_STATE_NONE;
  }

ENUM_LINE_STATE CIndMSTF::BufferLineStateRelative(const class="type">class="kw">string symbol_from,const ENUM_TIMEFRAMES timeframes_from,const class="type">int buffer_num,const class="type">int index,const class="type">class="kw">double level0,const class="type">class="kw">double level1=EMPTY_VALUE)
  {
class=class="str">"cmt">//--- Determine the chart symbol/period passed to the method
   class="type">class="kw">string symbol=(symbol_from=="" || symbol_from==NULL ? ::Symbol() : symbol_from);
   ENUM_TIMEFRAMES timeframe=(timeframes_from==PERIOD_CURRENT ? ::Period() : timeframes_from);
class=class="str">"cmt">//--- Get the values of the indicator line with the shift(class="num">0,class="num">1) relative to the passed index
   const class="type">class="kw">double value0=this.GetDataTo(symbol,timeframe,buffer_num,index);
   const class="type">class="kw">double value1=this.GetDataTo(symbol,timeframe,buffer_num,index+class="num">1);
class=class="str">"cmt">//--- If at least one of the values could not be obtained, class="kw">return an undefined value 
   if(value0==EMPTY_VALUE || value1==EMPTY_VALUE)
      class="kw">return LINE_STATE_NONE;
class=class="str">"cmt">//--- Define the second level to compare
   class="type">class="kw">double level=(level1==EMPTY_VALUE ? level0 : level1);
class=class="str">"cmt">//--- The line is below the level(value1<level && value0<level0)
   if(::NormalizeDouble(value1-level,this.m_digits)<class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)<class="num">0)
      class="kw">return LINE_STATE_BELOW;
class=class="str">"cmt">//--- The line is above the level(value1>level && value0>level0)
   if(::NormalizeDouble(value1-level,this.m_digits)>class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)>class="num">0)
      class="kw">return LINE_STATE_ABOVE;
class=class="str">"cmt">//--- The line crossed the level upwards(value1<=level && value0>level0)
   if(::NormalizeDouble(value1-level,this.m_digits)<=class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)>class="num">0)
      class="kw">return LINE_STATE_CROSS_UP;
class=class="str">"cmt">//--- The line crossed the level downwards(value1>=level && value0<level0)
   if(::NormalizeDouble(value1-level,this.m_digits)>=class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)<class="num">0)
      class="kw">return LINE_STATE_CROSS_DOWN;
class=class="str">"cmt">//--- The line touched the level from below(value1<level0 && value0==level0)
   if(::NormalizeDouble(value1-level,this.m_digits)<class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_TOUCH_BELOW;
class=class="str">"cmt">//--- The line touched the level from above(value1>level0 && value0==level0)
   if(::NormalizeDouble(value1-level,this.m_digits)>class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_TOUCH_BELOW;
class=class="str">"cmt">//--- Line is equal to the level value(value1==level0 && value0==level0)
   if(::NormalizeDouble(value1-level,this.m_digits)==class="num">0 && ::NormalizeDouble(value0-level0,this.m_digits)==class="num">0)
      class="kw">return LINE_STATE_EQUALS;
class=class="str">"cmt">//--- Undefined state
   class="kw">return LINE_STATE_NONE;
  }

class="type">class="kw">string CIndMSTF::CategoryDescription(class="type">void)
  {
  class="type">class="kw">string category=::StringSubstr(::EnumToString(this.m_category),class="num">13);
  if(category.Lower())
    category.SetChar(class="num">0,class="type">class="kw">ushort(category.GetChar(class="num">0)-0x20));
  class="kw">return category;
  }
class="type">class="kw">string CIndMSTF::BufferDescription(const class="type">uint buffer_num)
  {
  if(buffer_num>this.BuffersTotal()-class="num">1)
    {
    class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
    ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
    class="kw">return "";
    }
  class="kw">return(this.BuffersTotal()>class="num">0 ? this.m_buffers[buffer_num].descript : this.m_title);
  }
class="type">void CIndMSTF::SetBufferDescription(const class="type">uint buffer_num,const class="type">class="kw">string descr)
  {
  if(this.BuffersTotal()==class="num">0)
    class="kw">return;
  if(buffer_num>this.BuffersTotal()-class="num">1)
    {
    class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
    ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
    class="kw">return;
    }
  this.m_buffers[buffer_num].descript=descr;
  }
class="type">void CIndMSTF::SetAsSeriesOff(class="type">void)
  {

class=class="str">"cmt">//--- In a loop through all indicator buffers, disable the array as timeseries flag
  for(class="type">int i=class="num">0;i<(class="type">int)this.BuffersTotal();i++)
      ::ArraySetAsSeries(this.m_buffers[i].array,false);
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Returns the timeseries flag of the given buffer                    |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">bool CIndMSTF::IsSeries(const class="type">uint buffer_num) const
  {
class=class="str">"cmt">//--- Validate the buffer number passed to the method and, if the number is incorrect, print a message to the log and class="kw">return &class="macro">#x27;false&class="macro">#x27;
   if(buffer_num>this.BuffersTotal()-class="num">1)
     {
       class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
       ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
       class="kw">return false;
     }
class=class="str">"cmt">//--- Return the timeseries flag of the array of the specified buffer
   class="kw">return (class="type">bool)::ArrayGetAsSeries(this.m_buffers[buffer_num].array);
  }
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Returns the amount of data in the specified buffer                 |
class=class="str">"cmt">//+------------------------------------------------------------------+
class="type">uint CIndMSTF::DataTotal(const class="type">uint buffer_num) const
  {
class=class="str">"cmt">//--- Validate the buffer number passed to method and, if number is incorrect, print a message to log and class="kw">return zero
   if(buffer_num>this.BuffersTotal()-class="num">1)
     {
       class="type">class="kw">string buff_limit=(this.BuffersTotal()==class="num">1 ? "class="num">0" : "class="num">0 - "+class="type">class="kw">string(this.BuffersTotal()-class="num">1));
       ::PrintFormat("%s: Invalid buffer number passed(%lu). Value must be %s",__FUNCTION__,buffer_num,buff_limit);
       class="kw">return class="num">0;
     }
class=class="str">"cmt">//--- Return the array size of the specified buffer
   class="kw">return this.m_buffers[buffer_num].array.Size();
  }

class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Accelerator Oscillator indicator class                            |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndAC : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndAC(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe) : CIndMSTF(IND_AC,class="num">1,symbol,timeframe)
     {
     class=class="str">"cmt">//--- Create description of parameters
     class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
     class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
     class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
     class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
     class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
     this.SetParameters(param);
     this.SetName("AC");
     this.SetDescription("Accelerator Oscillator");
     this.m_title=this.Name()+this.Parameters();
     this.m_category=IND_CATEGORY_WILLIAMS;
     class=class="str">"cmt">//--- Write description of line buffers
     this.SetBufferDescription(class="num">0,this.m_title);
     }
  };
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Accumulation/Distribution indicator class                         |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndAD : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndAD(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
          const ENUM_APPLIED_VOLUME applied_volume class=class="str">"cmt">// used volume
          ) : CIndMSTF(IND_AD,class="num">1,symbol,timeframe)
     {
     class=class="str">"cmt">//--- Set the size of the parameter array and fill it
     ::ResetLastError();
     if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
       {
       ::ZeroMemory(this.m_param);

this.m_param[class="num">0].type=TYPE_UINT;
this.m_param[class="num">0].integer_value=applied_volume;
}
else
 ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("A/D");
this.SetDescription("Accumulation/Distribution");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_VOLUME;
this.m_digits=class="num">0;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Accelerator Oscillator indicator class                            |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndAC : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndAC(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe) : CIndMSTF(IND_AC,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
  class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
  class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
  class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
  this.SetParameters(param);
  this.SetName("AC");
  this.SetDescription("Accelerator Oscillator");
  this.m_title=this.Name()+this.Parameters();
  this.m_category=IND_CATEGORY_WILLIAMS;
  class=class="str">"cmt">//--- Write description of line buffers

class CIndAD : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndAD(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
          const ENUM_APPLIED_VOLUME applied_volume class=class="str">"cmt">// used volume
         ) : CIndMSTF(IND_AD,class="num">1,symbol,timeframe)
     {
     class=class="str">"cmt">//--- Set the size of the parameter array and fill it
     ::ResetLastError();
     if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
       {
       ::ZeroMemory(this.m_param);
       this.m_param[class="num">0].type=TYPE_UINT;
       this.m_param[class="num">0].integer_value=applied_volume;
       }
     else
       ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
     class=class="str">"cmt">//--- Create description of parameters
     class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
     class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
     class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
     class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
     class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
     this.SetParameters(param);
     this.SetName("A/D");
     this.SetDescription("Accumulation/Distribution");
     this.m_title=this.Name()+this.Parameters();
     this.m_category=IND_CATEGORY_VOLUME;
     this.m_digits=class="num">0;
     class=class="str">"cmt">//--- Write description of line buffers
     this.SetBufferDescription(class="num">0,this.m_title);
     }
  };

class CIndADX : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndADX(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
           const class="type">int adx_period            class=class="str">"cmt">// averaging period

      ) : CIndMSTF(IND_ADX,class="num">3,symbol,timeframe)
      {
       class=class="str">"cmt">// Номера буферов: class="num">0 - MAIN_LINE, class="num">1 - PLUSDI_LINE, class="num">2 - MINUSDI_LINE
       class=class="str">"cmt">//--- Set the size of the parameter array and fill it
       ::ResetLastError();
       if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
         {
          ::ZeroMemory(this.m_param);
          this.m_param[class="num">0].type=TYPE_UINT;
          this.m_param[class="num">0].integer_value=(adx_period<class="num">1 ? class="num">14 : adx_period);
         }
       else
         ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
       class=class="str">"cmt">//--- Create description of parameters
       class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
       class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
       class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
       class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),adx_period);
       class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
       this.SetParameters(param);
       this.SetName("ADX");
       this.SetDescription("Average Directional Movement Index");
       this.m_title=this.Name()+this.Parameters();
       this.m_category=IND_CATEGORY_TREND;
       this.m_digits=class="num">2;
       class=class="str">"cmt">//--- write descriptions of MAIN_LINE, PLUSDI_LINE and MINUSDI_LINE line buffers
       this.SetBufferDescription(MAIN_LINE,this.m_title);
       this.SetBufferDescription(PLUSDI_LINE,"+DI");
       this.SetBufferDescription(MINUSDI_LINE,"-DI");
      }
   };
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Average Directional Movement Index Wilder indicator class          |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndADXW : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndADXW(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int adx_period                 class=class="str">"cmt">// averaging period
            ) : CIndMSTF(IND_ADXW,class="num">3,symbol,timeframe)
     {
      class=class="str">"cmt">// Номера буферов: class="num">0 - MAIN_LINE, class="num">1 - PLUSDI_LINE, class="num">2 - MINUSDI_LINE
      class=class="str">"cmt">//--- Set the size of the parameter array and fill it
      ::ResetLastError();

if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
  {
   ::ZeroMemory(this.m_param);
   this.m_param[class="num">0].type=TYPE_UINT;
   this.m_param[class="num">0].integer_value=(adx_period<class="num">1 ? class="num">14 : adx_period);
  }
else
   ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),adx_period);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("ADX Wilder");
this.SetDescription("Average Directional Movement Index Wilder");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_TREND;
this.m_digits=class="num">2;
class=class="str">"cmt">//--- write descriptions of MAIN_LINE, PLUSDI_LINE and MINUSDI_LINE line buffers
this.SetBufferDescription(MAIN_LINE,this.m_title);
this.SetBufferDescription(PLUSDI_LINE,"+DI");
this.SetBufferDescription(MINUSDI_LINE,"-DI");
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Alligator indicator class                                      |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndAlligator : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndAlligator(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
                const class="type">int jaw_period,       class=class="str">"cmt">// period for calculating jaws
                const class="type">int jaw_shift,        class=class="str">"cmt">// horizontal shift of jaws
                const class="type">int teeth_period,     class=class="str">"cmt">// period for calculating teeth

const class="type">int teeth_shift,                 class=class="str">"cmt">// horizontal shift of teeth
const class="type">int lips_period,                  class=class="str">"cmt">// period for calculating lips
const class="type">int lips_shift,                   class=class="str">"cmt">// horizontal shift of lips
const ENUM_MA_METHOD ma_method,         class=class="str">"cmt">// smoothing type
const ENUM_APPLIED_PRICE applied_price  class=class="str">"cmt">// price type or handle
) : CIndMSTF(IND_ALLIGATOR,class="num">3,symbol,timeframe)
 {
 class=class="str">"cmt">// Buffer indexes: class="num">0 - GATORJAW_LINE, class="num">1 - GATORTEETH_LINE, class="num">2 - GATORLIPS_LINE
 class=class="str">"cmt">//--- Set the size of the parameter array and fill it
 ::ResetLastError();
 if(::ArrayResize(this.m_param,class="num">8)==class="num">8)
   {
    ::ZeroMemory(this.m_param);
    class=class="str">"cmt">//--- period for jaw line calculation
    this.m_param[class="num">0].type=TYPE_UINT;
    this.m_param[class="num">0].integer_value=(jaw_period<class="num">1 ? class="num">13 : jaw_period);
    class=class="str">"cmt">//--- horizontal shift of the jaw line
    this.m_param[class="num">1].type=TYPE_INT;
    this.m_param[class="num">1].integer_value=jaw_shift;
    class=class="str">"cmt">//--- period for teeth line calculation
    this.m_param[class="num">2].type=TYPE_UINT;
    this.m_param[class="num">2].integer_value=(teeth_period<class="num">1 ? class="num">8 : teeth_period);
    class=class="str">"cmt">//--- horizontal shift of teeth line
    this.m_param[class="num">3].type=TYPE_INT;
    this.m_param[class="num">3].integer_value=teeth_shift;
    class=class="str">"cmt">//--- period for lip line calculation
    this.m_param[class="num">4].type=TYPE_UINT;
    this.m_param[class="num">4].integer_value=(lips_period<class="num">1 ? class="num">5 : lips_period);
    class=class="str">"cmt">//--- horizontal shift of lips line
    this.m_param[class="num">5].type=TYPE_INT;
    this.m_param[class="num">5].integer_value=lips_shift;
    class=class="str">"cmt">//--- smoothing type
    this.m_param[class="num">6].type=TYPE_UINT;
    this.m_param[class="num">6].integer_value=ma_method;
    class=class="str">"cmt">//--- price type or handle

this.m_param[class="num">7].type=TYPE_UINT;
this.m_param[class="num">7].integer_value=applied_price;
}
else
 ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),jaw_period,teeth_period,lips_period);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
this.SetParameters(param);
this.SetName("Alligator");
this.SetDescription("Alligator");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_WILLIAMS;
class=class="str">"cmt">//--- Write descriptions of GATORJAW_LINE, GATORTEETH_LINE and GATORLIPS_LINE line buffers
this.SetBufferDescription(GATORJAW_LINE,::StringFormat("Jaws(%s%lu)", (current ? "" : symbol_period+":"),jaw_period));
this.SetBufferDescription(GATORTEETH_LINE,::StringFormat("Teeth(%s%lu)",(current ? "" : symbol_period+":"),teeth_period));
this.SetBufferDescription(GATORLIPS_LINE,::StringFormat("Lips(%s%lu)", (current ? "" : symbol_period+":"),lips_period));
class=class="str">"cmt">//--- Write offsets to buffers GATORJAW_LINE, GATORTEETH_LINE and GATORLIPS_LINE
this.SetBufferShift(GATORJAW_LINE,jaw_shift);
this.SetBufferShift(GATORTEETH_LINE,teeth_shift);
this.SetBufferShift(GATORLIPS_LINE,lips_shift);
}
};

const class="type">int slow_ma_period,                 class=class="str">"cmt">// slow MA period
const class="type">int ama_shift,                        class=class="str">"cmt">// horizontal shift of the indicator
const ENUM_APPLIED_PRICE applied_price      class=class="str">"cmt">// price type or handle
) : CIndMSTF(IND_AMA,class="num">1,symbol,timeframe)
 {
 class=class="str">"cmt">//--- Set the size of the parameter array and fill it
 ::ResetLastError();
 if(::ArrayResize(this.m_param,class="num">5)==class="num">5)
   {
    ::ZeroMemory(this.m_param);
    class=class="str">"cmt">//--- AMA period
    this.m_param[class="num">0].type=TYPE_UINT;
    this.m_param[class="num">0].integer_value=(ama_period<class="num">1 ? class="num">9 : ama_period);
    class=class="str">"cmt">//--- fast MA period
    this.m_param[class="num">1].type=TYPE_UINT;
    this.m_param[class="num">1].integer_value=(fast_ma_period<class="num">1 ? class="num">2 : fast_ma_period);
    class=class="str">"cmt">//--- slow MA period
    this.m_param[class="num">2].type=TYPE_UINT;
    this.m_param[class="num">2].integer_value=(slow_ma_period<class="num">1 ? class="num">30 : slow_ma_period);
    class=class="str">"cmt">//--- horizontal shift of the indicator
    this.m_param[class="num">3].type=TYPE_INT;
    this.m_param[class="num">3].integer_value=ama_shift;
    class=class="str">"cmt">//--- price type or handle
    this.m_param[class="num">4].type=TYPE_UINT;
    this.m_param[class="num">4].integer_value=applied_price;
   }
 else
    ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
 class=class="str">"cmt">//--- Create description of parameters
 class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
 class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
 class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
 class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),ama_period,fast_ma_period,slow_ma_period);
 class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
 this.SetParameters(param);
 this.SetName("AMA");

this.SetDescription("Adaptive Moving Average");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_TREND;
this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
class=class="str">"cmt">//--- Write shift to buffer class="num">0
this.SetBufferShift(class="num">0,ama_shift);
}
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Awesome Oscillator indicator class                               |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndAO : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndAO(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe) : CIndMSTF(IND_AO,class="num">1,symbol,timeframe)
    {
    class=class="str">"cmt">//--- Create description of parameters
    class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
    class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
    class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
    class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
    class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
    this.SetParameters(param);
    this.SetName("AO");
    this.SetDescription("Awesome Oscillator");
    this.m_title=this.Name()+this.Parameters();
    this.m_category=IND_CATEGORY_WILLIAMS;
    this.m_digits=::Digits()+class="num">1;
    class=class="str">"cmt">//--- Write description of line buffers
    this.SetBufferDescription(class="num">0,this.m_title);
    }
  };
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Average True Range indicator class                               |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndATR : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndATR(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
          const class="type">int ma_period       class=class="str">"cmt">// averaging period
          ) : CIndMSTF(IND_ATR,class="num">1,symbol,timeframe)
    {
    class=class="str">"cmt">//--- Set the size of the parameter array and fill it
    ::ResetLastError();

if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
  {
   ::ZeroMemory(this.m_param);
   this.m_param[class="num">0].type=TYPE_UINT;
   this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period);
  }
else
  ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
this.SetParameters(param);
this.SetName("ATR");
this.SetDescription("Average True Range");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_OSCILLATOR;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Bears Power indicator class                                      |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndBears : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndBears(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int ma_period       class=class="str">"cmt">// averaging period
            ) : CIndMSTF(IND_BEARS,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
    {
     ::ZeroMemory(this.m_param);
     this.m_param[class="num">0].type=TYPE_UINT;
     this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">13 : ma_period);
    }
  else

class CIndBulls : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndBulls(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
             const class="type">int ma_period       class=class="str">"cmt">// averaging period
             ) : CIndMSTF(IND_BULLS,class="num">1,symbol,timeframe)
     {
     class=class="str">"cmt">//--- Set the size of the parameter array and fill it
     ::ResetLastError();
     if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
       {
        ::ZeroMemory(this.m_param);
        this.m_param[class="num">0].type=TYPE_UINT;
        this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">13 : ma_period);
       }
     else
       ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
     class=class="str">"cmt">//--- Create description of parameters
     class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
     class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());

class CIndBands : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndBands(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int bands_period,      class=class="str">"cmt">// central line calculation period
            const class="type">int bands_shift,       class=class="str">"cmt">// horizontal shift of the indicator
            const class="type">class="kw">double deviation,      class=class="str">"cmt">// number of standard deviations
            const ENUM_APPLIED_PRICE applied_price class=class="str">"cmt">// price type or handle
            ) : CIndMSTF(IND_BANDS,class="num">3,symbol,timeframe)
  {
  class=class="str">"cmt">// Buffer indexes: class="num">0 - BASE_LINE, class="num">1 - UPPER_BAND, class="num">2 - LOWER_BAND
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">4)==class="num">4)
    {
    ::ZeroMemory(this.m_param);
    class=class="str">"cmt">//--- central line calculation period
    this.m_param[class="num">0].type=TYPE_UINT;
    this.m_param[class="num">0].integer_value=(bands_period<class="num">1 ? class="num">20 : bands_period);
    class=class="str">"cmt">//--- horizontal shift of the indicator
    this.m_param[class="num">1].type=TYPE_INT;
    this.m_param[class="num">1].integer_value=bands_shift;
    class=class="str">"cmt">//--- number of standard deviations

this.m_param[class="num">2].type=TYPE_DOUBLE;
this.m_param[class="num">2].double_value=deviation;
class=class="str">"cmt">//--- price type or handle
this.m_param[class="num">3].type=TYPE_UINT;
this.m_param[class="num">3].integer_value=applied_price;
}
else
 ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),bands_period);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("Bands");
this.SetDescription("Bollinger Bands");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_TREND;
this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Description of line buffers BASE_LINE, UPPER_BAND and LOWER_BAND
this.SetBufferDescription(BASE_LINE,this.m_title+" Middle");
this.SetBufferDescription(UPPER_BAND,this.m_title+" Upper");
this.SetBufferDescription(LOWER_BAND,this.m_title+" Lower");
class=class="str">"cmt">//--- Write offsets to the BASE_LINE, UPPER_BAND and LOWER_BAND buffers
this.SetBufferShift(BASE_LINE,bands_shift);
this.SetBufferShift(UPPER_BAND,bands_shift);
this.SetBufferShift(LOWER_BAND,bands_shift);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Commodity Channel Index indicator class                          |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndCCI : class="kw">public CIndMSTF
{
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndCCI(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
          const class="type">int ma_period,                      class=class="str">"cmt">// averaging period
          const ENUM_APPLIED_PRICE applied_price    class=class="str">"cmt">// price type or handle
          ) : CIndMSTF(IND_CCI,class="num">1,symbol,timeframe)

{
   class=class="str">"cmt">//--- Set the size of the parameter array and fill it
   ::ResetLastError();
   if(::ArrayResize(this.m_param,class="num">2)==class="num">2)
     {
      ::ZeroMemory(this.m_param);
      class=class="str">"cmt">//--- averaging period
      this.m_param[class="num">0].type=TYPE_UINT;
      this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period<class="num">2 ? class="num">2 : ma_period);
      class=class="str">"cmt">//--- price type or handle
      this.m_param[class="num">1].type=TYPE_UINT;
      this.m_param[class="num">1].integer_value=applied_price;
     }
   else
      ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
   class=class="str">"cmt">//--- Create description of parameters
   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
   class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("CCI");
   this.SetDescription("Commodity Channel Index");
   this.m_title=this.Name()+this.Parameters();
   this.m_category=IND_CATEGORY_OSCILLATOR;
   this.m_digits=class="num">2;
   class=class="str">"cmt">//--- Write description of line buffers
   this.SetBufferDescription(class="num">0,this.m_title);
   }

const ENUM_MA_METHOD ma_method,              class=class="str">"cmt">// smoothing type
      const ENUM_APPLIED_VOLUME applied_volume   class=class="str">"cmt">// used volume
      ) : CIndMSTF(IND_CHAIKIN,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">4)==class="num">4)
    {
     ::ZeroMemory(this.m_param);
     class=class="str">"cmt">//--- fast period
     this.m_param[class="num">0].type=TYPE_UINT;
     this.m_param[class="num">0].integer_value=(fast_ma_period<class="num">1 ? class="num">3 : fast_ma_period);
     class=class="str">"cmt">//--- slow period
     this.m_param[class="num">1].type=TYPE_UINT;
     this.m_param[class="num">1].integer_value=(slow_ma_period<class="num">1 ? class="num">10 : slow_ma_period);
     class=class="str">"cmt">//--- smoothing type
     this.m_param[class="num">2].type=TYPE_UINT;
     this.m_param[class="num">2].integer_value=ma_method;
     class=class="str">"cmt">//--- used volume
     this.m_param[class="num">3].type=TYPE_UINT;
     this.m_param[class="num">3].integer_value=applied_volume;
    }
  else
     ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
  class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
  class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu)",symbol_period,(current ? "" : ":"),slow_ma_period,fast_ma_period);
  class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
  this.SetParameters(param);
  this.SetName("CHO");
  this.SetDescription("Chaikin Oscillator");
  this.m_title=this.Name()+this.Parameters();
  this.m_category=IND_CATEGORY_OSCILLATOR;
  this.m_digits=class="num">0;
  class=class="str">"cmt">//--- Write description of line buffers
  this.SetBufferDescription(class="num">0,this.m_title);
  }

class=class="str">"cmt">//| Double Exponential Moving Average indicator class                                        |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndDEMA : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndDEMA(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int ma_period,                 class=class="str">"cmt">// averaging period
            const class="type">int ma_shift,                  class=class="str">"cmt">// horizontal indicator shift
            const ENUM_APPLIED_PRICE applied_price class=class="str">"cmt">// price type or handle
            ) : CIndMSTF(IND_DEMA,class="num">1,symbol,timeframe)
     {
     class=class="str">"cmt">//--- Set the size of the parameter array and fill it
     ::ResetLastError();
     if(::ArrayResize(this.m_param,class="num">3)==class="num">3)
       {
       ::ZeroMemory(this.m_param);
       class=class="str">"cmt">//--- averaging period
       this.m_param[class="num">0].type=TYPE_UINT;
       this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period);
       class=class="str">"cmt">//--- horizontal shift of the indicator
       this.m_param[class="num">1].type=TYPE_INT;
       this.m_param[class="num">1].integer_value=ma_shift;
       class=class="str">"cmt">//--- price type or handle
       this.m_param[class="num">2].type=TYPE_UINT;
       this.m_param[class="num">2].integer_value=applied_price;
       }
     else
       ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
     class=class="str">"cmt">//--- Create description of parameters
     class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
     class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
     class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
     class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
     class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
     this.SetParameters(param);
     this.SetName("DEMA");
     this.SetDescription("Double Exponential Moving Average");
     this.m_title=this.Name()+this.Parameters();
     this.m_category=IND_CATEGORY_TREND;

class CIndDeM : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndDeM(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
          const class="type">int ma_period      class=class="str">"cmt">// averaging period
          ) : CIndMSTF(IND_DEMARKER,class="num">1,symbol,timeframe)
    {
    class=class="str">"cmt">//--- Set the size of the parameter array and fill it
    ::ResetLastError();
    if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
      {
      ::ZeroMemory(this.m_param);
      class=class="str">"cmt">//--- averaging period
      this.m_param[class="num">0].type=TYPE_UINT;
      this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period);
      }
    else
      ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
    class=class="str">"cmt">//--- Create description of parameters
    class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
    class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
    class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
    class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
    class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
    this.SetParameters(param);
    this.SetName("DeM");
    this.SetDescription("DeMarker");
    this.m_title=this.Name()+this.Parameters();
    this.m_category=IND_CATEGORY_OSCILLATOR;
    this.m_digits=class="num">3;
    class=class="str">"cmt">//--- Write description of line buffers
    this.SetBufferDescription(class="num">0,this.m_title);
    }
  };

class=class="str">"cmt">//| Envelopes indicator class                                                                     |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndEnvelopes : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndEnvelopes(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
                 const class="type">int ma_period,                    class=class="str">"cmt">// middle line calculation period
                 const class="type">int ma_shift,                     class=class="str">"cmt">// horizontal shift of the indicator
                 const ENUM_MA_METHOD ma_method,         class=class="str">"cmt">// smoothing type
                 const ENUM_APPLIED_PRICE applied_price, class=class="str">"cmt">// price type or handle
                 const class="type">class="kw">double deviation                  class=class="str">"cmt">// deviation of envelope borders from the middle line
                 ) : CIndMSTF(IND_ENVELOPES,class="num">2,symbol,timeframe)
     {
     class=class="str">"cmt">// Buffer indexes: class="num">0 - UPPER_LINE, class="num">1 - LOWER_LINE
     class=class="str">"cmt">//--- Set the size of the parameter array and fill it
     ::ResetLastError();
     if(::ArrayResize(this.m_param,class="num">5)==class="num">5)
       {
       ::ZeroMemory(this.m_param);
       class=class="str">"cmt">//--- central line calculation period
       this.m_param[class="num">0].type=TYPE_UINT;
       this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period);
       class=class="str">"cmt">//--- horizontal shift of the indicator
       this.m_param[class="num">1].type=TYPE_INT;
       this.m_param[class="num">1].integer_value=ma_shift;
       class=class="str">"cmt">//--- smoothing type
       this.m_param[class="num">2].type=TYPE_UINT;
       this.m_param[class="num">2].integer_value=ma_method;
       class=class="str">"cmt">//--- price type or handle
       this.m_param[class="num">3].type=TYPE_UINT;
       this.m_param[class="num">3].integer_value=applied_price;
       class=class="str">"cmt">//--- deviation of envelope borders from the muddle line
       this.m_param[class="num">4].type=TYPE_UINT;
       this.m_param[class="num">4].double_value=deviation;
       }
     else
       ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
     class=class="str">"cmt">//--- Create description of parameters

   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
   class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("Envelopes");
   this.SetDescription("Envelopes");
   this.m_title=this.Name()+this.Parameters();
   this.m_category=IND_CATEGORY_TREND;
   this.m_digits=::Digits()+class="num">1;
   class=class="str">"cmt">//--- Description of UPPER_LINE and LOWER_LINE line buffers
   this.SetBufferDescription(UPPER_LINE,this.m_title+" Upper");
   this.SetBufferDescription(LOWER_LINE,this.m_title+" Lower");
   class=class="str">"cmt">//--- Write shift to buffer class="num">0
   this.SetBufferShift(class="num">0,ma_shift);
   }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Force Index indicator class                                      |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndForce : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndForce(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
             const class="type">int          ma_period,     class=class="str">"cmt">// averaging period
             const ENUM_MA_METHOD      ma_method,     class=class="str">"cmt">// smoothing type
             const ENUM_APPLIED_VOLUME applied_volume class=class="str">"cmt">// volume type for calculation
             ) : CIndMSTF(IND_FORCE,class="num">1,symbol,timeframe)
   {
   class=class="str">"cmt">//--- Set the size of the parameter array and fill it
   ::ResetLastError();
   if(::ArrayResize(this.m_param,class="num">3)==class="num">3)
     {
      ::ZeroMemory(this.m_param);
      class=class="str">"cmt">//--- averaging period
      this.m_param[class="num">0].type=TYPE_UINT;
      this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">13 : ma_period);
      class=class="str">"cmt">//--- smoothing type
      this.m_param[class="num">1].type=TYPE_UINT;

this.m_param[class="num">1].integer_value=ma_method;
class=class="str">"cmt">//--- volume type for calculation
this.m_param[class="num">2].type=TYPE_UINT;
this.m_param[class="num">2].integer_value=applied_volume;
}
else
 ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("Force");
this.SetDescription("Force Index");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_OSCILLATOR;
this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Fractals indicator class 
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndFractals : class="kw">public CIndMSTF
{
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndFractals(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe) : CIndMSTF(IND_FRACTALS,class="num">2,symbol,timeframe)
 {
 class=class="str">"cmt">// Buffer indexes: class="num">0 - UPPER_LINE, class="num">1 - LOWER_LINE
 class=class="str">"cmt">//--- Create description of parameters
 class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
 class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
 class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
 class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
 class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
 this.SetParameters(param);
 this.SetName("Fractals");

class CIndFrAMA : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndFrAMA(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int ma_period,              class=class="str">"cmt">// averaging period
            const class="type">int ma_shift,               class=class="str">"cmt">// horizontal shift of the indicator
            const ENUM_APPLIED_PRICE applied_price  class=class="str">"cmt">// price type or handle
            ) : CIndMSTF(IND_FRAMA,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">3)==class="num">3)
    {
    ::ZeroMemory(this.m_param);
    class=class="str">"cmt">//--- averaging period
    this.m_param[class="num">0].type=TYPE_UINT;
    this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period);
    class=class="str">"cmt">//--- horizontal shift of the indicator
    this.m_param[class="num">1].type=TYPE_INT;
    this.m_param[class="num">1].integer_value=ma_shift;
    class=class="str">"cmt">//--- price type or handle
    this.m_param[class="num">2].type=TYPE_UINT;
    this.m_param[class="num">2].integer_value=applied_price;
    }
  else
    ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());

class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("FRAMA");
this.SetDescription("Fractal Adaptive Moving Average");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_TREND;
this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
class=class="str">"cmt">//--- Write shift to buffer class="num">0
this.SetBufferShift(class="num">0,ma_shift);
}
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Gator Oscillator indicator class                                 |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndGator : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndGator(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
 const class="type">int jaw_period,                     class=class="str">"cmt">// period for jaw line calculation
 const class="type">int jaw_shift,                     class=class="str">"cmt">// horizontal shift of jaw line
 const class="type">int teeth_period,                   class=class="str">"cmt">// period for calculating teeth line
 const class="type">int teeth_shift,                   class=class="str">"cmt">// horizontal shift of teeth line
 const class="type">int lips_period,                   class=class="str">"cmt">// period for calculating lip line
 const class="type">int lips_shift,                     class=class="str">"cmt">// horizontal shift of lip line
 const ENUM_MA_METHOD ma_method,           class=class="str">"cmt">// smoothing type
 const ENUM_APPLIED_PRICE applied_price   class=class="str">"cmt">// price type or handle
 ) : CIndMSTF(IND_GATOR,class="num">4,symbol,timeframe)
 {
 class=class="str">"cmt">// Buffer indexes: class="num">0 - UPPER_HISTOGRAM, class="num">1 - class="type">class="kw">color buffer of the upper histogram, class="num">2 - LOWER_HISTOGRAM, class="num">3 - class="type">class="kw">color buffer of the lower histogram
 class=class="str">"cmt">//--- Set the size of the parameter array and fill it
 ::ResetLastError();

if(::ArrayResize(this.m_param,class="num">8)==class="num">8)
  {
   ::ZeroMemory(this.m_param);
   class=class="str">"cmt">//--- period for jaw line calculation
   this.m_param[class="num">0].type=TYPE_UINT;
   this.m_param[class="num">0].integer_value=(jaw_period<class="num">1 ? class="num">13 : jaw_period);
   class=class="str">"cmt">//--- horizontal shift of the jaw line
   this.m_param[class="num">1].type=TYPE_INT;
   this.m_param[class="num">1].integer_value=jaw_shift;
   class=class="str">"cmt">//--- period for teeth line calculation
   this.m_param[class="num">2].type=TYPE_UINT;
   this.m_param[class="num">2].integer_value=(teeth_period<class="num">1 ? class="num">8 : teeth_period);
   class=class="str">"cmt">//--- horizontal shift of teeth line
   this.m_param[class="num">3].type=TYPE_INT;
   this.m_param[class="num">3].integer_value=teeth_shift;
   class=class="str">"cmt">//--- period for lip line calculation
   this.m_param[class="num">4].type=TYPE_UINT;
   this.m_param[class="num">4].integer_value=(lips_period<class="num">1 ? class="num">5 : lips_period);
   class=class="str">"cmt">//--- horizontal shift of lips line
   this.m_param[class="num">5].type=TYPE_INT;
   this.m_param[class="num">5].integer_value=lips_shift;
   class=class="str">"cmt">//--- smoothing type
   this.m_param[class="num">6].type=TYPE_UINT;
   this.m_param[class="num">6].integer_value=ma_method;
   class=class="str">"cmt">//--- price type or handle
   this.m_param[class="num">7].type=TYPE_UINT;
   this.m_param[class="num">7].integer_value=applied_price;
   }
 else
   ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
 class=class="str">"cmt">//--- Create description of parameters
 class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
 class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
 class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
 class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),jaw_period,teeth_period,lips_period);
 class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
 this.SetParameters(param);
 this.SetName("Gator");

this.SetDescription("Gator Oscillator");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_WILLIAMS;
this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Description of line buffers UPPER_HISTOGRAM, upper histogram class="type">class="kw">color buffer, LOWER_HISTOGRAM and lower histogram class="type">class="kw">color buffer
this.SetBufferDescription(UPPER_HISTOGRAM,this.m_title+" Up");
this.SetBufferDescription(class="num">1,this.m_title+" Colors Up");
this.SetBufferDescription(LOWER_HISTOGRAM,this.m_title+" Down");
this.SetBufferDescription(class="num">3,this.m_title+" Colors Down");
class=class="str">"cmt">//--- Записываем смещения в буферы UPPER_HISTOGRAM, class="num">1, LOWER_HISTOGRAM и class="num">2
this.SetBufferShift(UPPER_HISTOGRAM,teeth_shift);
this.SetBufferShift(class="num">1,teeth_shift);
this.SetBufferShift(LOWER_HISTOGRAM,lips_shift);
this.SetBufferShift(class="num">3,lips_shift);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Ichimoku Kinko Hyo indicator class                              |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndIchimoku : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndIchimoku(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
                const class="type">int tenkan_sen,                    class=class="str">"cmt">// period of Tenkan-sen
                const class="type">int kijun_sen,                     class=class="str">"cmt">// period of Kijun-sen
                const class="type">int senkou_span_b                  class=class="str">"cmt">// period of Senkou Span B
                ) : CIndMSTF(IND_ICHIMOKU,class="num">5,symbol,timeframe)
  {
  class=class="str">"cmt">// Buffer indexes: class="num">0 - TENKANSEN_LINE, class="num">1 - KIJUNSEN_LINE, class="num">2 - SENKOUSPANA_LINE, class="num">3 - SENKOUSPANB_LINE, class="num">4 - CHIKOUSPAN_LINE
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">3)==class="num">3)
    {
    ::ZeroMemory(this.m_param);
    class=class="str">"cmt">//--- period of Tenkan-sen
    this.m_param[class="num">0].type=TYPE_UINT;
    this.m_param[class="num">0].integer_value=(tenkan_sen<class="num">1 ? class="num">9 : tenkan_sen);
    class=class="str">"cmt">//--- period of Kijun-sen
    this.m_param[class="num">1].type=TYPE_UINT;

   this.m_param[class="num">1].integer_value=(kijun_sen<class="num">1 ? class="num">26 : kijun_sen);
   class=class="str">"cmt">//--- period of Senkou Span B
   this.m_param[class="num">2].type=TYPE_UINT;
   this.m_param[class="num">2].integer_value=(senkou_span_b<class="num">1 ? class="num">52 : senkou_span_b);
   }
   else
   ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
   class=class="str">"cmt">//--- Create description of parameters
   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),tenkan_sen,kijun_sen,senkou_span_b);
   class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("Ichimoku");
   this.SetDescription("Ichimoku Kinko Hyo");
   this.m_title=this.Name()+this.Parameters();
   this.m_category=IND_CATEGORY_TREND;
   this.m_digits=::Digits()+class="num">1;
   class=class="str">"cmt">//--- Description of line buffers TENKANSEN_LINE, KIJUNSEN_LINE, SENKOUSPANA_LINE, SENKOUSPANB_LINE and CHIKOUSPAN_LINE
   this.SetBufferDescription(TENKANSEN_LINE,::StringFormat("Tenkan-sen(%lu)",tenkan_sen));
   this.SetBufferDescription(KIJUNSEN_LINE,::StringFormat("Kijun-sen(%lu)",kijun_sen));
   this.SetBufferDescription(SENKOUSPANA_LINE,"Senkou Span A");
   this.SetBufferDescription(SENKOUSPANB_LINE,::StringFormat("Senkou Span B(%lu)",senkou_span_b));
   this.SetBufferDescription(CHIKOUSPAN_LINE,"Chikou Span");
   class=class="str">"cmt">//--- Write shifts to buffers SENKOUSPANA_LINE, SENKOUSPANB_LINE and CHIKOUSPAN_LINE
   class=class="str">"cmt">//this.SetBufferShift(SENKOUSPANA_LINE,kijun_sen);
   class=class="str">"cmt">//this.SetBufferShift(SENKOUSPANB_LINE,kijun_sen);
   class=class="str">"cmt">//this.SetBufferShift(CHIKOUSPAN_LINE,kijun_sen-senkou_span_b);
   }

const ENUM_APPLIED_VOLUME applied_volume class=class="str">"cmt">// volume type for calculation
) : CIndMSTF(IND_BWMFI,class="num">1,symbol,timeframe)
 {
 class=class="str">"cmt">//--- Set the size of the parameter array and fill it
 ::ResetLastError();
 if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
  {
  ::ZeroMemory(this.m_param);
  class=class="str">"cmt">//--- volume type for calculation
  this.m_param[class="num">0].type=TYPE_UINT;
  this.m_param[class="num">0].integer_value=applied_volume;
  }
 else
  ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
 class=class="str">"cmt">//--- Create description of parameters
 class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
 class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
 class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
 class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
 class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
 this.SetParameters(param);
 this.SetName("BW MFI");
 this.SetDescription("Market Facilitation Index");
 this.m_title=this.Name()+this.Parameters();
 this.m_category=IND_CATEGORY_WILLIAMS;
 class=class="str">"cmt">//--- Write description of line buffers
 this.SetBufferDescription(class="num">0,this.m_title);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Momentum indicator class                                         |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndMomentum : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndMomentum(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
               const class="type">int          mom_period,   class=class="str">"cmt">// averaging period
               const ENUM_APPLIED_PRICE applied_price class=class="str">"cmt">// price type or handle
              ) : CIndMSTF(IND_MOMENTUM,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();

if(::ArrayResize(this.m_param,class="num">2)==class="num">2)
  {
   ::ZeroMemory(this.m_param);
   class=class="str">"cmt">//--- averaging period
   this.m_param[class="num">0].type=TYPE_UINT;
   this.m_param[class="num">0].integer_value=(mom_period<class="num">1 ? class="num">14 : mom_period);
   class=class="str">"cmt">//--- price type or handle
   this.m_param[class="num">1].type=TYPE_UINT;
   this.m_param[class="num">1].integer_value=applied_price;
  }
 else
   ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
 class=class="str">"cmt">//--- Create description of parameters
 class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
 class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
 class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
 class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),mom_period);
 class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
 this.SetParameters(param);
 this.SetName("Momentum");
 this.SetDescription("Momentum");
 this.m_title=this.Name()+this.Parameters();
 this.m_category=IND_CATEGORY_OSCILLATOR;
 this.m_digits=class="num">2;
 class=class="str">"cmt">//--- Write description of line buffers
 this.SetBufferDescription(class="num">0,this.m_title);
  }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Money Flow Index indicator class                                |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndMFI : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndMFI(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
          const class="type">int             ma_period,      class=class="str">"cmt">// averaging period
          const ENUM_APPLIED_VOLUME applied_volume  class=class="str">"cmt">// volume type for calculation
          ) : CIndMSTF(IND_MFI,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();

if(::ArrayResize(this.m_param,class="num">2)==class="num">2)
  {
   ::ZeroMemory(this.m_param);
   class=class="str">"cmt">//--- averaging period
   this.m_param[class="num">0].type=TYPE_UINT;
   this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period);
   class=class="str">"cmt">//--- volume type for calculation
   this.m_param[class="num">1].type=TYPE_UINT;
   this.m_param[class="num">1].integer_value=applied_volume;
   }
  else
   ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
  class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
  class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
  class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
  this.SetParameters(param);
  this.SetName("MFI");
  this.SetDescription("Money Flow Index");
  this.m_title=this.Name()+this.Parameters();
  this.m_category=IND_CATEGORY_VOLUME;
  class=class="str">"cmt">//--- Write description of line buffers
  this.SetBufferDescription(class="num">0,this.m_title);
  }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Moving Average indicator class                                  |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndMA : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndMA(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
         const class="type">int             ma_period,     class=class="str">"cmt">// averaging period
         const class="type">int             ma_shift,      class=class="str">"cmt">// horizontal shift of the indicator
         const ENUM_MA_METHOD  ma_method,     class=class="str">"cmt">// smoothing type
         const ENUM_APPLIED_PRICE applied_price class=class="str">"cmt">// price type or handle

      ) : CIndMSTF(IND_MA,class="num">1,symbol,timeframe)
  {
   class=class="str">"cmt">//--- Set the size of the parameter array and fill it
   ::ResetLastError();
   if(::ArrayResize(this.m_param,class="num">4)==class="num">4)
     {
      ::ZeroMemory(this.m_param);
      class=class="str">"cmt">//--- averaging period
      this.m_param[class="num">0].type=TYPE_UINT;
      this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">10 : ma_period);
      class=class="str">"cmt">//--- horizontal shift of the indicator
      this.m_param[class="num">1].type=TYPE_INT;
      this.m_param[class="num">1].integer_value=ma_shift;
      class=class="str">"cmt">//--- smoothing type
      this.m_param[class="num">2].type=TYPE_UINT;
      this.m_param[class="num">2].integer_value=ma_method;
      class=class="str">"cmt">//--- price type or handle
      this.m_param[class="num">3].type=TYPE_UINT;
      this.m_param[class="num">3].integer_value=applied_price;
     }
   else
      ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
   class=class="str">"cmt">//--- Create description of parameters
   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
   class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("MA");
   this.SetDescription("Moving Average");
   this.m_title=this.Name()+this.Parameters();
   this.m_category=IND_CATEGORY_TREND;
   this.m_digits=::Digits()+class="num">1;
   class=class="str">"cmt">//--- Write description of line buffers
   this.SetBufferDescription(class="num">0,this.m_title);
   class=class="str">"cmt">//--- Write shift to buffer class="num">0
   this.SetBufferShift(class="num">0,ma_shift);
  }

class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndOsMA(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
              const class="type">int          fast_ema_period, class=class="str">"cmt">// fast MA period
              const class="type">int          slow_ema_period, class=class="str">"cmt">// slow MA period
              const class="type">int          signal_period,   class=class="str">"cmt">// difference averaging period
              const ENUM_APPLIED_PRICE applied_price     class=class="str">"cmt">// price type or handle
         ) : CIndMSTF(IND_OSMA,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">4)==class="num">4)
    {
     ::ZeroMemory(this.m_param);
     class=class="str">"cmt">//--- fast MA period
     this.m_param[class="num">0].type=TYPE_UINT;
     this.m_param[class="num">0].integer_value=(fast_ema_period<class="num">1 ? class="num">12 : fast_ema_period);
     class=class="str">"cmt">//--- slow MA period
     this.m_param[class="num">1].type=TYPE_UINT;
     this.m_param[class="num">1].integer_value=(slow_ema_period<class="num">1 ? class="num">26 : slow_ema_period);
     class=class="str">"cmt">//--- difference averaging period
     this.m_param[class="num">2].type=TYPE_UINT;
     this.m_param[class="num">2].integer_value=(signal_period<class="num">1 ? class="num">9 : signal_period<class="num">2 ? class="num">2 : signal_period);
     class=class="str">"cmt">//--- price type or handle
     this.m_param[class="num">3].type=TYPE_UINT;
     this.m_param[class="num">3].integer_value=applied_price;
     }
  else
     ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
  class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
  class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),fast_ema_period,slow_ema_period,signal_period);
  class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits

this.SetParameters(param);
this.SetName("OsMA");
this.SetDescription("Moving Average of Oscillator");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_OSCILLATOR;
this.m_digits=::Digits()+class="num">2;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
      }
   };
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Moving Averages Convergence/Divergence indicator class           |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndMACD : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndMACD(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int                fast_ema_period, class=class="str">"cmt">// fast MA period
            const class="type">int                slow_ema_period, class=class="str">"cmt">// slow MA period
            const class="type">int                signal_period,   class=class="str">"cmt">// difference averaging period
            const ENUM_APPLIED_PRICE applied_price    class=class="str">"cmt">// price type or handle
            ) : CIndMSTF(IND_MACD,class="num">2,symbol,timeframe)
     {
     class=class="str">"cmt">// Buffer indexes: class="num">0 - MAIN_LINE, class="num">1 - SIGNAL_LINE
     class=class="str">"cmt">//--- Set the size of the parameter array and fill it
     ::ResetLastError();
     if(::ArrayResize(this.m_param,class="num">4)==class="num">4)
       {
       ::ZeroMemory(this.m_param);
       class=class="str">"cmt">//--- fast MA period
       this.m_param[class="num">0].type=TYPE_UINT;
       this.m_param[class="num">0].integer_value=(fast_ema_period<class="num">1 ? class="num">12 : fast_ema_period);
       class=class="str">"cmt">//--- slow MA period
       this.m_param[class="num">1].type=TYPE_UINT;
       this.m_param[class="num">1].integer_value=(slow_ema_period<class="num">1 ? class="num">26 : slow_ema_period);
       class=class="str">"cmt">//--- difference averaging period
       this.m_param[class="num">2].type=TYPE_UINT;
       this.m_param[class="num">2].integer_value=(signal_period<class="num">1 ? class="num">9 : signal_period);
       class=class="str">"cmt">//--- price type or handle
       this.m_param[class="num">3].type=TYPE_UINT;
       this.m_param[class="num">3].integer_value=applied_price;
       }
     else

   ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
   class=class="str">"cmt">//--- Create description of parameters
   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),fast_ema_period,slow_ema_period,signal_period);
   class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("MACD");
   this.SetDescription("Moving Averages Convergence/Divergence");
   this.m_title=this.Name()+this.Parameters();
   this.m_category=IND_CATEGORY_OSCILLATOR;
   this.m_digits=::Digits()+class="num">1;
   class=class="str">"cmt">//--- Description of MAIN_LINE and SIGNAL_LINE line buffers
   this.SetBufferDescription(MAIN_LINE,this.m_title);
   this.SetBufferDescription(SIGNAL_LINE,"Signal");
   }
 };
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| On Balance Volume indicator class                               |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndOBV : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndOBV(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
           const ENUM_APPLIED_VOLUME applied_volume   class=class="str">"cmt">// volume type for calculation
           ) : CIndMSTF(IND_OBV,class="num">1,symbol,timeframe)
   {
   class=class="str">"cmt">//--- Set the size of the parameter array and fill it
   ::ResetLastError();
   if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
     {
      ::ZeroMemory(this.m_param);
      class=class="str">"cmt">//--- volume type for calculation
      this.m_param[class="num">0].type=TYPE_UINT;
      this.m_param[class="num">0].integer_value=applied_volume;
     }
   else
     ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
   class=class="str">"cmt">//--- Create description of parameters
   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters

class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("OBV");
this.SetDescription("On Balance Volume");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_VOLUME;
this.m_digits=class="num">0;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Parabolic Stop and Reverse system indicator class               |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndSAR : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndSAR(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
          const class="type">class="kw">double step,                                 class=class="str">"cmt">// price change step — acceleration factor
          const class="type">class="kw">double maximum                               class=class="str">"cmt">// maximum step
          ) : CIndMSTF(IND_SAR,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">2)==class="num">2)
    {
     ::ZeroMemory(this.m_param);
     class=class="str">"cmt">//--- price change step — acceleration factor
     this.m_param[class="num">0].type=TYPE_DOUBLE;
     this.m_param[class="num">0].double_value=step;
     class=class="str">"cmt">//--- maximum step
     this.m_param[class="num">1].type=TYPE_DOUBLE;
     this.m_param[class="num">1].double_value=maximum;
    }
  else
     ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());

class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%.2f,%.2f)",symbol_period,(current ? "" : ":"),step,maximum);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
this.SetParameters(param);
this.SetName("SAR");
this.SetDescription("Parabolic SAR");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_TREND;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Класс индикатора Relative Strength Index                         |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndRSI : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndRSI(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
         const class="type">int          ma_period,    class=class="str">"cmt">// averaging period
         const ENUM_APPLIED_PRICE applied_price  class=class="str">"cmt">// price type or handle
         ) : CIndMSTF(IND_RSI,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">2)==class="num">2)
    {
     ::ZeroMemory(this.m_param);
     class=class="str">"cmt">//--- averaging period
     this.m_param[class="num">0].type=TYPE_UINT;
     this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period<class="num">2 ? class="num">2 : ma_period);
     class=class="str">"cmt">//--- price type or handle
     this.m_param[class="num">1].type=TYPE_UINT;
     this.m_param[class="num">1].integer_value=applied_price;
    }
  else
     ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());

   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);

   ::ResetLastError();
   if(::ArrayResize(this.m_param,class="num">4)==class="num">4)
     {
      ::ZeroMemory(this.m_param);
      class=class="str">"cmt">//--- averaging period
      this.m_param[class="num">0].type=TYPE_UINT;
      this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">20 : ma_period<class="num">2 ? class="num">2 : ma_period);
      class=class="str">"cmt">//--- horizontal shift of the indicator
      this.m_param[class="num">1].type=TYPE_INT;
      this.m_param[class="num">1].integer_value=ma_shift;
      class=class="str">"cmt">//--- smoothing type
      this.m_param[class="num">2].type=TYPE_UINT;
      this.m_param[class="num">2].integer_value=ma_method;
      class=class="str">"cmt">//--- price type or handle
      this.m_param[class="num">3].type=TYPE_UINT;

this.m_param[class="num">3].integer_value=applied_price;
}
else
 ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("StdDev");
this.SetDescription("Standard Deviation");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_TREND;
this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
class=class="str">"cmt">//--- Write shift to buffer class="num">0
this.SetBufferShift(class="num">0,ma_shift);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Stochastic Oscillator indicator class                            |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndStoch : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndStoch(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int      Kperiod,      class=class="str">"cmt">// K-period(number of bars for calculations)
            const class="type">int      Dperiod,      class=class="str">"cmt">// D-period(primary smoothing period)
            const class="type">int      slowing,      class=class="str">"cmt">// final smoothing
            const ENUM_MA_METHOD   ma_method,     class=class="str">"cmt">// smoothing type
            const ENUM_STO_PRICE   price_field   class=class="str">"cmt">// Stochastic calculation method
            ) : CIndMSTF(IND_STOCHASTIC,class="num">2,symbol,timeframe)
  {
  class=class="str">"cmt">// Buffer indexes: class="num">0 - MAIN_LINE, class="num">1 - SIGNAL_LINE
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it

ResetLastError();
if(ArrayResize(this.m_param,class="num">5)==class="num">5)
  {
   ZeroMemory(this.m_param);
   class=class="str">"cmt">//--- K period(number of bars for calculation)
   this.m_param[class="num">0].type=TYPE_UINT;
   this.m_param[class="num">0].integer_value=(Kperiod<class="num">1 ? class="num">5 : Kperiod);
   class=class="str">"cmt">//--- D period(primary smoothing period)
   this.m_param[class="num">1].type=TYPE_UINT;
   this.m_param[class="num">1].integer_value=(Dperiod<class="num">1 ? class="num">3 : Dperiod);
   class=class="str">"cmt">//--- final smoothing
   this.m_param[class="num">2].type=TYPE_UINT;
   this.m_param[class="num">2].integer_value=(slowing<class="num">1 ? class="num">3 : slowing);
   class=class="str">"cmt">//--- smoothing type
   this.m_param[class="num">3].type=TYPE_UINT;
   this.m_param[class="num">3].integer_value=ma_method;
   class=class="str">"cmt">//--- Stochastic calculation method
   this.m_param[class="num">4].type=TYPE_UINT;
   this.m_param[class="num">4].integer_value=price_field;
   }
else
   PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==Symbol() && this.Timeframe()==Period());
class="type">class="kw">string symbol_period=(current ? "" : StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),Kperiod,Dperiod,slowing);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("Stoch");
this.SetDescription("Stochastic Oscillator");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_OSCILLATOR;
this.m_digits=class="num">2;
class=class="str">"cmt">//--- Description of MAIN_LINE and SIGNAL_LINE line buffers
this.SetBufferDescription(MAIN_LINE,this.m_title);
this.SetBufferDescription(SIGNAL_LINE,"Signal");
  }
};

ResetLastError();
if(ArrayResize(this.m_param,class="num">5)==class="num">5)
  {
   ZeroMemory(this.m_param);
   class=class="str">"cmt">//--- K period(number of bars for calculation)
   this.m_param[class="num">0].type=TYPE_UINT;
   this.m_param[class="num">0].integer_value=(Kperiod<class="num">1 ? class="num">5 : Kperiod);
   class=class="str">"cmt">//--- D period(primary smoothing period)
   this.m_param[class="num">1].type=TYPE_UINT;
   this.m_param[class="num">1].integer_value=(Dperiod<class="num">1 ? class="num">3 : Dperiod);
   class=class="str">"cmt">//--- final smoothing
   this.m_param[class="num">2].type=TYPE_UINT;
   this.m_param[class="num">2].integer_value=(slowing<class="num">1 ? class="num">3 : slowing);
   class=class="str">"cmt">//--- smoothing type
   this.m_param[class="num">3].type=TYPE_UINT;
   this.m_param[class="num">3].integer_value=ma_method;
   class=class="str">"cmt">//--- Stochastic calculation method
   this.m_param[class="num">4].type=TYPE_UINT;
   this.m_param[class="num">4].integer_value=price_field;
   }
else
   PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,GetLastError());
class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==Symbol() && this.Timeframe()==Period());
class="type">class="kw">string symbol_period=(current ? "" : StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu,%lu)",symbol_period,(current ? "" : ":"),Kperiod,Dperiod,slowing);
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
this.SetParameters(param);
this.SetName("Stoch");
this.SetDescription("Stochastic Oscillator");
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_OSCILLATOR;
this.m_digits=class="num">2;
class=class="str">"cmt">//--- Description of MAIN_LINE and SIGNAL_LINE line buffers
this.SetBufferDescription(MAIN_LINE,this.m_title);
this.SetBufferDescription(SIGNAL_LINE,"Signal");
  }
};

class=class="str">"cmt">//| Triple Exponential Moving Average indicator class                    |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndTEMA : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndTEMA(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">int                ma_period,     class=class="str">"cmt">// averaging period
            const class="type">int                ma_shift,      class=class="str">"cmt">// horizontal shift of the indicator
            const ENUM_APPLIED_PRICE applied_price  class=class="str">"cmt">// price type or handle
           ) : CIndMSTF(IND_TEMA,class="num">1,symbol,timeframe)
     {
     class=class="str">"cmt">//--- Set the size of the parameter array and fill it
     ::ResetLastError();
     if(::ArrayResize(this.m_param,class="num">3)==class="num">3)
       {
       ::ZeroMemory(this.m_param);
       class=class="str">"cmt">//--- averaging period
       this.m_param[class="num">0].type=TYPE_UINT;
       this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period);
       class=class="str">"cmt">//--- horizontal shift of the indicator
       this.m_param[class="num">1].type=TYPE_INT;
       this.m_param[class="num">1].integer_value=ma_shift;
       class=class="str">"cmt">//--- price type or handle
       this.m_param[class="num">2].type=TYPE_UINT;
       this.m_param[class="num">2].integer_value=applied_price;
       }
     else
       ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
     class=class="str">"cmt">//--- Create description of parameters
     class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
     class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
     class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
     class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
     class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
     this.SetParameters(param);
     this.SetName("TEMA");
     this.SetDescription("Triple Exponential Moving Average");
     this.m_title=this.Name()+this.Parameters();

this.m_category=IND_CATEGORY_TREND;
this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
class=class="str">"cmt">//--- Write shift to buffer class="num">0
this.SetBufferShift(class="num">0,ma_shift);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Triple Exponential Moving Averages Oscillator indicator class    |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndTriX : class="kw">public CIndMSTF
 {
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndTriX(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
              const class="type">int          ma_period,     class=class="str">"cmt">// averaging period
              const ENUM_APPLIED_PRICE applied_price   class=class="str">"cmt">// price type or handle
             ) : CIndMSTF(IND_TRIX,class="num">1,symbol,timeframe)
  {
  class=class="str">"cmt">//--- Set the size of the parameter array and fill it
  ::ResetLastError();
  if(::ArrayResize(this.m_param,class="num">2)==class="num">2)
    {
     ::ZeroMemory(this.m_param);
     class=class="str">"cmt">//--- averaging period
     this.m_param[class="num">0].type=TYPE_UINT;
     this.m_param[class="num">0].integer_value=(ma_period<class="num">1 ? class="num">14 : ma_period<class="num">2 ? class="num">2 : ma_period);
     class=class="str">"cmt">//--- price type or handle
     this.m_param[class="num">1].type=TYPE_UINT;
     this.m_param[class="num">1].integer_value=applied_price;
    }
  else
     ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
  class=class="str">"cmt">//--- Create description of parameters
  class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
  class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
  class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
  class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),ma_period);
  class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
  this.SetParameters(param);
  this.SetName("TRIX");
  this.SetDescription("Triple Exponential Average");

class CIndWPR : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndWPR(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
           const class="type">int calc_period       class=class="str">"cmt">// averaging period
           ) : CIndMSTF(IND_WPR,class="num">1,symbol,timeframe)
   {
   class=class="str">"cmt">//--- Set the size of the parameter array and fill it
   ::ResetLastError();
   if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
     {
     ::ZeroMemory(this.m_param);
     class=class="str">"cmt">//--- averaging period
     this.m_param[class="num">0].type=TYPE_UINT;
     this.m_param[class="num">0].integer_value=(calc_period<class="num">1 ? class="num">14 : calc_period);
     }
   else
     ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
   class=class="str">"cmt">//--- Create description of parameters
   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=StringFormat("(%s%s%lu)",symbol_period,(current ? "" : ":"),calc_period);
   class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("%R");
   this.SetDescription("Williams&class="macro">#x27; Percent Range");
   this.m_title=this.Name()+this.Parameters();
   this.m_category=IND_CATEGORY_OSCILLATOR;
   this.m_digits=class="num">2;
   class=class="str">"cmt">//--- Write description of line buffers
   this.SetBufferDescription(class="num">0,this.m_title);
   }
  };

class CIndVIDyA : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
  CIndVIDyA(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
                        const class="type">int          cmo_period,    class=class="str">"cmt">// the Chande Momentum period
                        const class="type">int          ema_period,    class=class="str">"cmt">// period of the smoothing factor
                        const class="type">int          ma_shift,      class=class="str">"cmt">// horizontal shift of the indicator
                        const ENUM_APPLIED_PRICE  applied_price  class=class="str">"cmt">// price type or handle
            ) : CIndMSTF(IND_VIDYA,class="num">1,symbol,timeframe)
    {
    class=class="str">"cmt">//--- Set the size of the parameter array and fill it
    ::ResetLastError();
    if(::ArrayResize(this.m_param,class="num">4)==class="num">4)
      {
       ::ZeroMemory(this.m_param);
       class=class="str">"cmt">//--- Chande Momentum period
       this.m_param[class="num">0].type=TYPE_UINT;
       this.m_param[class="num">0].integer_value=(cmo_period<class="num">1 ? class="num">9 : cmo_period);
       class=class="str">"cmt">//--- smoothing factor period
       this.m_param[class="num">1].type=TYPE_UINT;
       this.m_param[class="num">1].integer_value=(ema_period<class="num">1 ? class="num">12 : ema_period);
       class=class="str">"cmt">//--- horizontal shift of the indicator
       this.m_param[class="num">2].type=TYPE_INT;
       this.m_param[class="num">2].integer_value=ma_shift;
       class=class="str">"cmt">//--- price type or handle
       this.m_param[class="num">3].type=TYPE_UINT;
       this.m_param[class="num">3].integer_value=applied_price;
      }
    else
       ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
    class=class="str">"cmt">//--- Create description of parameters
    class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
    class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
    class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
    class="type">class="kw">string param=StringFormat("(%s%s%lu,%lu)",symbol_period,(current ? "" : ":"),cmo_period,ema_period);

class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("VIDYA");
   this.SetDescription("Variable Index Dynamic Average");
   this.m_title=this.Name()+this.Parameters();
   this.m_category=IND_CATEGORY_TREND;
   this.m_digits=::Digits()+class="num">1;
class=class="str">"cmt">//--- Write description of line buffers
   this.SetBufferDescription(class="num">0,this.m_title);
class=class="str">"cmt">//--- Write shift to buffer class="num">0
   this.SetBufferShift(class="num">0,ma_shift);
   }
  };
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Volumes indicator class                                          |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndVolumes : class="kw">public CIndMSTF
  {
class="kw">public:
class=class="str">"cmt">//--- Constructor
   CIndVolumes(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
               const ENUM_APPLIED_VOLUME applied_volume   class=class="str">"cmt">// volume type
               ) : CIndMSTF(IND_VOLUMES,class="num">1,symbol,timeframe)
   {
   class=class="str">"cmt">//--- Set the size of the parameter array and fill it
   ::ResetLastError();
   if(::ArrayResize(this.m_param,class="num">1)==class="num">1)
     {
      ::ZeroMemory(this.m_param);
      class=class="str">"cmt">//--- volume type
      this.m_param[class="num">0].type=TYPE_UINT;
      this.m_param[class="num">0].integer_value=applied_volume;
     }
   else
      ::PrintFormat("%s: ArrayResize failed. Error %ld",__FUNCTION__,::GetLastError());
   class=class="str">"cmt">//--- Create description of parameters
   class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
   class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
   class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
   class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
   class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title, category and Digits
   this.SetParameters(param);
   this.SetName("Volumes");
   this.SetDescription("Volumes");
   this.m_title=this.Name()+this.Parameters();

this.m_category=IND_CATEGORY_VOLUME;
this.m_digits=class="num">0;
class=class="str">"cmt">//--- Write description of line buffers
this.SetBufferDescription(class="num">0,this.m_title);
 }
};
class=class="str">"cmt">//+------------------------------------------------------------------+
class=class="str">"cmt">//| Custom indicator class                                            |
class=class="str">"cmt">//+------------------------------------------------------------------+
class CIndCustom : class="kw">public CIndMSTF
{
class="kw">public:
class=class="str">"cmt">//--- Constructor
 CIndCustom(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,
            const class="type">class="kw">string path,               class=class="str">"cmt">// path to the indicator(for example, "Examples\\MACD.ex5")
            const class="type">class="kw">string name,               class=class="str">"cmt">// name of the custom indicator
            const class="type">uint   buffers,            class=class="str">"cmt">// number of indicator buffers
            const class="type">MqlParam &param[]          class=class="str">"cmt">// array of custom indicator parameters
            ) : CIndMSTF(IND_CUSTOM,buffers,symbol,timeframe)
 {
  class=class="str">"cmt">//--- If an empty array of parameters is passed, print this to log
  class="type">int total=(class="type">int)param.Size();
  if(total==class="num">0)
    ::PrintFormat("%s Error. Passed an empty array",__FUNCTION__);
  class=class="str">"cmt">//--- If the array is not empty and its size is increased by class="num">1 (the first class="type">class="kw">string parameter must contain the indicator name)
  ResetLastError();
  if(total>class="num">0 && ::ArrayResize(this.m_param,total+class="num">1)==total+class="num">1)
    {
     class=class="str">"cmt">//--- Reset data in the array and enter name(path to file and name of .ex5 file)
     ::ZeroMemory(this.m_param);
     class=class="str">"cmt">//--- name of the custom indicator
     this.m_param[class="num">0].type=TYPE_STRING;
     this.m_param[class="num">0].string_value=path;
     class=class="str">"cmt">//--- fill the array of indicator parameters
     for(class="type">int i=class="num">0;i<total;i++)
       {
        this.m_param[i+class="num">1].type=param[i].type;
        this.m_param[i+class="num">1].double_value=param[i].double_value;
        this.m_param[i+class="num">1].integer_value=param[i].integer_value;
        this.m_param[i+class="num">1].string_value=param[i].string_value;
       }

class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
this.SetParameters(param);
this.SetName(name);
this.SetDescription(name);
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_CUSTOM;
class=class="str">"cmt">//--- Write a description of the first line buffer
this.SetBufferDescription(class="num">0,this.m_title);
}
   }
};

class=class="str">"cmt">//--- Create description of parameters
class=class="str">"cmt">//--- If non-current chart symbol or period, their descriptions are added to parameters
class="type">bool current=(this.Symbol()==::Symbol() && this.Timeframe()==::Period());
class="type">class="kw">string symbol_period=(current ? "" : ::StringFormat("%s,%s",this.Symbol(),this.TimeframeDescription()));
class="type">class="kw">string param=(current ? "" : StringFormat("(%s)",symbol_period));
class=class="str">"cmt">//--- Write description of parameters, indicator name, its description, title and category
this.SetParameters(param);
this.SetName(name);
this.SetDescription(name);
this.m_title=this.Name()+this.Parameters();
this.m_category=IND_CATEGORY_CUSTOM;
class=class="str">"cmt">//--- Write a description of the first line buffer
this.SetBufferDescription(class="num">0,this.m_title);
}
   }
};

class="macro">#include <Arrays\ArrayObj.mqh>
class CMSTFIndicators
  {
class="kw">private:
   CArrayObj         m_list;          class=class="str">"cmt">// 动态对象数组，存各指标指针
class=class="str">"cmt">//--- Creates an indicator for the passed object
   class="type">bool              CreateIndicator(CIndMSTF *ind_obj);  class=class="str">"cmt">// 为传入对象创建指标
class=class="str">"cmt">//--- Adds the specified indicator to the collection
   class="type">int               AddNewIndicator(CIndMSTF *ind_obj,const class="type">class="kw">string source); class=class="str">"cmt">// 加指标进集合，返回索引
class="kw">public:
class=class="str">"cmt">//--- Returns(class="num">1) indicator object by handle, (class="num">2) number of indicators in the collection
   CIndMSTF         *GetIndicatorObj(const class="type">int ind_handle,const class="type">class="kw">string source) const; class=class="str">"cmt">// 按句柄取指标对象
   class="type">uint              IndicatorsTotal(class="type">void) const { class="kw">return this.m_list.Total(); } class=class="str">"cmt">// 返回集合内指标总数
class=class="str">"cmt">//--- Populates buffers of(class="num">1) the indicator by handle, (class="num">2) all indicators in the collection
   class="type">bool              Calculate(const class="type">int ind_handle);  class=class="str">"cmt">// 算指定句柄指标
   class="type">bool              Calculate(class="type">void);                  class=class="str">"cmt">// 算全部指标
class=class="str">"cmt">//--- Sets the(class="num">1) specified, (class="num">2) class="kw">default description of the indicator buffer line
   class="type">void              SetPlotLabel(const class="type">uint plot_index,const class="type">class="kw">string descript); class=class="str">"cmt">// 设缓冲线标签
   class="type">void              SetPlotLabelFromBuffer(const class="type">uint plot_index,const class="type">int ind_handle,const class="type">uint buffer_num); class=class="str">"cmt">// 从缓冲设标签
class=class="str">"cmt">//--- Sets the shift to the specified plotting buffer
   class="type">void              SetPlotShift(const class="type">uint plot_index,const class="type">int shift); class=class="str">"cmt">// 设绘制偏移
class=class="str">"cmt">//--- (class="num">1) Sets(class="num">2) returns the initializing value of the given buffer specified by the indicator handle
   class="type">void              SetBufferInitValue(const class="type">int ind_handle,const class="type">uint buffer_num,const class="type">class="kw">double value); class=class="str">"cmt">// 设缓冲初值
  };

class="type">class="kw">double BufferInitValue(const class="type">int ind_handle,const class="type">uint buffer_num) const;
class=class="str">"cmt">//--- Returns indicator data by handle from the specified buffer at index(class="num">1) as is, (class="num">2) for the specified symbol/timeframe
class="type">class="kw">double GetData(const class="type">int ind_handle,const class="type">uint buffer_num,const class="type">uint index);
class="type">class="kw">double GetDataTo(const class="type">class="kw">string symbol_to,const ENUM_TIMEFRAMES timeframe_to,const class="type">int ind_handle,const class="type">uint buffer_num,const class="type">uint index);
class=class="str">"cmt">//--- (class="num">1) Copies data of the specified calculation part buffer of the indicator by handle into the indicator buffer, taking into account chart symbol/period,
class=class="str">"cmt">//--- (class="num">2) returns the amount of data in the specified buffer of the indicator by handle
class="type">bool DataToBuffer(const class="type">class="kw">string symbol_to,const ENUM_TIMEFRAMES timeframe_to,const class="type">int ind_handle,const class="type">uint buffer_num,const class="type">int limit,class="type">class="kw">double &buffer[]);
class="type">uint DataTotal(const class="type">int ind_handle,const class="type">uint buffer_num) const;
class=class="str">"cmt">//--- Returns(class="num">1) buffer description, (class="num">2) state of the line data of given buffer of indicator specified by handle on the specified bar
class=class="str">"cmt">//--- (class="num">3) indicator line state for the specific chart symbol/period, (class="num">4) indicator line state relation to the specified level,
class=class="str">"cmt">//--- (class="num">5) state of relation of indicator line with specified level for certain chart symbol/period, (class="num">6) indicator category description
class="type">class="kw">string BufferDescription(const class="type">int ind_handle,const class="type">uint buffer_num);
ENUM_LINE_STATE BufferLineState(const class="type">int ind_handle,const class="type">uint buffer_num,const class="type">int index);
ENUM_LINE_STATE BufferLineState(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,const class="type">int ind_handle,const class="type">uint buffer_num,const class="type">int index);
ENUM_LINE_STATE BufferLineStateRelative(const class="type">int ind_handle,const class="type">int buffer_num,const class="type">int index,const class="type">class="kw">double level0,const class="type">class="kw">double level1=EMPTY_VALUE);
ENUM_LINE_STATE BufferLineStateRelative(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,const class="type">int ind_handle,const class="type">int buffer_num,const class="type">int index,const class="type">class="kw">double level0,const class="type">class="kw">double level1=EMPTY_VALUE);
class="type">class="kw">string CategoryDescription(const class="type">int ind_handle);
class=class="str">"cmt">//--- Sets(class="num">1) identifier, (class="num">2) Digits, (class="num">3) user description, (class="num">4) buffer description
class="type">void SetID(const class="type">int ind_handle,const class="type">int id);

class="type">void SetDigits(const class="type">int ind_handle,const class="type">int digits);
class="type">void SetDescription(const class="type">int ind_handle,const class="type">class="kw">string descr);
class="type">void SetBufferDescription(const class="type">int ind_handle,const class="type">uint buffer_num,const class="type">class="kw">string descr);
class=class="str">"cmt">//--- Returns flag of whether the buffer is set as series, (class="num">2) historical data for symbol/period is synchronized
class="type">bool IsSeries(const class="type">int ind_handle,const class="type">uint buffer_num) const;
class="type">bool IsSynchronized(const class="type">int ind_handle) const;

class=class="str">"cmt">//--- Returns(class="num">1) timeframe, (class="num">2) symbol, (class="num">3) name, (class="num">4) list of parameters, (class="num">5) handle, (class="num">6) Digits
class=class="str">"cmt">//--- number of(class="num">7) buffers, (class="num">8) bars, (class="num">9) identifier, (class="num">10) description, (class="num">11) title, (class="num">12) category,
class=class="str">"cmt">//--- (class="num">13) number of parameters, (class="num">14) program type, description of(class="num">15) category, (class="num">16) indicator buffer
ENUM_TIMEFRAMES Timeframe(const class="type">int ind_handle) const;
class="type">class="kw">string Symbol(const class="type">int ind_handle) const;
class="type">class="kw">string Name(const class="type">int ind_handle) const;
class="type">class="kw">string Parameters(const class="type">int ind_handle) const;
class="type">int Digits(const class="type">int ind_handle) const;
class="type">uint BuffersTotal(const class="type">int ind_handle) const;
class="type">uint RatesTotal(const class="type">int ind_handle) const;
class="type">int ID(const class="type">int ind_handle) const;
class="type">class="kw">string Description(const class="type">int ind_handle) const;
class="type">class="kw">string Title(const class="type">int ind_handle) const;
ENUM_IND_CATEGORY Category(const class="type">int ind_handle) const;
class="type">uint ParamsTotal(const class="type">int ind_handle) const;
class=class="str">"cmt">//--- Returns(class="num">1) structure of parameters by index from array, (class="num">2) timeframe description
class="type">MqlParam GetMqlParam(const class="type">int ind_handle,const class="type">int index) const;
class="type">class="kw">string TimeframeDescription(const class="type">int ind_handle) const;
class=class="str">"cmt">//--- Returns amount of calculated data

  class="type">int                Calculated(const class="type">int ind_handle) const;

class=class="str">"cmt">//--- Virtual method returning the type of object(indicator)
       ENUM_INDICATOR   Type(const class="type">int ind_handle) const;

class=class="str">"cmt">//--- Methods for adding indicators to the collection
  class="type">int                AddNewAC(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe);
  class="type">int                AddNewAD(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,const ENUM_APPLIED_VOLUME applied_volume=VOLUME_TICK);
  class="type">int                AddNewADX(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,const class="type">int adx_period=class="num">14);
  class="type">int                AddNewADXWilder(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,const class="type">int adx_period=class="num">14);
  class="type">int                AddNewAlligator(const class="type">class="kw">string symbol,const ENUM_TIMEFRAMES timeframe,const class="type">int jaw_period=class="num">13,
                                                                         const class="type">int jaw_shift=class="num">8,
                                                                         const class="type">int teeth_period=class="num">8,
                                                                         const class="type">int teeth_shift=class="num">5,
                                                                         const class="type">int lips_period=class="num">5,
                                                                         const class="type">int lips_shift=class="num">3,