Initial commit: MQL5 Indicators Collection (MetaTrader 5) - Part 2

2025-06-24 00:49:28 +01:00
commit 3dac0b5f2f
5047 changed files with 75091 additions and 0 deletions
@@ -0,0 +1,22 @@
+# 🚀 Unlock the Power of Trading!
+
+Welcome to this open-source trading project. Here you will find powerful tools to enhance your trading journey. If you find this project useful, please consider starring ⭐, sharing, or donating to support further development!
+
+---
+
+**Support the project:**
+- Star this repository on GitHub
+- Share it with your trading friends
+- [Donate here](https://www.paypal.com/donate/?hosted_button_id=YOUR_BUTTON_ID) to help us grow!
+
+---
+
+## Files included:
+### Source Files:
+- `iwprsign.mq5`
+
+### Screenshots:
+![Screenshot](picture_1__6.png)
+![Screenshot](picture_2__6.png)
+
+> Made with ❤️ for the trading community.
@@ -0,0 +1,155 @@
+//+------------------------------------------------------------------+
+//|                                                     iWPRSign.mq5 |
+//|                               Copyright © 2016, Nikolay Kositsin | 
+//|                              Khabarovsk,   farria@mail.redcom.ru | 
+//+------------------------------------------------------------------+
+#property copyright "Copyright © 2016, Nikolay Kositsin"
+#property link "farria@mail.redcom.ru"
+//--- íîìåð âåðñèè èíäèêàòîðà
+#property version   "1.00"
+//--- îòðèñîâêà èíäèêàòîðà â ãëàâíîì îêíå
+#property indicator_chart_window 
+//--- äëÿ ðàñ÷åòà è îòðèñîâêè èíäèêàòîðà èñïîëüçîâàíî äâà áóôåðà
+#property indicator_buffers 2
+//--- èñïîëüçîâàíî âñåãî äâà ãðàôè÷åñêèõ ïîñòðîåíèÿ
+#property indicator_plots   2
+//+----------------------------------------------+
+//|  Ïàðàìåòðû îòðèñîâêè ìåäâåæüåãî èíäèêàòîðà   |
+//+----------------------------------------------+
+//--- îòðèñîâêà èíäèêàòîðà 1 â âèäå ñèìâîëà
+#property indicator_type1   DRAW_ARROW
+//--- â êà÷åñòâå öâåòà ìåäâåæüåãî èíäèêàòîðà èñïîëüçîâàí DarkOrange öâåò
+#property indicator_color1  clrDarkOrange
+//--- òîëùèíà ëèíèè èíäèêàòîðà 1 ðàâíà 4
+#property indicator_width1  4
+//--- îòîáðàæåíèå áû÷åé ìåòêè èíäèêàòîðà
+#property indicator_label1  "iWPRSign Sell"
+//+----------------------------------------------+
+//|  Ïàðàìåòðû îòðèñîâêè áû÷üãî èíäèêàòîðà       |
+//+----------------------------------------------+
+//--- îòðèñîâêà èíäèêàòîðà 2 â âèäå ñèìâîëà
+#property indicator_type2   DRAW_ARROW
+//--- â êà÷åñòâå öâåòà áû÷üåãî èíäèêàòîðà èñïîëüçîâàí CornflowerBlue öâåò
+#property indicator_color2  clrCornflowerBlue
+//--- òîëùèíà ëèíèè èíäèêàòîðà 2 ðàâíà 4
+#property indicator_width2  4
+//--- îòîáðàæåíèå ìåäâåæüåé ìåòêè èíäèêàòîðà
+#property indicator_label2 "iWPRSign Buy"
+//+----------------------------------------------+
+//|  îáúÿâëåíèå êîíñòàíò                         |
+//+----------------------------------------------+
+#define RESET  0 // Êîíñòàíòà äëÿ âîçâðàòà òåðìèíàëó êîìàíäû íà ïåðåñ÷¸ò èíäèêàòîðà
+//+----------------------------------------------+
+//| Âõîäíûå ïàðàìåòðû èíäèêàòîðà                 |
+//+----------------------------------------------+
+input uint ATR_Period=14;
+input uint                 WPRPeriod=14;
+input int UpLevel=-30; //óðîâåíü ïåðåêóïëåííîñòè
+input int DnLevel=-70; //óðîâåíü ïåðåïðîäàííîñòè
+//+----------------------------------------------+
+//--- îáúÿâëåíèå äèíàìè÷åñêèõ ìàññèâîâ, êîòîðûå â äàëüíåéøåì
+//--- áóäóò èñïîëüçîâàíû â êà÷åñòâå èíäèêàòîðíûõ áóôåðîâ
+double SellBuffer[];
+double BuyBuffer[];
+//---
+int WPR_Handle,ATR_Handle,min_rates_total;
+//+------------------------------------------------------------------+
+//| Custom indicator initialization function                         |
+//+------------------------------------------------------------------+
+int OnInit()
+  {
+//--- èíèöèàëèçàöèÿ ãëîáàëüíûõ ïåðåìåííûõ 
+   min_rates_total=int(MathMax(WPRPeriod+1,ATR_Period))+1;
+//--- ïîëó÷åíèå õåíäëà èíäèêàòîðà WPRPeriod
+   WPR_Handle=iWPR(Symbol(),NULL,WPRPeriod);
+   if(WPR_Handle==INVALID_HANDLE)
+     {
+      Print("Íå óäàëîñü ïîëó÷èòü õåíäë èíäèêàòîðà WPRPeriod");
+      return(INIT_FAILED);
+     }
+//--- ïîëó÷åíèå õåíäëà èíäèêàòîðà ATR
+   ATR_Handle=iATR(NULL,0,ATR_Period);
+   if(ATR_Handle==INVALID_HANDLE)
+     {
+      Print(" Íå óäàëîñü ïîëó÷èòü õåíäë èíäèêàòîðà ATR");
+      return(INIT_FAILED);
+     }
+//--- ïðåâðàùåíèå äèíàìè÷åñêîãî ìàññèâà â èíäèêàòîðíûé áóôåð
+   SetIndexBuffer(0,SellBuffer,INDICATOR_DATA);
+//--- îñóùåñòâëåíèå ñäâèãà íà÷àëà îòñ÷åòà îòðèñîâêè èíäèêàòîðà 1
+   PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total);
+//--- ñèìâîë äëÿ èíäèêàòîðà
+   PlotIndexSetInteger(0,PLOT_ARROW,175);
+//--- èíäåêñàöèÿ ýëåìåíòîâ â áóôåðå êàê â òàéìñåðèè
+   ArraySetAsSeries(SellBuffer,true);
+//--- ïðåâðàùåíèå äèíàìè÷åñêîãî ìàññèâà â èíäèêàòîðíûé áóôåð
+   SetIndexBuffer(1,BuyBuffer,INDICATOR_DATA);
+//--- îñóùåñòâëåíèå ñäâèãà íà÷àëà îòñ÷åòà îòðèñîâêè èíäèêàòîðà 2
+   PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,min_rates_total);
+//--- ñèìâîë äëÿ èíäèêàòîðà
+   PlotIndexSetInteger(1,PLOT_ARROW,175);
+//--- èíäåêñàöèÿ ýëåìåíòîâ â áóôåðå êàê â òàéìñåðèè
+   ArraySetAsSeries(BuyBuffer,true);
+//--- Óñòàíîâêà ôîðìàòà òî÷íîñòè îòîáðàæåíèÿ èíäèêàòîðà
+   IndicatorSetInteger(INDICATOR_DIGITS,_Digits);
+//--- èìÿ äëÿ îêîí äàííûõ è ìåòêà äëÿ ïîäîêîí 
+   string short_name="iWPRSign";
+   IndicatorSetString(INDICATOR_SHORTNAME,short_name);
+//---   
+   return(INIT_SUCCEEDED);
+  }
+//+------------------------------------------------------------------+
+//| Custom indicator iteration function                              |
+//+------------------------------------------------------------------+
+int OnCalculate(const int rates_total,
+                const int prev_calculated,
+                const datetime &time[],
+                const double &open[],
+                const double &high[],
+                const double &low[],
+                const double &close[],
+                const long &tick_volume[],
+                const long &volume[],
+                const int &spread[])
+  {
+//--- ïðîâåðêà êîëè÷åñòâà áàðîâ íà äîñòàòî÷íîñòü äëÿ ðàñ÷åòà
+   if(BarsCalculated(WPR_Handle)<rates_total
+      || BarsCalculated(ATR_Handle)<rates_total
+      || rates_total<min_rates_total)
+      return(RESET);
+
+//--- îáúÿâëåíèÿ ëîêàëüíûõ ïåðåìåííûõ 
+   int to_copy,limit,bar;
+   double WPR[],ATR[];
+
+//--- ðàñ÷åòû íåîáõîäèìîãî êîëè÷åñòâà êîïèðóåìûõ äàííûõ è
+//ñòàðòîâîãî íîìåðà limit äëÿ öèêëà ïåðåñ÷åòà áàðîâ
+   if(prev_calculated>rates_total || prev_calculated<=0)// ïðîâåðêà íà ïåðâûé ñòàðò ðàñ÷åòà èíäèêàòîðà
+     {
+      limit=rates_total-min_rates_total; // ñòàðòîâûé íîìåð äëÿ ðàñ÷åòà âñåõ áàðîâ
+     }
+   else
+     {
+      limit=rates_total-prev_calculated; // ñòàðòîâûé íîìåð äëÿ ðàñ÷åòà íîâûõ áàðîâ
+     }
+   to_copy=limit+1;
+//--- êîïèðóåì âíîâü ïîÿâèâøèåñÿ äàííûå â ìàññèâû
+   if(CopyBuffer(WPR_Handle,0,MAIN_LINE,to_copy+1,WPR)<=0) return(RESET);
+   if(CopyBuffer(ATR_Handle,0,0,to_copy,ATR)<=0) return(RESET);
+//--- èíäåêñàöèÿ ýëåìåíòîâ â ìàññèâàõ êàê â òàéìñåðèÿõ  
+   ArraySetAsSeries(WPR,true);
+   ArraySetAsSeries(ATR,true);
+   ArraySetAsSeries(high,true);
+   ArraySetAsSeries(low,true);
+//--- îñíîâíîé öèêë ðàñ÷åòà èíäèêàòîðà
+   for(bar=limit; bar>=0 && !IsStopped(); bar--)
+     {
+      BuyBuffer[bar]=NULL;
+      SellBuffer[bar]=NULL;
+      if(WPR[bar] > DnLevel && WPR[bar+1] <= DnLevel) BuyBuffer[bar] = low[bar] - ATR[bar]*3/8;
+		    if(WPR[bar] < UpLevel && WPR[bar+1] >= UpLevel) SellBuffer[bar] = high[bar] + ATR[bar]*3/8;         
+     }
+//---     
+   return(rates_total);
+  }
+//+------------------------------------------------------------------+