66 lines
2.6 KiB
MQL5
66 lines
2.6 KiB
MQL5
//+------------------------------------------------------------------+
|
|
//| ROC.mq5 |
|
|
//| Copyright 2000-2025, MetaQuotes Ltd. |
|
|
//| https://www.mql5.com |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "Copyright 2000-2025, MetaQuotes Ltd."
|
|
#property link "https://www.mql5.com"
|
|
#property description "Rate of Change"
|
|
//--- indicator settings
|
|
#property indicator_separate_window
|
|
#property indicator_buffers 1
|
|
#property indicator_plots 1
|
|
#property indicator_type1 DRAW_LINE
|
|
#property indicator_color1 clrLightSeaGreen
|
|
//--- input parameters
|
|
input int InpRocPeriod=12; // Period
|
|
//--- indicator buffer
|
|
double ExtRocBuffer[];
|
|
|
|
int ExtRocPeriod;
|
|
//+------------------------------------------------------------------+
|
|
//| Rate of Change initialization function |
|
|
//+------------------------------------------------------------------+
|
|
void OnInit()
|
|
{
|
|
//--- check for input
|
|
if(InpRocPeriod<1)
|
|
{
|
|
ExtRocPeriod=12;
|
|
PrintFormat("Incorrect value for input variable InpRocPeriod = %d. Indicator will use value %d for calculations.",
|
|
InpRocPeriod,ExtRocPeriod);
|
|
}
|
|
else
|
|
ExtRocPeriod=InpRocPeriod;
|
|
//--- indicator buffers mapping
|
|
SetIndexBuffer(0,ExtRocBuffer,INDICATOR_DATA);
|
|
//--- set accuracy
|
|
IndicatorSetInteger(INDICATOR_DIGITS,2);
|
|
//--- name for DataWindow and indicator subwindow label
|
|
IndicatorSetString(INDICATOR_SHORTNAME,"ROC("+string(ExtRocPeriod)+")");
|
|
//--- sets first bar from what index will be drawn
|
|
PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,ExtRocPeriod);
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| Rate of Change |
|
|
//+------------------------------------------------------------------+
|
|
int OnCalculate(const int rates_total,const int prev_calculated,const int begin,const double &price[])
|
|
{
|
|
if(rates_total<ExtRocPeriod)
|
|
return(0);
|
|
//--- preliminary calculations
|
|
int pos=prev_calculated-1;
|
|
if(pos<ExtRocPeriod)
|
|
pos=ExtRocPeriod;
|
|
//--- the main loop of calculations
|
|
for(int i=pos; i<rates_total && !IsStopped(); i++)
|
|
{
|
|
if(price[i]==0.0)
|
|
ExtRocBuffer[i]=0.0;
|
|
else
|
|
ExtRocBuffer[i]=(price[i]-price[i-ExtRocPeriod])/price[i]*100;
|
|
}
|
|
//--- OnCalculate done. Return new prev_calculated.
|
|
return(rates_total);
|
|
}
|
|
//+------------------------------------------------------------------+
|