new files added

2026-07-27 20:47:44 +00:00 · 2026-02-11 11:36:05 +01:00
parent bd8efc20ac
commit 0a88d62730
1 changed files with 142 additions and 0 deletions
@@ -0,0 +1,142 @@
+//+------------------------------------------------------------------+
+//|                                               SpreadCost_Pro.mq5 |
+//|                                          Copyright 2026, xxxxxxxx|
+//+------------------------------------------------------------------+
+#property copyright "Copyright 2026, xxxxxxxx"
+#property version   "1.01" // Fixed Point conversion logic
+#property description "Relative Spread Cost Indicator."
+#property description "Shows Spread as a percentage of Volatility (ATR)."
+
+#property indicator_separate_window
+#property indicator_buffers 2
+#property indicator_plots   1
+
+//--- Levels
+#property indicator_level1 10.0
+#property indicator_level2 30.0
+#property indicator_levelcolor clrSilver
+#property indicator_levelstyle STYLE_DOT
+
+//--- Plot: Cost Histogram
+#property indicator_label1  "Spread Cost %"
+#property indicator_type1   DRAW_COLOR_HISTOGRAM
+// Color Index: 0=Cheap(Green), 1=Normal(Gray), 2=Expensive(Red)
+#property indicator_color1  clrLime, clrGray, clrRed
+#property indicator_style1  STYLE_SOLID
+#property indicator_width1  2
+
+#include <MyIncludes\ATR_Calculator.mqh>
+
+//--- Input Parameters
+input int      InpATRPeriod      = 14;    // Volatility Baseline (ATR)
+input double   InpCheapLevel     = 10.0;  // Cheap Threshold (%)
+input double   InpExpensiveLevel = 30.0;  // Expensive Threshold (%)
+
+//--- Buffers
+double BufCost[];
+double BufColors[];
+
+//--- Calculator
+CATRCalculator *g_atr;
+
+//+------------------------------------------------------------------+
+//| Init                                                             |
+//+------------------------------------------------------------------+
+int OnInit()
+  {
+   SetIndexBuffer(0, BufCost, INDICATOR_DATA);
+   SetIndexBuffer(1, BufColors, INDICATOR_COLOR_INDEX);
+
+   string name = StringFormat("SpreadCost(ATR%d)", InpATRPeriod);
+   IndicatorSetString(INDICATOR_SHORTNAME, name);
+   IndicatorSetInteger(INDICATOR_DIGITS, 1); // Display as 15.2 %
+
+   g_atr = new CATRCalculator();
+   if(!g_atr.Init(InpATRPeriod, ATR_POINTS))
+      return INIT_FAILED;
+
+   return(INIT_SUCCEEDED);
+  }
+
+//+------------------------------------------------------------------+
+//| Deinit                                                           |
+//+------------------------------------------------------------------+
+void OnDeinit(const int r)
+  {
+   if(CheckPointer(g_atr) == POINTER_DYNAMIC)
+      delete g_atr;
+  }
+
+//+------------------------------------------------------------------+
+//| Calculate                                                        |
+//+------------------------------------------------------------------+
+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(rates_total < InpATRPeriod)
+     {
+      Print("SpreadCost Error: Not enough bars. Total: ", rates_total, " Required: ", InpATRPeriod);
+      return 0;
+     }
+
+// DEBUG: Check spread data quality (only once per bar to avoid spam)
+   static datetime last_print = 0;
+   if(time[rates_total-1] != last_print)
+     {
+      double test_spread = (double)spread[rates_total-1];
+      PrintFormat("DEBUG [%s %s]: Bars=%d, Spread[Last]=%.1f, Point=%.5f",
+                  _Symbol, EnumToString(Period()), rates_total, test_spread, Point());
+      last_print = time[rates_total-1];
+     }
+
+// 1. Calculate ATR (Returns Price Value, e.g. 50.5)
+   double atr_buf[];
+   g_atr.Calculate(rates_total, prev_calculated, open, high, low, close, atr_buf);
+
+   int start = (prev_calculated > 0) ? prev_calculated - 1 : InpATRPeriod;
+
+// Pre-fetch Point value (Processor efficiency)
+   double pt = Point();
+
+   for(int i = start; i < rates_total; i++)
+     {
+      double current_atr_price = atr_buf[i];
+
+      // spread[] is in Points (Integer). Convert to Price.
+      // Example: Index Spread = 20 points. Point = 0.5. Spread Value = 10.0
+      double current_spread_price = (double)spread[i] * pt;
+
+      if(current_atr_price > 0.000001)
+        {
+         // Formula: (Spread Value / ATR Value) * 100
+         double cost_pct = (current_spread_price / current_atr_price) * 100.0;
+
+         BufCost[i] = cost_pct;
+
+         if(cost_pct <= InpCheapLevel)
+            BufColors[i] = 0.0;
+         else
+            if(cost_pct >= InpExpensiveLevel)
+               BufColors[i] = 2.0;
+            else
+               BufColors[i] = 1.0;
+        }
+      else
+        {
+         BufCost[i] = 0.0;
+        }
+     }
+
+   return(rates_total);
+  }
+//+------------------------------------------------------------------+
+//+------------------------------------------------------------------+