diff --git a/Indicators/MyIndicators/StochasticSlow_HeikinAshi.mq5 b/Indicators/MyIndicators/StochasticSlow_HeikinAshi.mq5 new file mode 100644 index 0000000..be834c5 --- /dev/null +++ b/Indicators/MyIndicators/StochasticSlow_HeikinAshi.mq5 @@ -0,0 +1,211 @@ +//+------------------------------------------------------------------+ +//| StochasticSlow_HeikinAshi.mq5 | +//| Copyright 2025, xxxxxxxx | +//| | +//+------------------------------------------------------------------+ +#property copyright "Copyright 2025, xxxxxxxx" +#property link "" +#property version "2.00" // Refactored for full recalculation and stability +#property description "Slow Stochastic Oscillator on Heikin Ashi data" + +#include + +//--- Indicator Window and Level Properties --- +#property indicator_separate_window +#property indicator_buffers 3 // %K, %D, and Raw %K for calculation +#property indicator_plots 2 +#property indicator_level1 20.0 +#property indicator_level2 80.0 +#property indicator_minimum 0.0 +#property indicator_maximum 100.0 + +//--- Plot 1: %K line (Slow) +#property indicator_label1 "HA_%K" +#property indicator_type1 DRAW_LINE +#property indicator_color1 clrLightSeaGreen +#property indicator_style1 STYLE_SOLID +#property indicator_width1 1 + +//--- Plot 2: %D line (Signal) +#property indicator_label2 "HA_%D" +#property indicator_type2 DRAW_LINE +#property indicator_color2 clrRed +#property indicator_style2 STYLE_DOT +#property indicator_width2 1 + +//--- Input Parameters --- +input int InpKPeriod = 5; // %K Period +input int InpDPeriod = 3; // %D Period (signal line smoothing) +input int InpSlowing = 3; // Slowing (initial %K smoothing) + +//--- Indicator Buffers --- +double BufferHA_K[]; // Plotted buffer for the main (Slow) %K line +double BufferHA_D[]; // Plotted buffer for the signal %D line +double BufferRawK[]; // Calculation buffer for raw %K before slowing + +//--- Intermediate Heikin Ashi Buffers --- +double ExtHaOpenBuffer[]; +double ExtHaHighBuffer[]; +double ExtHaLowBuffer[]; +double ExtHaCloseBuffer[]; + +//--- Global Objects and Variables --- +int g_ExtKPeriod, g_ExtDPeriod, g_ExtSlowing; +CHeikinAshi_Calculator *g_ha_calculator; // Pointer to our Heikin Ashi calculator + +//--- Forward declarations for helper functions --- +double Highest(const double &array[], int period, int current_pos); +double Lowest(const double &array[], int period, int current_pos); + +//+------------------------------------------------------------------+ +//| Custom indicator initialization function. | +//+------------------------------------------------------------------+ +int OnInit() + { +//--- Validate and store input periods + g_ExtKPeriod = (InpKPeriod < 1) ? 1 : InpKPeriod; + g_ExtDPeriod = (InpDPeriod < 1) ? 1 : InpDPeriod; + g_ExtSlowing = (InpSlowing < 1) ? 1 : InpSlowing; + +//--- Map the buffers and set as non-timeseries + SetIndexBuffer(0, BufferHA_K, INDICATOR_DATA); + SetIndexBuffer(1, BufferHA_D, INDICATOR_DATA); + SetIndexBuffer(2, BufferRawK, INDICATOR_CALCULATIONS); + + ArraySetAsSeries(BufferHA_K, false); + ArraySetAsSeries(BufferHA_D, false); + ArraySetAsSeries(BufferRawK, false); + +//--- Set indicator display properties + IndicatorSetInteger(INDICATOR_DIGITS, 2); + PlotIndexSetInteger(0, PLOT_DRAW_BEGIN, g_ExtKPeriod + g_ExtSlowing - 2); + PlotIndexSetInteger(1, PLOT_DRAW_BEGIN, g_ExtKPeriod + g_ExtSlowing + g_ExtDPeriod - 3); + IndicatorSetString(INDICATOR_SHORTNAME, StringFormat("HA_Slow_Stoch(%d,%d,%d)", g_ExtKPeriod, g_ExtDPeriod, g_ExtSlowing)); + +//--- Create the calculator instance + g_ha_calculator = new CHeikinAshi_Calculator(); + if(CheckPointer(g_ha_calculator) == POINTER_INVALID) + { + Print("Error creating CHeikinAshi_Calculator object"); + return(INIT_FAILED); + } + + return(INIT_SUCCEEDED); + } + +//+------------------------------------------------------------------+ +//| Custom indicator deinitialization function. | +//+------------------------------------------------------------------+ +void OnDeinit(const int reason) + { +//--- Free the calculator object + if(CheckPointer(g_ha_calculator) != POINTER_INVALID) + { + delete g_ha_calculator; + g_ha_calculator = NULL; + } + } + +//+------------------------------------------------------------------+ +//| Slow Stochastic on Heikin Ashi calculation 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[]) + { +//--- Check if there is enough historical data + if(rates_total < g_ExtKPeriod + g_ExtSlowing + g_ExtDPeriod - 2) + return(0); + +//--- Resize intermediate buffers + ArrayResize(ExtHaOpenBuffer, rates_total); + ArrayResize(ExtHaHighBuffer, rates_total); + ArrayResize(ExtHaLowBuffer, rates_total); + ArrayResize(ExtHaCloseBuffer, rates_total); + +//--- STEP 1: Calculate Heikin Ashi bars + g_ha_calculator.Calculate(rates_total, open, high, low, close, + ExtHaOpenBuffer, ExtHaHighBuffer, ExtHaLowBuffer, ExtHaCloseBuffer); + +//--- STEP 2: Calculate Raw %K (Fast %K) using Heiken Ashi data + for(int i = g_ExtKPeriod - 1; i < rates_total; i++) + { + double highest_ha_high = Highest(ExtHaHighBuffer, g_ExtKPeriod, i); + double lowest_ha_low = Lowest(ExtHaLowBuffer, g_ExtKPeriod, i); + + double range = highest_ha_high - lowest_ha_low; + if(range > 0) + BufferRawK[i] = (ExtHaCloseBuffer[i] - lowest_ha_low) / range * 100.0; + else + BufferRawK[i] = (i > 0) ? BufferRawK[i-1] : 50.0; + } + +//--- STEP 3: Calculate Slow %K (Main Line) by smoothing Raw %K + int k_slow_start_pos = g_ExtKPeriod + g_ExtSlowing - 2; + for(int i = k_slow_start_pos; i < rates_total; i++) + { + double sum = 0; + for(int j = 0; j < g_ExtSlowing; j++) + { + sum += BufferRawK[i-j]; + } + BufferHA_K[i] = sum / g_ExtSlowing; + } + +//--- STEP 4: Calculate %D (Signal Line) by smoothing Slow %K + int d_start_pos = g_ExtKPeriod + g_ExtSlowing + g_ExtDPeriod - 3; + for(int i = d_start_pos; i < rates_total; i++) + { + double sum = 0; + for(int j = 0; j < g_ExtDPeriod; j++) + { + sum += BufferHA_K[i-j]; + } + BufferHA_D[i] = sum / g_ExtDPeriod; + } + + return(rates_total); + } + +//+------------------------------------------------------------------+ +//| Finds the highest value in a given period of an array. | +//+------------------------------------------------------------------+ +double Highest(const double &array[], int period, int current_pos) + { + double res = array[current_pos]; + for(int i = 1; i < period; i++) + { + int index = current_pos - i; + if(index < 0) + break; + if(res < array[index]) + res = array[index]; + } + return(res); + } + +//+------------------------------------------------------------------+ +//| Finds the lowest value in a given period of an array. | +//+------------------------------------------------------------------+ +double Lowest(const double &array[], int period, int current_pos) + { + double res = array[current_pos]; + for(int i = 1; i < period; i++) + { + int index = current_pos - i; + if(index < 0) + break; + if(res > array[index]) + res = array[index]; + } + return(res); + } +//+------------------------------------------------------------------+ +//+------------------------------------------------------------------+