kci_embeded_ea_sniper_ver_1.mq5

#property version     "1.0"
#property description "EA Standalone: Embedded KCI + WPR + Trend Filter + Trailing Stop"

#include <Trade\Trade.mqh>

input group "=== Trade & Execution Filter ==="
input double InpLotSize = 0.01;            
input int    InpMaxSpread = 200;           // Maximum allowed spread in points
input ulong  InpMagicNumber = 77720262;    
input int    InpSlippage = 10;             // Slippage tolerance

input group "=== Risk Management ==="
input double InpEDMultiplierSL = 1.5;      
input double InpEDMultiplierTP = 3.0;      
input bool   InpUseTrailing = true;        // Enable Trailing Stop
input int    InpTrailingStart = 500;        // Points in profit to start trailing
input int    InpTrailingStep = 200;         // Step to move SL

input group "=== Trend Filter (MTF) ==="
input bool   InpUseTrendFilter = false;     // Enable Higher Timeframe Trend Filter
input ENUM_TIMEFRAMES InpTrendTF = PERIOD_H4;
input int    InpTrendPeriod = 200;         // Moving Average Period

input group "=== WPR & KCI Settings ==="
input int    InpWPRPeriod = 14;            
input double InpWPRBuyLevel = -80.0;       
input double InpWPRSellLevel = -20.0;      
input int    ZScorePeriod = 50;         
input double CompressionThreshold = 2.0; 
input int    BasePeriod = 14;           

CTrade         trade;
int            handle_wpr, handle_trend;
datetime       last_bar_time = 0;
double         buf_wpr[], buf_trend[];

double         vq[], kd[], ed[], pv[], Raw_KCI[];

int OnInit()
{
      // код доступен только после оплаты
   }

bool IsNewBar()
{
    datetime current_time = (datetime)SeriesInfoInteger(_Symbol, _Period, SERIES_LASTBAR_DATE);
    if(current_time != last_bar_time) { last_bar_time = current_time; return true; }
    return false;
}

double GetZScoreCustom(const double &data_array[], int start_index, int period)
{
    if(period < 2) return 0.0;
    double sum = 0.0, mean = 0.0, variance = 0.0, std_dev = 0.0;
    for(int i = 0; i < period; i++) sum += data_array[start_index + i];
    mean = sum / period;
    for(int i = 0; i < period; i++) variance += MathPow(data_array[start_index + i] - mean, 2);
    variance = variance / period;
    std_dev = MathSqrt(variance);
    if(std_dev == 0) return 0.0;
    return (data_array[start_index] - mean) / std_dev;
}

int GetEmbeddedKCISignal(double &out_ed)
{
    int total_bars = ZScorePeriod + BasePeriod + 10;
    double close[]; long tick_vol[];
    ArraySetAsSeries(close, true); ArraySetAsSeries(tick_vol, true);

    if(CopyClose(_Symbol, _Period, 0, total_bars, close) < total_bars) return 0;
    if(CopyTickVolume(_Symbol, _Period, 0, total_bars, tick_vol) < total_bars) return 0;

    for(int i = total_bars - BasePeriod - 1; i >= 1; i--)
    {
        double sum_price = 0, path_length = 0.000001;
        double net_dist = close[i] - close[i + BasePeriod];
        for(int j = 0; j < BasePeriod; j++) {
            sum_price += close[i + j];
            path_length += MathAbs(close[i + j] - c

Показано первые 50% кода (символов: 5586)