Initial Commit ...

2024-01-25 04:05:58 +03:30
commit dac3101466
520 changed files with 186332 additions and 0 deletions
@@ -0,0 +1,62 @@
+#property copyright "www.forex-station.com"
+#property link      "www.forex-station.com"
+//---- indicator settings
+#property  indicator_separate_window
+#property  indicator_buffers 1
+#property  indicator_color1  Red
+//---- indicator parameters
+extern int RPeriod = 10;
+extern bool UsePercent = false;
+//---- indicator buffers
+double RateOfChange[];
+//+------------------------------------------------------------------+
+//| Custom indicator initialization function                         |
+//+------------------------------------------------------------------+
+int init()
+  {
+//---- drawing settings
+   SetIndexStyle(0, DRAW_LINE);
+   SetIndexDrawBegin(0, RPeriod);
+   IndicatorDigits(Digits + 1);
+//---- indicator buffers mapping
+   if(!SetIndexBuffer(0, RateOfChange))
+       Print("cannot set indicator buffers!");
+//---- name for DataWindow and indicator subwindow label
+   IndicatorShortName("ROC(" + RPeriod + ")");
+//---- initialization done
+   return(0);
+  }
+//+------------------------------------------------------------------+
+//| Moving Averages Convergence/Divergence                           |
+//+------------------------------------------------------------------+
+int start()
+  {
+   int limit;
+   double ROC, CurrentClose, PrevClose;
+   int counted_bars = IndicatorCounted();
+//---- check for possible errors
+   if(counted_bars < 0) 
+       return(-1);
+//---- last counted bar will be recounted
+   if(counted_bars > 0) 
+       counted_bars--;
+   limit = MathMin(Bars - counted_bars,Bars-1);
+//---- ROC calculation
+   for(int i = 0; i < limit; i++)
+     {
+       CurrentClose = iClose(NULL, 0, i);
+       PrevClose = iClose(NULL, 0, i + RPeriod);
+       ROC = CurrentClose - PrevClose;
+       //----
+       if(UsePercent)
+         {
+           if(PrevClose != 0)
+               RateOfChange[i] = 100 * ROC / PrevClose;
+         }
+       else
+           RateOfChange[i] = ROC;
+     }   
+//---- done
+   return(0);
+  }
+//+------------------------------------------------------------------+