| //+------------------------------------------------------------------+
|
| //| 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);
|
| }
|
| //+------------------------------------------------------------------+
|
