Files
mql5/Include/MyIncludes/VScore_Calculator.mqh
T

143 lines
5.2 KiB
Plaintext

//+------------------------------------------------------------------+
//| VScore_Calculator.mqh |
//| Engine for V-Score (VWAP Z-Score). |
//| Measures statistical deviation from VWAP. |
//| VERSION 2.12: Restored classic signature with auto-volume |
//| Copyright 2026, xxxxxxxx |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026, xxxxxxxx"
#property version "2.12" // Restored Init signature for maximum compatibility across indicators
#ifndef VSCORE_CALCULATOR_MQH
#define VSCORE_CALCULATOR_MQH
#include <MyIncludes\VWAP_Calculator.mqh>
//+------------------------------------------------------------------+
//| Class CVScoreCalculator |
//+------------------------------------------------------------------+
class CVScoreCalculator
{
protected:
int m_period;
CVWAPCalculator *m_vwap_calc;
// Persistent Buffers for Incremental Calculation
double m_vwap_buf[];
double m_vwap_odd[];
double m_vwap_even[];
public:
CVScoreCalculator();
virtual ~CVScoreCalculator();
//--- RESTORED: Classic Init signature
bool Init(int period, ENUM_VWAP_PERIOD vwap_reset);
void Calculate(int rates_total, 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[],
double &out_vscore[]);
};
//+------------------------------------------------------------------+
//| Constructor |
//+------------------------------------------------------------------+
CVScoreCalculator::CVScoreCalculator() : m_vwap_calc(NULL)
{
}
//+------------------------------------------------------------------+
//| Destructor |
//+------------------------------------------------------------------+
CVScoreCalculator::~CVScoreCalculator()
{
if(CheckPointer(m_vwap_calc) != POINTER_INVALID)
delete m_vwap_calc;
}
//+------------------------------------------------------------------+
//| Init |
//+------------------------------------------------------------------+
bool CVScoreCalculator::Init(int period, ENUM_VWAP_PERIOD vwap_reset)
{
m_period = (period < 2) ? 2 : period;
m_vwap_calc = new CVWAPCalculator();
if(CheckPointer(m_vwap_calc) == POINTER_INVALID)
return false;
// Dynamic volume type selection based on broker capability (Real Volume vs Tick Volume)
long volume_limit = (long)SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_LIMIT);
ENUM_APPLIED_VOLUME vol_type = (volume_limit > 0) ? VOLUME_REAL : VOLUME_TICK;
// Init VWAP with optimal volume, enabled
if(!m_vwap_calc.Init(vwap_reset, vol_type, 0, true))
return false;
return true;
}
//+------------------------------------------------------------------+
//| Main Calculation (Strictly O(1) Optimized) |
//+------------------------------------------------------------------+
void CVScoreCalculator::Calculate(int rates_total, 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[],
double &out_vscore[])
{
if(rates_total < m_period)
return;
// 1. Manage Internal Buffers
if(ArraySize(m_vwap_buf) != rates_total)
{
ArrayResize(m_vwap_buf, rates_total);
ArrayResize(m_vwap_odd, rates_total);
ArrayResize(m_vwap_even, rates_total);
}
// 2. Calculate VWAP Incrementally
m_vwap_calc.Calculate(rates_total, prev_calculated, time, open, high, low, close, tick_volume, volume, m_vwap_odd, m_vwap_even);
// 3. Calculate Standard Deviation of (Price - VWAP)
int start = (prev_calculated > m_period) ? prev_calculated - 1 : m_period;
for(int i = start; i < rates_total; i++)
{
double current_vwap = (m_vwap_odd[i] != EMPTY_VALUE && m_vwap_odd[i] != 0) ? m_vwap_odd[i] : m_vwap_even[i];
m_vwap_buf[i] = current_vwap;
if(current_vwap == 0 || current_vwap == EMPTY_VALUE)
{
out_vscore[i] = 0.0;
continue;
}
double sum_sq_diff = 0;
for(int k = 0; k < m_period; k++)
{
int idx = i - k;
double p = close[idx];
double v = m_vwap_buf[idx];
if(v == 0 || v == EMPTY_VALUE)
v = p;
double diff = p - v;
sum_sq_diff += diff * diff;
}
double std_dev = MathSqrt(sum_sq_diff / m_period);
if(std_dev > 1.0e-9)
out_vscore[i] = (close[i] - current_vwap) / std_dev;
else
out_vscore[i] = 0.0;
}
}
#endif // VSCORE_CALCULATOR_MQH
//+------------------------------------------------------------------+