//+------------------------------------------------------------------+
//|                QuarterTheory_VIZION_FINAL_v5.5.mq5               |
//|   COMPREHENSIVE LEVEL SYSTEM: Mix & Match Combinations           |
//|   (MA/Fib/MFIB/Stoch) x (Reject/Reclaim/Break) = Pullbacks      |
//|   Strong MAs: 50, 140, 230, 500 for Retracement Detection       |
//|   Counter: 50 SL, 3000 TP | Continuation: 150 SL, 4000 TP       |
//+------------------------------------------------------------------+
#property copyright "QuarterTheory x VIZION"
#property version   "5.50"
#property strict

#include <Trade/Trade.mqh>
CTrade Trade;

//================ INPUT PARAMETERS ==================//
input group "=== CORE SETTINGS ==="
input int      MagicNumber               = 456789;
input double   Risk_Per_Trade            = 1.2;
input int      Max_Trades_Per_Setup      = 10;
input int      Max_Total_Trades          = 100;
input int      Min_Runners_To_Keep       = 4;

input group "=== MARKET MODE SYSTEM ==="
input bool     Use_Market_Mode_Filter    = true;
input int      Mode_Confirmation_Bars    = 2;
input double   Chop_ATR_Threshold        = 0.5;
input double   Range_Price_Threshold     = 0.3;

input group "=== REVERSAL CONFIRMATION ==="
input bool     Only_Close_On_Full_Reversal = true;
input int      Reversal_Confirmation_Bars   = 3;

input group "=== MA SYSTEM ==="
input int      MA_1                      = 7;
input int      MA_2                      = 14;
input int      MA_3                      = 21;
input int      MA_4                      = 50;
input int      MA_5                      = 140;
input int      MA_6                      = 230;
input int      MA_7                      = 500;
input int      MA_8                      = 1000;
input int      MA_9                      = 1100;
input int      MA_10                     = 1300;
input int      MA_Touch_Buffer           = 100;

input group "=== STOCHASTIC ==="
input int      Stoch_K_Period            = 5;
input int      Stoch_D_Period            = 3;
input int      Stoch_Slowing             = 3;
input double   Stoch_Extreme_High        = 85.0;   // Extreme overbought
input double   Stoch_Extreme_Low         = 15.0;   // Extreme oversold
input double   Stoch_High                = 70.0;
input double   Stoch_Low                 = 30.0;

// STOCHASTIC KEY LEVELS for Pullback Detection
// OS (Oversold) Levels: <20, 20, 35, 50
// OB (Overbought) Levels: 50, 65, 80, >80
// K x D (or D x K) at ANY of these levels = pullback signal
double Stoch_Levels[7] = {20.0, 35.0, 50.0, 65.0, 80.0};  // Key pivot levels

input group "=== MOVING FIBONACCI (ATH/ATL) ==="
input int      MFIB_Lookback             = 500;   // Moving fib from ATH/ATL over this period
input bool     Use_MFIB_382_Bias         = true;  // Price > .382 = bull bias, < .382 = bear bias

input group "=== FIBONACCI ==="
input int      Lookback_Bars             = 200;
input bool     Show_Levels               = true;

input group "=== CONTINUATION TRADE SETTINGS ==="
input int      Continuation_SL_Points         = 150;
input int      Continuation_BreakEven_Points  = 300;
input int      Continuation_Trail_Points      = 300;
input int      Continuation_TP_Points         = 4000;
input int      Continuation_Partial_TP        = 900;
input double   Continuation_Partial_Percent   = 33.0;

input group "=== COUNTER-TREND TRADE SETTINGS (Pullback/Retracement/Range/Chop) ==="
input int      Counter_SL_Points              = 50;     // Tight SL
input int      Counter_BreakEven_Points       = 25;     // Fast BE
input int      Counter_Trail_Points           = 150;    // Trail by 150
input int      Counter_TP_Points              = 3000;   // Open TP for trend expansion
input int      Counter_Partial_TP             = 100;    // First partial
input double   Counter_Partial_Percent        = 50.0;   // Close 50% early

input group "=== BAND SNAP DETECTION ==="
input double   Band_Snap_ATR_Multiplier       = 2.0;

input group "=== RE-ENTRY SETTINGS ==="
input bool     Allow_Re_Entry            = true;
input int      Re_Entry_Cooldown_Bars    = 5;

//================ ENUMS ==================//
enum MODE_FAMILY
{
   FAMILY_TRENDING = 0,
   FAMILY_RANGING  = 1,
   FAMILY_CHOP     = 2,
   FAMILY_TRANSITIONAL = 3
};

enum TREND_BIAS
{
   BIAS_NEUTRAL = 0,
   BIAS_BULL    = 1,
   BIAS_BEAR    = -1
};

enum TREND_STRENGTH
{
   STRENGTH_WEAK = 0,
   STRENGTH_CONFIRMED = 1,
   STRENGTH_STRONG = 2
};

enum PRICE_STATE
{
   STATE_CONTINUATION = 0,
   STATE_PULLBACK = 1,
   STATE_DEEP_RETRACEMENT = 2,
   STATE_REVERSAL_ATTEMPT = 3,
   STATE_REVERSAL_CONFIRMED = 4,

   STATE_RANGE_MID_DRIFT = 10,
   STATE_RANGE_EDGE_TEST = 11,
   STATE_RANGE_REJECTION = 12,
   STATE_RANGE_BREAK_ATTEMPT = 13,
   STATE_RANGE_BREAK_CONFIRMED = 14,

   STATE_CHOP_NOISE = 20,
   STATE_CHOP_VOL_SPIKE = 21,
   STATE_CHOP_SQUEEZE = 22,
   STATE_CHOP_FAKEOUT_LOOP = 23,

   STATE_UNKNOWN = 99
};

enum SETUP_TYPE
{
   SETUP_MA14_CROSS     = 1,
   SETUP_MA50_BOUNCE    = 2,
   SETUP_MA140_BOUNCE   = 3,
   SETUP_MA230_BOUNCE   = 4,
   SETUP_MA500_TOUCH    = 5,
   SETUP_FIB_BREAK      = 6,
   SETUP_FIB_RECLAIM    = 7,
   SETUP_FIB_REJECT     = 8,
   SETUP_MAGNET_WALK    = 9,
   SETUP_STAIRCASE_ADV  = 10,
   SETUP_CTRL_PULLBACK  = 11,
   SETUP_TF_RESET       = 12,
   SETUP_MFIB_LADDER    = 13,
   SETUP_MFIB_PRESS     = 14,
   SETUP_MEAN_REV       = 15,
   SETUP_RANGE_ENGINE   = 16,
   SETUP_PULLBACK_COUNTER = 17,
   SETUP_RETRACEMENT_COUNTER = 18
};

enum TRADE_CATEGORY
{
   CATEGORY_CONTINUATION = 0,
   CATEGORY_COUNTER_TREND = 1
};

//================ GLOBALS ==================//
int Stoch_Handle, ATR_Handle, ADX_Handle;

double Stoch_K_Current = 0, Stoch_K_Previous = 0, Stoch_K_Prev2 = 0;
double Stoch_D_Current = 0;

double Current_ATR = 0;
double Current_ADX = 0;

double PriceLevels[7];

int MA_Handles[10];
double MA_Current[10];
double MA_Previous[10];
double MA_Prev2[10];

// Moving MFIB from ATH to ATL
double MFIB_High, MFIB_Low;
double MFIB_Level_236, MFIB_Level_382, MFIB_Level_050;
double MFIB_Level_618, MFIB_Level_786;

// MFIB .382 Bias
TREND_BIAS MFIB_Bias = BIAS_NEUTRAL;

MODE_FAMILY    Current_Family    = FAMILY_TRANSITIONAL;
TREND_BIAS     Current_Bias      = BIAS_NEUTRAL;
TREND_STRENGTH Current_Strength  = STRENGTH_WEAK;
PRICE_STATE    Current_State     = STATE_UNKNOWN;

MODE_FAMILY    Prev_Family       = FAMILY_TRANSITIONAL;
TREND_BIAS     Prev_Bias         = BIAS_NEUTRAL;
TREND_STRENGTH Prev_Strength     = STRENGTH_WEAK;

int Mode_Confirmation_Count = 0;
int Reversal_Confirm_Counter = 0;

bool MA7_Cross_14_Warning   = false;
bool MA7_Cross_21_Warning   = false;
bool MA50_Break_Warning     = false;

bool Fib_Reject_Warning     = false;
bool MFIB_Reject_Warning    = false;

bool Fib_Reclaim_Warning    = false;   // NEW: Fib reclaim signal
bool MFIB_Reclaim_Warning   = false;   // NEW: MFIB reclaim signal
bool Fib_Break_Warning      = false;   // NEW: Fib break signal
bool MFIB_Break_Warning     = false;   // NEW: MFIB break signal

bool MA_Reject_Warning      = false;
bool MA_Reclaim_Warning     = false;   // NEW: MA reclaim signal
bool MA_Break_Warning       = false;   // NEW: MA break signal

bool Stoch_Extreme_Warning  = false;
bool Stoch_Reject_Warning   = false;
bool Stoch_Level_Cross      = false;   // NEW: K x D at key level

// Strong MA warnings (140, 230, 500, 50)
bool MA50_Warning           = false;
bool MA140_Warning          = false;
bool MA230_Warning          = false;
bool MA500_Warning          = false;

bool Pullback_Warning       = false;
bool Retracement_Warning    = false;
bool Band_Snap_Warning      = false;

bool Is_Pullback_State      = false;
bool Is_Retracement_State   = false;

int  Warning_Confluence_Count = 0;
bool Warning_Confluence_3Plus = false;

struct PositionRec
{
   ulong ticket;
   double entry;
   double original_lot;
   bool is_buy;
   bool partial_tp_hit;
   bool be_set;
   bool trailing_active;
   bool is_runner;
   SETUP_TYPE setup_type;
   TRADE_CATEGORY category;
   string setup_name;
   MODE_FAMILY entry_family;
   TREND_BIAS entry_bias;
   TREND_STRENGTH entry_strength;
   double distance_from_current;
   datetime last_close_time;
};
PositionRec OpenPositions[];

int TodayTrades = 0;
int BuyTrades = 0;
int SellTrades = 0;
int ClosedByReversal = 0;

int SetupCount[19];
datetime LastEntryTime[19];

//================ HELPERS ==================//
double MidPrice()
{
   double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);
   double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
   return (bid + ask) / 2.0;
}

bool NearLevel(const double price, const double level, const double tolPoints)
{
   return (MathAbs(price - level) <= tolPoints * _Point);
}

bool StochCrossUp()
{
   return (Stoch_K_Previous < Stoch_D_Current && Stoch_K_Current >= Stoch_D_Current);
}

bool StochCrossDown()
{
   return (Stoch_K_Previous > Stoch_D_Current && Stoch_K_Current <= Stoch_D_Current);
}

bool IsBullBias() { return (Current_Bias == BIAS_BULL); }
bool IsBearBias() { return (Current_Bias == BIAS_BEAR); }

bool Bull_MA50_Reclaimed()
{
   bool reclaimed = (MA_Previous[0] <= MA_Previous[3]) && (MA_Current[0] > MA_Current[3]);
   double low0 = iLow(_Symbol, PERIOD_CURRENT, 0);
   double close0 = iClose(_Symbol, PERIOD_CURRENT, 0);
   bool rejected = (low0 <= MA_Current[3] && close0 > MA_Current[3] && (StochCrossUp() || Stoch_K_Current > 50));
   return (reclaimed || rejected);
}

bool Bear_MA50_Reclaimed()
{
   bool reclaimed = (MA_Previous[0] >= MA_Previous[3]) && (MA_Current[0] < MA_Current[3]);
   double high0 = iHigh(_Symbol, PERIOD_CURRENT, 0);
   double close0 = iClose(_Symbol, PERIOD_CURRENT, 0);
   bool rejected = (high0 >= MA_Current[3] && close0 < MA_Current[3] && (StochCrossDown() || Stoch_K_Current < 50));
   return (reclaimed || rejected);
}

bool CanReEnter(SETUP_TYPE setup)
{
   if(!Allow_Re_Entry) return true;
   
   datetime now = TimeCurrent();
   datetime cooldown_end = LastEntryTime[setup] + Re_Entry_Cooldown_Bars * PeriodSeconds(PERIOD_CURRENT);
   
   return (now >= cooldown_end);
}

//+------------------------------------------------------------------+
int OnInit()
{
   Print("========================================");
   Print("QuarterTheory_VIZION_FINAL v5.5");
   Print("MOVING MFIB (ATH/ATL) + .382 Bias");
   Print("COMPREHENSIVE LEVEL SYSTEM:");
   Print("  (MA/Fib/MFIB/Stoch) x (Reject/Reclaim/Break)");
   Print("  Strong MAs: 50, 140, 230, 500");
   Print("  Stoch Levels: 20, 35, 50, 65, 80");
   Print("Counter: 50 SL, 25 BE, 150 trail, 3000 TP");
   Print("Continuation: 150 SL, 300 BE, 300 trail, 4000 TP");
   Print("========================================");

   Trade.SetExpertMagicNumber(MagicNumber);
   Trade.SetDeviationInPoints(50);
   Trade.SetTypeFilling(ORDER_FILLING_FOK);

   Stoch_Handle = iStochastic(_Symbol, PERIOD_CURRENT, Stoch_K_Period, Stoch_D_Period,
                              Stoch_Slowing, MODE_SMA, STO_LOWHIGH);
   ATR_Handle = iATR(_Symbol, PERIOD_CURRENT, 14);
   ADX_Handle = iADX(_Symbol, PERIOD_CURRENT, 14);

   int periods[10] = {MA_1, MA_2, MA_3, MA_4, MA_5, MA_6, MA_7, MA_8, MA_9, MA_10};
   for(int i=0; i<10; i++)
      MA_Handles[i] = iMA(_Symbol, PERIOD_CURRENT, periods[i], 0, MODE_EMA, PRICE_CLOSE);

   ArrayInitialize(SetupCount, 0);
   ArrayInitialize(LastEntryTime, 0);

   CalculateLevels();
   if(Show_Levels) DrawLevels();

   return INIT_SUCCEEDED;
}

//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
   for(int i=0; i<10; i++)
      if(MA_Handles[i] != INVALID_HANDLE)
         IndicatorRelease(MA_Handles[i]);

   if(Stoch_Handle != INVALID_HANDLE) IndicatorRelease(Stoch_Handle);
   if(ATR_Handle != INVALID_HANDLE) IndicatorRelease(ATR_Handle);
   if(ADX_Handle != INVALID_HANDLE) IndicatorRelease(ADX_Handle);

   ObjectsDeleteAll(0, "Level_");
   ObjectsDeleteAll(0, "MFIB_");
   ObjectsDeleteAll(0, "ModeLabel");
   ObjectsDeleteAll(0, "StateLabel");
   ObjectsDeleteAll(0, "WarningLabel");
   ObjectsDeleteAll(0, "MFIBLabel");

   Print("Final: B:", BuyTrades, " | S:", SellTrades, " | Reversed:", ClosedByReversal);
}

//+------------------------------------------------------------------+
void CalculateLevels()
{
   // Static Fibonacci levels for reference
   double high = iHigh(_Symbol, PERIOD_CURRENT, 0);
   double low  = iLow(_Symbol, PERIOD_CURRENT, 0);

   for(int i=1; i<=Lookback_Bars; i++)
   {
      double h = iHigh(_Symbol, PERIOD_CURRENT, i);
      double l = iLow(_Symbol, PERIOD_CURRENT, i);
      if(h > high) high = h;
      if(l < low)  low = l;
   }

   double range = high - low;
   PriceLevels[0] = low;
   PriceLevels[1] = low + range * 0.236;
   PriceLevels[2] = low + range * 0.382;
   PriceLevels[3] = low + range * 0.5;
   PriceLevels[4] = low + range * 0.618;
   PriceLevels[5] = low + range * 0.786;
   PriceLevels[6] = high;

   // MOVING FIBONACCI - From ATH to ATL (stacked from top)
   double ath = iHigh(_Symbol, PERIOD_CURRENT, 0);
   double atl = iLow(_Symbol, PERIOD_CURRENT, 0);
   
   for(int i=1; i<=MFIB_Lookback; i++)
   {
      double h = iHigh(_Symbol, PERIOD_CURRENT, i);
      double l = iLow(_Symbol, PERIOD_CURRENT, i);
      if(h > ath) ath = h;
      if(l < atl) atl = l;
   }

   MFIB_High = ath;
   MFIB_Low  = atl;
   double mfib_range = ath - atl;
   
   // Levels stacked from ATH down to ATL
   MFIB_Level_236 = ath - (mfib_range * 0.236);  // 23.6% down from ATH
   MFIB_Level_382 = ath - (mfib_range * 0.382);  // 38.2% down from ATH *** KEY BIAS LEVEL ***
   MFIB_Level_050 = ath - (mfib_range * 0.500);  // 50% down from ATH
   MFIB_Level_618 = ath - (mfib_range * 0.618);  // 61.8% down from ATH *** KEY LEVEL ***
   MFIB_Level_786 = ath - (mfib_range * 0.786);  // 78.6% down from ATH

   // MFIB .382 Bias Logic
   if(Use_MFIB_382_Bias)
   {
      double current = MidPrice();
      
      if(current > MFIB_Level_382)
         MFIB_Bias = BIAS_BULL;   // Above .382 = bullish bias
      else if(current < MFIB_Level_382)
         MFIB_Bias = BIAS_BEAR;   // Below .382 = bearish bias
      else
         MFIB_Bias = BIAS_NEUTRAL;
   }
   else
   {
      MFIB_Bias = BIAS_NEUTRAL;
   }
}

void DrawLevels()
{
   ObjectsDeleteAll(0, "Level_");
   ObjectsDeleteAll(0, "MFIB_");
   
   color level_colors[7] = {clrRed, clrOrange, clrYellow, clrLime, clrCyan, clrBlue, clrMagenta};

   // Draw static fib levels
   for(int i=0; i<7; i++)
   {
      string name = "Level_" + IntegerToString(i);
      ObjectCreate(0, name, OBJ_HLINE, 0, 0, PriceLevels[i]);
      ObjectSetInteger(0, name, OBJPROP_COLOR, level_colors[i]);
      ObjectSetInteger(0, name, OBJPROP_STYLE, STYLE_DOT);
      ObjectSetInteger(0, name, OBJPROP_WIDTH, 1);
   }
   
   // Draw MFIB levels (more prominent)
   string mfib_name = "MFIB_382";
   ObjectCreate(0, mfib_name, OBJ_HLINE, 0, 0, MFIB_Level_382);
   ObjectSetInteger(0, mfib_name, OBJPROP_COLOR, clrYellow);
   ObjectSetInteger(0, mfib_name, OBJPROP_STYLE, STYLE_SOLID);
   ObjectSetInteger(0, mfib_name, OBJPROP_WIDTH, 2);
   
   mfib_name = "MFIB_618";
   ObjectCreate(0, mfib_name, OBJ_HLINE, 0, 0, MFIB_Level_618);
   ObjectSetInteger(0, mfib_name, OBJPROP_COLOR, clrCyan);
   ObjectSetInteger(0, mfib_name, OBJPROP_STYLE, STYLE_SOLID);
   ObjectSetInteger(0, mfib_name, OBJPROP_WIDTH, 2);
   
   mfib_name = "MFIB_050";
   ObjectCreate(0, mfib_name, OBJ_HLINE, 0, 0, MFIB_Level_050);
   ObjectSetInteger(0, mfib_name, OBJPROP_COLOR, clrWhite);
   ObjectSetInteger(0, mfib_name, OBJPROP_STYLE, STYLE_SOLID);
   ObjectSetInteger(0, mfib_name, OBJPROP_WIDTH, 1);
}

//+------------------------------------------------------------------+
void UpdateIndicators()
{
   for(int i=0; i<10; i++)
   {
      double curr[1], prev[1], prev2[1];
      if(CopyBuffer(MA_Handles[i], 0, 0, 1, curr) > 0)  MA_Current[i]  = curr[0];
      if(CopyBuffer(MA_Handles[i], 0, 1, 1, prev) > 0)  MA_Previous[i] = prev[0];
      if(CopyBuffer(MA_Handles[i], 0, 2, 1, prev2) > 0) MA_Prev2[i]    = prev2[0];
   }

   double k_curr[1], k_prev[1], k_prev2[1], d_curr[1];
   if(CopyBuffer(Stoch_Handle, MAIN_LINE, 0, 1, k_curr) > 0)  Stoch_K_Current  = k_curr[0];
   if(CopyBuffer(Stoch_Handle, MAIN_LINE, 1, 1, k_prev) > 0)  Stoch_K_Previous = k_prev[0];
   if(CopyBuffer(Stoch_Handle, MAIN_LINE, 2, 1, k_prev2) > 0) Stoch_K_Prev2    = k_prev2[0];
   if(CopyBuffer(Stoch_Handle, SIGNAL_LINE, 0, 1, d_curr) > 0) Stoch_D_Current = d_curr[0];

   double atr[1], adx[1];
   if(CopyBuffer(ATR_Handle, 0, 0, 1, atr) > 0) Current_ATR = atr[0];
   if(CopyBuffer(ADX_Handle, 0, 0, 1, adx) > 0) Current_ADX = adx[0];
}

//+------------------------------------------------------------------+
void DetectWarnings()
{
   double current = MidPrice();
   double bufferPts = (double)MA_Touch_Buffer;

   // Reset all warnings
   MA7_Cross_14_Warning  = false;
   MA7_Cross_21_Warning  = false;
   MA50_Break_Warning    = false;

   Fib_Reject_Warning    = false;
   MFIB_Reject_Warning   = false;
   Fib_Reclaim_Warning   = false;
   MFIB_Reclaim_Warning  = false;
   Fib_Break_Warning     = false;
   MFIB_Break_Warning    = false;

   MA_Reject_Warning     = false;
   MA_Reclaim_Warning    = false;
   MA_Break_Warning      = false;

   Stoch_Extreme_Warning = false;
   Stoch_Reject_Warning  = false;
   Stoch_Level_Cross     = false;

   MA50_Warning          = false;
   MA140_Warning         = false;
   MA230_Warning         = false;
   MA500_Warning         = false;

   Pullback_Warning      = false;
   Retracement_Warning   = false;
   Band_Snap_Warning     = false;

   //================================================================
   // 1) STOCHASTIC ANALYSIS
   //================================================================
   
   // A) Extreme levels
   if(Stoch_K_Current <= Stoch_Extreme_Low || Stoch_K_Current >= Stoch_Extreme_High)
      Stoch_Extreme_Warning = true;

   // B) Cross at key levels (20, 35, 50, 65, 80)
   bool k_crossed_d = false;
   bool near_key_level = false;
   
   // Check if K crossed D (either direction)
   if((Stoch_K_Previous < Stoch_D_Current && Stoch_K_Current >= Stoch_D_Current) ||
      (Stoch_K_Previous > Stoch_D_Current && Stoch_K_Current <= Stoch_D_Current))
   {
      k_crossed_d = true;
   }
   
   // Check if current stoch is near any key level
   for(int i=0; i<5; i++)
   {
      if(MathAbs(Stoch_K_Current - Stoch_Levels[i]) <= 5.0)
      {
         near_key_level = true;
         break;
      }
   }
   
   if(k_crossed_d && near_key_level)
      Stoch_Level_Cross = true;

   // C) Reject patterns (cross at meaningful bands)
   bool stoch_reject_down = (StochCrossDown() && Stoch_K_Current > 50);
   bool stoch_reject_up   = (StochCrossUp()   && Stoch_K_Current < 50);
   if(stoch_reject_down || stoch_reject_up || Stoch_Level_Cross)
      Stoch_Reject_Warning = true;

   //================================================================
   // 2) MA CROSS ANALYSIS
   //================================================================
   
   // MA7 x MA14 cross (pullback signal)
   bool ma7_crossed_14_down = (MA_Previous[0] > MA_Previous[1]) && (MA_Current[0] <= MA_Current[1]);
   bool ma7_crossed_14_up   = (MA_Previous[0] < MA_Previous[1]) && (MA_Current[0] >= MA_Current[1]);
   if(ma7_crossed_14_down || ma7_crossed_14_up)
   {
      MA7_Cross_14_Warning = true;
      Pullback_Warning = true;
   }

   // MA7 x MA21 cross (retracement signal)
   bool ma7_crossed_21_down = (MA_Previous[0] > MA_Previous[2]) && (MA_Current[0] <= MA_Current[2]);
   bool ma7_crossed_21_up   = (MA_Previous[0] < MA_Previous[2]) && (MA_Current[0] >= MA_Current[2]);
   if(ma7_crossed_21_down || ma7_crossed_21_up)
   {
      MA7_Cross_21_Warning = true;
      Retracement_Warning = true;
   }

   // MA50 break (reversal warning)
   bool ma7_broke_50_down = (MA_Previous[0] > MA_Previous[3]) && (MA_Current[0] <= MA_Current[3]);
   bool ma7_broke_50_up   = (MA_Previous[0] < MA_Previous[3]) && (MA_Current[0] >= MA_Current[3]);
   if(ma7_broke_50_down || ma7_broke_50_up)
      MA50_Break_Warning = true;

   //================================================================
   // 3) BAND SNAP
   //================================================================
   if(Current_ATR > 0.0)
   {
      double distance = MathAbs(current - MA_Current[0]);
      double band_threshold = Current_ATR * Band_Snap_ATR_Multiplier;
      if(distance >= band_threshold)
         Band_Snap_Warning = true;
   }

   //================================================================
   // 4) FIBONACCI LEVEL ANALYSIS (Reject, Reclaim, Break)
   //================================================================
   
   bool at_fib = false;
   int fib_level_idx = -1;
   
   for(int i=1; i<6; i++)
   {
      if(NearLevel(current, PriceLevels[i], bufferPts))
      {
         at_fib = true;
         fib_level_idx = i;
         break;
      }
   }
   
   if(at_fib)
   {
      double prev = iClose(_Symbol, PERIOD_CURRENT, 1);
      double fib_level = PriceLevels[fib_level_idx];
      
      // REJECT: Price hits level + stoch reject/extreme
      if(Stoch_Extreme_Warning || Stoch_Reject_Warning || Stoch_Level_Cross)
         Fib_Reject_Warning = true;
      
      // RECLAIM: Price crosses back above/below level
      if((prev < fib_level && current > fib_level) || (prev > fib_level && current < fib_level))
         Fib_Reclaim_Warning = true;
      
      // BREAK: Price decisively breaks through
      if(MathAbs(current - fib_level) > bufferPts * 1.5)
         Fib_Break_Warning = true;
   }

   //================================================================
   // 5) MFIB LEVEL ANALYSIS (Reject, Reclaim, Break)
   //================================================================
   
   bool at_mfib = false;
   double mfib_level = 0;
   
   double mfib_levels[5] = {MFIB_Level_236, MFIB_Level_382, MFIB_Level_050, MFIB_Level_618, MFIB_Level_786};
   
   for(int i=0; i<5; i++)
   {
      if(NearLevel(current, mfib_levels[i], bufferPts))
      {
         at_mfib = true;
         mfib_level = mfib_levels[i];
         break;
      }
   }
   
   if(at_mfib)
   {
      double prev = iClose(_Symbol, PERIOD_CURRENT, 1);
      
      // REJECT: Price hits MFIB + stoch signal
      if(Stoch_Extreme_Warning || Stoch_Reject_Warning || Stoch_Level_Cross)
         MFIB_Reject_Warning = true;
      
      // RECLAIM: Price crosses MFIB level
      if((prev < mfib_level && current > mfib_level) || (prev > mfib_level && current < mfib_level))
         MFIB_Reclaim_Warning = true;
      
      // BREAK: Price breaks through MFIB decisively
      if(MathAbs(current - mfib_level) > bufferPts * 1.5)
         MFIB_Break_Warning = true;
   }

   //================================================================
   // 6) STRONG MA ANALYSIS (50, 140, 230, 500)
   //================================================================
   
   // Check proximity to each strong MA
   bool at_ma50  = NearLevel(current, MA_Current[3], bufferPts);
   bool at_ma140 = NearLevel(current, MA_Current[4], bufferPts);
   bool at_ma230 = NearLevel(current, MA_Current[5], bufferPts);
   bool at_ma500 = NearLevel(current, MA_Current[6], bufferPts);
   
   if(at_ma50)  MA50_Warning  = true;
   if(at_ma140) MA140_Warning = true;
   if(at_ma230) MA230_Warning = true;
   if(at_ma500) MA500_Warning = true;
   
   // MA REJECT: At strong MA + stoch signal
   if((at_ma50 || at_ma140 || at_ma230 || at_ma500) && 
      (Stoch_Extreme_Warning || Stoch_Reject_Warning || Stoch_Level_Cross))
   {
      MA_Reject_Warning = true;
   }
   
   // MA RECLAIM: Price reclaims strong MA
   double prev = iClose(_Symbol, PERIOD_CURRENT, 1);
   
   if(at_ma50 && ((prev < MA_Current[3] && current > MA_Current[3]) || 
                  (prev > MA_Current[3] && current < MA_Current[3])))
      MA_Reclaim_Warning = true;
      
   if(at_ma140 && ((prev < MA_Current[4] && current > MA_Current[4]) || 
                   (prev > MA_Current[4] && current < MA_Current[4])))
      MA_Reclaim_Warning = true;
   
   // MA BREAK: Price breaks away from MA
   if((at_ma50 || at_ma140 || at_ma230) && MathAbs(current - MA_Current[3]) > bufferPts * 2)
      MA_Break_Warning = true;

   //================================================================
   // 7) PULLBACK CONFLUENCE
   // Mix and match: (MA, Fib, MFIB, Stoch) x (Reject, Reclaim, Break)
   //================================================================
   
   // Any 2+ of these combinations = pullback signal
   int pullback_signals = 0;
   
   if(MA7_Cross_14_Warning)   pullback_signals++;
   if(Fib_Reject_Warning)     pullback_signals++;
   if(MFIB_Reject_Warning)    pullback_signals++;
   if(MA_Reject_Warning)      pullback_signals++;
   if(Stoch_Level_Cross)      pullback_signals++;
   if(Band_Snap_Warning)      pullback_signals++;
   if(Fib_Reclaim_Warning)    pullback_signals++;
   if(MFIB_Reclaim_Warning)   pullback_signals++;
   if(MA_Reclaim_Warning)     pullback_signals++;
   
   if(pullback_signals >= 2)
      Pullback_Warning = true;

   //================================================================
   // 8) WARNING CONFLUENCE COUNT
   //================================================================
   Warning_Confluence_Count = 0;

   if(Stoch_Extreme_Warning)  Warning_Confluence_Count++;
   if(Stoch_Reject_Warning)   Warning_Confluence_Count++;
   if(Stoch_Level_Cross)      Warning_Confluence_Count++;
   
   if(MA7_Cross_14_Warning)   Warning_Confluence_Count++;
   if(MA7_Cross_21_Warning)   Warning_Confluence_Count++;
   if(MA50_Break_Warning)     Warning_Confluence_Count++;
   
   if(Fib_Reject_Warning)     Warning_Confluence_Count++;
   if(MFIB_Reject_Warning)    Warning_Confluence_Count++;
   if(MA_Reject_Warning)      Warning_Confluence_Count++;
   
   if(Fib_Reclaim_Warning)    Warning_Confluence_Count++;
   if(MFIB_Reclaim_Warning)   Warning_Confluence_Count++;
   if(MA_Reclaim_Warning)     Warning_Confluence_Count++;
   
   if(Band_Snap_Warning)      Warning_Confluence_Count++;
   
   if(MA50_Warning)           Warning_Confluence_Count++;
   if(MA140_Warning)          Warning_Confluence_Count++;
   if(MA230_Warning)          Warning_Confluence_Count++;
   if(MA500_Warning)          Warning_Confluence_Count++;

   Warning_Confluence_3Plus = (Warning_Confluence_Count >= 3);
}

//+------------------------------------------------------------------+
void DetectFamilyBiasStrength(MODE_FAMILY &family, TREND_BIAS &bias, TREND_STRENGTH &strength)
{
   double current = MidPrice();

   bool mas_aligned_bull = (MA_Current[0] > MA_Current[1]) && (MA_Current[1] > MA_Current[2]) && (MA_Current[2] > MA_Current[3]);
   bool mas_aligned_bear = (MA_Current[0] < MA_Current[1]) && (MA_Current[1] < MA_Current[2]) && (MA_Current[2] < MA_Current[3]);

   double recent_high = iHigh(_Symbol, PERIOD_CURRENT, 0);
   double recent_low  = iLow(_Symbol, PERIOD_CURRENT, 0);
   for(int i=1; i<20; i++)
   {
      recent_high = MathMax(recent_high, iHigh(_Symbol, PERIOD_CURRENT, i));
      recent_low  = MathMin(recent_low,  iLow(_Symbol, PERIOD_CURRENT, i));
   }
   double range_size = (recent_high - recent_low) / current;
   bool is_ranging = (range_size < Range_Price_Threshold);

   bool ma_clustered = false;
   if(Current_ATR > 0.0)
      ma_clustered = ((MathAbs(MA_Current[0] - MA_Current[3]) / Current_ATR) < Chop_ATR_Threshold);
   bool is_choppy = (ma_clustered || Current_ADX < 15);

   // Bias detection WITH MFIB .382 confirmation
   if(mas_aligned_bull && (MFIB_Bias == BIAS_BULL || !Use_MFIB_382_Bias))
      bias = BIAS_BULL;
   else if(mas_aligned_bear && (MFIB_Bias == BIAS_BEAR || !Use_MFIB_382_Bias))
      bias = BIAS_BEAR;
   else
   {
      // Use MFIB bias as tiebreaker when MAs not fully aligned
      if(MFIB_Bias == BIAS_BULL && MA_Current[0] > MA_Current[3])
         bias = BIAS_BULL;
      else if(MFIB_Bias == BIAS_BEAR && MA_Current[0] < MA_Current[3])
         bias = BIAS_BEAR;
      else if(MA_Current[0] > MA_Current[3])
         bias = BIAS_BULL;
      else if(MA_Current[0] < MA_Current[3])
         bias = BIAS_BEAR;
      else
         bias = BIAS_NEUTRAL;
   }

   if(is_choppy && !(mas_aligned_bull || mas_aligned_bear))
      family = FAMILY_CHOP;
   else if(is_ranging && !(mas_aligned_bull || mas_aligned_bear))
      family = FAMILY_RANGING;
   else if(bias != BIAS_NEUTRAL)
      family = FAMILY_TRENDING;
   else
      family = FAMILY_TRANSITIONAL;

   if(Current_ADX > 25 && (mas_aligned_bull || mas_aligned_bear))
      strength = STRENGTH_STRONG;
   else if(Current_ADX > 18 && (mas_aligned_bull || mas_aligned_bear))
      strength = STRENGTH_CONFIRMED;
   else
      strength = STRENGTH_WEAK;
}

//+------------------------------------------------------------------+
PRICE_STATE DetermineStateFromContext()
{
   if(Current_Family == FAMILY_RANGING)
   {
      double current = MidPrice();
      double bufferPts = (double)MA_Touch_Buffer;

      bool near_low  = NearLevel(current, PriceLevels[1], bufferPts) || NearLevel(current, PriceLevels[0], bufferPts);
      bool near_high = NearLevel(current, PriceLevels[5], bufferPts) || NearLevel(current, PriceLevels[6], bufferPts);

      if(near_low || near_high) return STATE_RANGE_EDGE_TEST;
      if(Stoch_Reject_Warning || Stoch_Extreme_Warning || Fib_Reject_Warning || MFIB_Reject_Warning) return STATE_RANGE_REJECTION;

      double close0 = iClose(_Symbol, PERIOD_CURRENT, 0);
      if(close0 > PriceLevels[6] || close0 < PriceLevels[0]) return STATE_RANGE_BREAK_CONFIRMED;
      if(NearLevel(current, PriceLevels[6], bufferPts) || NearLevel(current, PriceLevels[0], bufferPts)) return STATE_RANGE_BREAK_ATTEMPT;

      return STATE_RANGE_MID_DRIFT;
   }

   if(Current_Family == FAMILY_CHOP)
   {
      if(Current_ADX < 12 && !Stoch_Reject_Warning) return STATE_CHOP_NOISE;

      if(Current_ATR > 0)
      {
         double body = MathAbs(iClose(_Symbol, PERIOD_CURRENT, 0) - iOpen(_Symbol, PERIOD_CURRENT, 0));
         if((body / Current_ATR) > 1.2) return STATE_CHOP_VOL_SPIKE;

         double cluster = MathAbs(MA_Current[0] - MA_Current[3]) / Current_ATR;
         if(Current_ADX < 15 && cluster < 0.25) return STATE_CHOP_SQUEEZE;
      }

      if(Stoch_Reject_Warning) return STATE_CHOP_FAKEOUT_LOOP;
      return STATE_CHOP_NOISE;
   }

   bool ma7_above_14 = (MA_Current[0] > MA_Current[1]);
   bool ma7_above_21 = (MA_Current[0] > MA_Current[2]);
   bool ma7_above_50 = (MA_Current[0] > MA_Current[3]);
   bool ma14_above_50 = (MA_Current[1] > MA_Current[3]);
   bool ma21_above_50 = (MA_Current[2] > MA_Current[3]);

   bool ma7_below_14 = (MA_Current[0] < MA_Current[1]);
   bool ma7_below_21 = (MA_Current[0] < MA_Current[2]);
   bool ma7_below_50 = (MA_Current[0] < MA_Current[3]);
   bool ma14_below_50 = (MA_Current[1] < MA_Current[3]);
   bool ma21_below_50 = (MA_Current[2] < MA_Current[3]);

   bool structure_intact_bull = (ma14_above_50 && ma21_above_50);
   bool structure_intact_bear = (ma14_below_50 && ma21_below_50);

   bool pullbackSignal =
      (Pullback_Warning || MFIB_Reject_Warning || Fib_Reject_Warning || 
       Stoch_Reject_Warning || Band_Snap_Warning || Stoch_Level_Cross ||
       MFIB_Reclaim_Warning || Fib_Reclaim_Warning || MA_Reclaim_Warning);

   bool retraceSignal = (MA7_Cross_21_Warning || Retracement_Warning || 
                         MA140_Warning || MA230_Warning || MA500_Warning);

   // Strong MA warnings indicate deeper pullback (potential retracement/reversal)
   bool strongMA_pressure = (MA140_Warning || MA230_Warning || MA500_Warning || MA50_Warning);

   bool confluenceAligned = false;
   if(IsBullBias() && structure_intact_bull) confluenceAligned = Warning_Confluence_3Plus;
   if(IsBearBias() && structure_intact_bear) confluenceAligned = Warning_Confluence_3Plus;

   if(IsBullBias())
   {
      if(ma7_below_50 && !ma14_above_50 && !ma21_above_50) return STATE_REVERSAL_CONFIRMED;

      if(MA50_Break_Warning && (retraceSignal || strongMA_pressure || Stoch_Extreme_Warning || Stoch_Reject_Warning || Warning_Confluence_3Plus))
         return STATE_REVERSAL_ATTEMPT;

      // DEEP RETRACEMENT: MA7x21 cross OR testing strong MAs (140/230/500)
      if(MA7_Cross_21_Warning || strongMA_pressure || (!ma7_above_21 && (pullbackSignal || retraceSignal || confluenceAligned)))
         return STATE_DEEP_RETRACEMENT;

      // PULLBACK: MA7x14 cross OR 2+ pullback signals with structure intact
      if(MA7_Cross_14_Warning || (structure_intact_bull && (pullbackSignal || confluenceAligned)))
         return STATE_PULLBACK;

      return STATE_CONTINUATION;
   }

   if(IsBearBias())
   {
      if(ma7_above_50 && !ma14_below_50 && !ma21_below_50) return STATE_REVERSAL_CONFIRMED;

      if(MA50_Break_Warning && (retraceSignal || strongMA_pressure || Stoch_Extreme_Warning || Stoch_Reject_Warning || Warning_Confluence_3Plus))
         return STATE_REVERSAL_ATTEMPT;

      // DEEP RETRACEMENT: MA7x21 cross OR testing strong MAs (140/230/500)
      if(MA7_Cross_21_Warning || strongMA_pressure || (!ma7_below_21 && (pullbackSignal || retraceSignal || confluenceAligned)))
         return STATE_DEEP_RETRACEMENT;

      // PULLBACK: MA7x14 cross OR 2+ pullback signals with structure intact
      if(MA7_Cross_14_Warning || (structure_intact_bear && (pullbackSignal || confluenceAligned)))
         return STATE_PULLBACK;

      return STATE_CONTINUATION;
   }

   return STATE_UNKNOWN;
}

//+------------------------------------------------------------------+
string FamilyToText(MODE_FAMILY f)
{
   switch(f)
   {
      case FAMILY_TRENDING: return "Trending";
      case FAMILY_RANGING: return "Ranging";
      case FAMILY_CHOP: return "Chop";
      case FAMILY_TRANSITIONAL: return "Transitional";
   }
   return "Unknown";
}

string BiasToText(TREND_BIAS b)
{
   if(b == BIAS_BULL) return "Bull";
   if(b == BIAS_BEAR) return "Bear";
   return "Neutral";
}

string StrengthToText(TREND_STRENGTH s)
{
   switch(s)
   {
      case STRENGTH_WEAK: return "Weak";
      case STRENGTH_CONFIRMED: return "Confirmed";
      case STRENGTH_STRONG: return "Strong";
   }
   return "Weak";
}

string StateToText(PRICE_STATE s)
{
   switch(s)
   {
      case STATE_CONTINUATION: return "Continuation";
      case STATE_PULLBACK: return "Pullback";
      case STATE_DEEP_RETRACEMENT: return "Deep Retracement";
      case STATE_REVERSAL_ATTEMPT: return "Reversal Attempt";
      case STATE_REVERSAL_CONFIRMED: return "Reversal Confirmed";

      case STATE_RANGE_MID_DRIFT: return "Range: Mid Drift";
      case STATE_RANGE_EDGE_TEST: return "Range: Edge Test";
      case STATE_RANGE_REJECTION: return "Range: Rejection";
      case STATE_RANGE_BREAK_ATTEMPT: return "Range: Break Attempt";
      case STATE_RANGE_BREAK_CONFIRMED: return "Range: Break Confirmed";

      case STATE_CHOP_NOISE: return "Chop: Noise";
      case STATE_CHOP_VOL_SPIKE: return "Chop: Vol Spike";
      case STATE_CHOP_SQUEEZE: return "Chop: Squeeze";
      case STATE_CHOP_FAKEOUT_LOOP: return "Chop: Fakeout Loop";

      default: return "Unknown";
   }
}

//+------------------------------------------------------------------+
void UpdateLabels()
{
   ObjectDelete(0, "ModeLabel");
   ObjectCreate(0, "ModeLabel", OBJ_LABEL, 0, 0, 0);
   ObjectSetInteger(0, "ModeLabel", OBJPROP_CORNER, CORNER_LEFT_UPPER);
   ObjectSetInteger(0, "ModeLabel", OBJPROP_XDISTANCE, 10);
   ObjectSetInteger(0, "ModeLabel", OBJPROP_YDISTANCE, 20);

   string mode_text = "MODE: " + FamilyToText(Current_Family);
   if(Current_Family == FAMILY_TRENDING)
      mode_text += " | " + StrengthToText(Current_Strength) + " " + BiasToText(Current_Bias);

   color mode_color = clrYellow;
   if(Current_Family == FAMILY_TRENDING)
   {
      if(Current_Bias == BIAS_BULL) mode_color = (Current_Strength == STRENGTH_STRONG ? clrLime : (Current_Strength == STRENGTH_CONFIRMED ? clrGreenYellow : clrGreen));
      if(Current_Bias == BIAS_BEAR) mode_color = (Current_Strength == STRENGTH_STRONG ? clrRed  : (Current_Strength == STRENGTH_CONFIRMED ? clrOrangeRed : clrOrange));
   }
   else if(Current_Family == FAMILY_RANGING) mode_color = clrAqua;
   else if(Current_Family == FAMILY_CHOP) mode_color = clrViolet;

   ObjectSetString(0, "ModeLabel", OBJPROP_TEXT, mode_text);
   ObjectSetInteger(0, "ModeLabel", OBJPROP_COLOR, mode_color);
   ObjectSetInteger(0, "ModeLabel", OBJPROP_FONTSIZE, 12);

   // MFIB BIAS LABEL
   ObjectDelete(0, "MFIBLabel");
   if(Use_MFIB_382_Bias)
   {
      ObjectCreate(0, "MFIBLabel", OBJ_LABEL, 0, 0, 0);
      ObjectSetInteger(0, "MFIBLabel", OBJPROP_CORNER, CORNER_LEFT_UPPER);
      ObjectSetInteger(0, "MFIBLabel", OBJPROP_XDISTANCE, 10);
      ObjectSetInteger(0, "MFIBLabel", OBJPROP_YDISTANCE, 40);
      
      string mfib_text = "MFIB .382 BIAS: " + BiasToText(MFIB_Bias);
      color mfib_color = (MFIB_Bias == BIAS_BULL ? clrLime : (MFIB_Bias == BIAS_BEAR ? clrRed : clrGray));
      
      ObjectSetString(0, "MFIBLabel", OBJPROP_TEXT, mfib_text);
      ObjectSetInteger(0, "MFIBLabel", OBJPROP_COLOR, mfib_color);
      ObjectSetInteger(0, "MFIBLabel", OBJPROP_FONTSIZE, 11);
   }

   ObjectDelete(0, "StateLabel");
   ObjectCreate(0, "StateLabel", OBJ_LABEL, 0, 0, 0);
   ObjectSetInteger(0, "StateLabel", OBJPROP_CORNER, CORNER_LEFT_UPPER);
   ObjectSetInteger(0, "StateLabel", OBJPROP_XDISTANCE, 10);
   ObjectSetInteger(0, "StateLabel", OBJPROP_YDISTANCE, Use_MFIB_382_Bias ? 60 : 40);

   string state_text = "STATE: " + StateToText(Current_State);

   if(Current_Family == FAMILY_TRENDING && (Current_State == STATE_PULLBACK || Current_State == STATE_DEEP_RETRACEMENT))
   {
      if(IsBullBias() && !Bull_MA50_Reclaimed())
         state_text += " | ACTION: COUNTER-SELLS (50 SL)";
      else if(IsBearBias() && !Bear_MA50_Reclaimed())
         state_text += " | ACTION: COUNTER-BUYS (50 SL)";
      else
         state_text += " | ACTION: TREND-OK (150 SL)";
   }

   color state_color = clrWhite;
   if(Current_State == STATE_CONTINUATION) state_color = clrLime;
   else if(Current_State == STATE_PULLBACK) state_color = clrYellow;
   else if(Current_State == STATE_DEEP_RETRACEMENT) state_color = clrOrange;
   else if(Current_State == STATE_REVERSAL_ATTEMPT) state_color = clrOrangeRed;
   else if(Current_State == STATE_REVERSAL_CONFIRMED) state_color = clrRed;
   else if(Current_Family == FAMILY_RANGING) state_color = clrAqua;
   else if(Current_Family == FAMILY_CHOP) state_color = clrViolet;

   ObjectSetString(0, "StateLabel", OBJPROP_TEXT, state_text);
   ObjectSetInteger(0, "StateLabel", OBJPROP_COLOR, state_color);
   ObjectSetInteger(0, "StateLabel", OBJPROP_FONTSIZE, 11);

   bool anyWarn =
      (Stoch_Extreme_Warning || Stoch_Reject_Warning || Stoch_Level_Cross ||
       MA7_Cross_14_Warning || MA7_Cross_21_Warning ||
       MA50_Break_Warning || MA50_Warning || MA140_Warning || MA230_Warning || MA500_Warning ||
       Fib_Reject_Warning || MFIB_Reject_Warning ||
       Fib_Reclaim_Warning || MFIB_Reclaim_Warning || MA_Reclaim_Warning ||
       MA_Reject_Warning || Band_Snap_Warning || Warning_Confluence_3Plus);

   if(anyWarn)
   {
      ObjectDelete(0, "WarningLabel");
      ObjectCreate(0, "WarningLabel", OBJ_LABEL, 0, 0, 0);
      ObjectSetInteger(0, "WarningLabel", OBJPROP_CORNER, CORNER_LEFT_UPPER);
      ObjectSetInteger(0, "WarningLabel", OBJPROP_XDISTANCE, 10);
      ObjectSetInteger(0, "WarningLabel", OBJPROP_YDISTANCE, Use_MFIB_382_Bias ? 80 : 60);

      string warn_text = "WARN: ";
      if(Stoch_Extreme_Warning) warn_text += "STOCH-EXT | ";
      if(Stoch_Reject_Warning)  warn_text += "STOCH-REJ | ";
      if(Stoch_Level_Cross)     warn_text += "STOCH-LVL | ";
      if(MA7_Cross_14_Warning)  warn_text += "MA7x14-PB | ";
      if(MA7_Cross_21_Warning)  warn_text += "MA7x21-RET | ";
      if(MA50_Break_Warning)    warn_text += "MA50-BRK | ";
      if(MA50_Warning)          warn_text += "MA50 | ";
      if(MA140_Warning)         warn_text += "MA140 | ";
      if(MA230_Warning)         warn_text += "MA230 | ";
      if(MA500_Warning)         warn_text += "MA500 | ";
      if(Fib_Reject_Warning)    warn_text += "FIB-REJ | ";
      if(MFIB_Reject_Warning)   warn_text += "MFIB-REJ | ";
      if(Fib_Reclaim_Warning)   warn_text += "FIB-RCL | ";
      if(MFIB_Reclaim_Warning)  warn_text += "MFIB-RCL | ";
      if(MA_Reclaim_Warning)    warn_text += "MA-RCL | ";
      if(MA_Reject_Warning)     warn_text += "MA-REJ | ";
      if(Band_Snap_Warning)     warn_text += "BAND-SNAP | ";
      if(Warning_Confluence_3Plus) warn_text += "3+CONF | ";

      warn_text += "W=" + IntegerToString(Warning_Confluence_Count);

      ObjectSetString(0, "WarningLabel", OBJPROP_TEXT, warn_text);
      ObjectSetInteger(0, "WarningLabel", OBJPROP_COLOR, clrRed);
      ObjectSetInteger(0, "WarningLabel", OBJPROP_FONTSIZE, 10);
   }
   else
   {
      ObjectDelete(0, "WarningLabel");
   }
}

//+------------------------------------------------------------------+
void UpdateModeAndState()
{
   MODE_FAMILY detected_family;
   TREND_BIAS detected_bias;
   TREND_STRENGTH detected_strength;

   DetectFamilyBiasStrength(detected_family, detected_bias, detected_strength);

   Current_Family = detected_family;
   Current_Bias = detected_bias;
   Current_Strength = detected_strength;

   PRICE_STATE detected_state = DetermineStateFromContext();

   bool changed =
      (detected_family != Prev_Family) ||
      (detected_bias != Prev_Bias) ||
      (detected_strength != Prev_Strength);

   if(changed)
   {
      int required = Mode_Confirmation_Bars;
      if(detected_state == STATE_REVERSAL_CONFIRMED) required = 1;

      if(detected_family == Prev_Family && detected_bias == Prev_Bias && detected_strength == Prev_Strength)
      {
         Mode_Confirmation_Count++;
         if(Mode_Confirmation_Count >= required)
         {
            Prev_Family = detected_family;
            Prev_Bias = detected_bias;
            Prev_Strength = detected_strength;

            Current_Family = detected_family;
            Current_Bias = detected_bias;
            Current_Strength = detected_strength;
            Current_State = detected_state;

            Mode_Confirmation_Count = 0;
            Reversal_Confirm_Counter = 0;

            if(Current_State == STATE_REVERSAL_CONFIRMED)
               CloseOnFullReversal();
         }
      }
      else
      {
         Prev_Family = detected_family;
         Prev_Bias = detected_bias;
         Prev_Strength = detected_strength;
         Mode_Confirmation_Count = 1;
      }
   }
   else
   {
      Mode_Confirmation_Count = 0;
      Current_State = detected_state;
   }

   Is_Pullback_State = (Current_State == STATE_PULLBACK);
   Is_Retracement_State = (Current_State == STATE_DEEP_RETRACEMENT);

   UpdateLabels();
}

//+------------------------------------------------------------------+
void MarkRunners()
{
   double current = MidPrice();

   for(int i=0; i<ArraySize(OpenPositions); i++)
   {
      if(PositionSelectByTicket(OpenPositions[i].ticket))
      {
         double entry = OpenPositions[i].entry;
         OpenPositions[i].distance_from_current = MathAbs(current - entry) / _Point;
      }
   }

   for(int i=0; i<ArraySize(OpenPositions)-1; i++)
   {
      for(int j=i+1; j<ArraySize(OpenPositions); j++)
      {
         if(OpenPositions[j].distance_from_current > OpenPositions[i].distance_from_current)
         {
            PositionRec tmp = OpenPositions[i];
            OpenPositions[i] = OpenPositions[j];
            OpenPositions[j] = tmp;
         }
      }
   }

   for(int i=0; i<ArraySize(OpenPositions); i++)
      OpenPositions[i].is_runner = (i < Min_Runners_To_Keep);
}

//+------------------------------------------------------------------+
void CloseOnFullReversal()
{
   if(!Only_Close_On_Full_Reversal) return;

   MarkRunners();
   Print("🔄 REVERSAL CONFIRMED - Closing opposing positions (protecting runners)");

   for(int i=PositionsTotal()-1; i>=0; i--)
   {
      if(PositionGetTicket(i) == 0) continue;
      if(PositionGetString(POSITION_SYMBOL) != _Symbol) continue;
      if(PositionGetInteger(POSITION_MAGIC) != MagicNumber) continue;

      ulong ticket = PositionGetTicket(i);
      bool is_buy = (PositionGetInteger(POSITION_TYPE) == POSITION_TYPE_BUY);

      int idx = -1;
      for(int j=0; j<ArraySize(OpenPositions); j++)
      {
         if(OpenPositions[j].ticket == ticket) { idx = j; break; }
      }

      if(idx >= 0 && OpenPositions[idx].is_runner)
         continue;

      bool should_close = false;
      if(is_buy && IsBearBias()) should_close = true;
      if(!is_buy && IsBullBias()) should_close = true;

      if(should_close)
      {
         if(Trade.PositionClose(ticket))
            ClosedByReversal++;
      }
   }
}

//+------------------------------------------------------------------+
bool IsDirectionAllowed(bool is_buy)
{
   if(!Use_Market_Mode_Filter) return true;

   if(Current_Family == FAMILY_TRENDING)
   {
      if(Current_State == STATE_REVERSAL_CONFIRMED)
      {
         if(IsBullBias() && !is_buy) return false;
         if(IsBearBias() && is_buy)  return false;
         return true;
      }

      if(Current_State == STATE_PULLBACK || Current_State == STATE_DEEP_RETRACEMENT)
      {
         if(IsBullBias())
         {
            if(!Bull_MA50_Reclaimed())
               return (!is_buy); // SELLS ONLY
            return is_buy;
         }

         if(IsBearBias())
         {
            if(!Bear_MA50_Reclaimed())
               return (is_buy); // BUYS ONLY
            return (!is_buy);
         }
      }

      if(Current_State == STATE_CONTINUATION)
      {
         if(IsBullBias() && !is_buy) return false;
         if(IsBearBias() && is_buy)  return false;
         return true;
      }

      return true;
   }

   return true;
}

//+------------------------------------------------------------------+
int CountSetupTrades(SETUP_TYPE setup)
{
   int count = 0;
   for(int i=0; i<PositionsTotal(); i++)
   {
      if(PositionGetTicket(i) == 0) continue;
      if(PositionGetString(POSITION_SYMBOL) != _Symbol) continue;
      if(PositionGetInteger(POSITION_MAGIC) != MagicNumber) continue;

      ulong t = PositionGetTicket(i);

      for(int j=0; j<ArraySize(OpenPositions); j++)
      {
         if(OpenPositions[j].ticket == t)
         {
            if(OpenPositions[j].setup_type == setup)
               count++;
            break;
         }
      }
   }
   return count;
}

//+------------------------------------------------------------------+
double GetLotSize(TRADE_CATEGORY category)
{
   double risk = AccountInfoDouble(ACCOUNT_BALANCE) * Risk_Per_Trade / 100.0;
   double tickValue = SymbolInfoDouble(_Symbol, SYMBOL_TRADE_TICK_VALUE);
   double tickSize  = SymbolInfoDouble(_Symbol, SYMBOL_TRADE_TICK_SIZE);

   double sl_points = (category == CATEGORY_COUNTER_TREND) ? Counter_SL_Points : Continuation_SL_Points;

   double lot = risk / ((sl_points * _Point / tickSize) * tickValue);

   double minLot = SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MIN);
   double maxLot = SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MAX);
   double step   = SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_STEP);

   lot = MathMax(lot, minLot);
   lot = MathMin(lot, maxLot);
   lot = NormalizeDouble(lot / step, 0) * step;

   return lot;
}

//+------------------------------------------------------------------+
void OpenTrade(bool buy, double price, string setup_name, SETUP_TYPE setup_type, TRADE_CATEGORY category)
{
   if(!IsDirectionAllowed(buy)) return;
   if(!CanReEnter(setup_type)) return;

   if(CountSetupTrades(setup_type) >= Max_Trades_Per_Setup) return;
   if(PositionsTotal() >= Max_Total_Trades) return;

   datetime now = TimeCurrent();
   if(now - LastEntryTime[setup_type] < 1) return;

   double lot = GetLotSize(category);
   if(lot < SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MIN)) return;

   double sl, tp;
   
   if(category == CATEGORY_COUNTER_TREND)
   {
      sl = buy ? price - Counter_SL_Points * _Point : price + Counter_SL_Points * _Point;
      tp = buy ? price + Counter_TP_Points * _Point : price - Counter_TP_Points * _Point;
   }
   else
   {
      sl = buy ? price - Continuation_SL_Points * _Point : price + Continuation_SL_Points * _Point;
      tp = buy ? price + Continuation_TP_Points * _Point : price - Continuation_TP_Points * _Point;
   }

   string cat_text = (category == CATEGORY_COUNTER_TREND) ? "CTR" : "CONT";
   string bias_text = BiasToText(MFIB_Bias);
   string comment = setup_name + "|" + cat_text + "|" + FamilyToText(Current_Family) + "|" + bias_text;

   bool result = false;
   if(buy) result = Trade.Buy(lot, _Symbol, 0, sl, tp, comment);
   else    result = Trade.Sell(lot, _Symbol, 0, sl, tp, comment);

   if(result)
   {
      LastEntryTime[setup_type] = now;
      TodayTrades++;
      if(buy) BuyTrades++; else SellTrades++;
      SetupCount[setup_type]++;

      ulong ticket = Trade.ResultOrder();

      int size = ArraySize(OpenPositions);
      ArrayResize(OpenPositions, size+1);

      OpenPositions[size].ticket = ticket;
      OpenPositions[size].entry = price;
      OpenPositions[size].original_lot = lot;
      OpenPositions[size].is_buy = buy;
      OpenPositions[size].partial_tp_hit = false;
      OpenPositions[size].be_set = false;
      OpenPositions[size].trailing_active = false;
      OpenPositions[size].is_runner = false;
      OpenPositions[size].setup_type = setup_type;
      OpenPositions[size].category = category;
      OpenPositions[size].setup_name = setup_name;
      OpenPositions[size].entry_family = Current_Family;
      OpenPositions[size].entry_bias = Current_Bias;
      OpenPositions[size].entry_strength = Current_Strength;
      OpenPositions[size].distance_from_current = 0;
      OpenPositions[size].last_close_time = 0;
   }
}

//+------------------------------------------------------------------+
void ManagePositions()
{
   for(int i=PositionsTotal()-1; i>=0; i--)
   {
      ulong ticket = PositionGetTicket(i);
      if(ticket == 0) continue;
      if(PositionGetString(POSITION_SYMBOL) != _Symbol) continue;
      if(PositionGetInteger(POSITION_MAGIC) != MagicNumber) continue;

      int idx = -1;
      for(int j=0; j<ArraySize(OpenPositions); j++)
      {
         if(OpenPositions[j].ticket == ticket) { idx = j; break; }
      }
      if(idx == -1) continue;

      double entry = PositionGetDouble(POSITION_PRICE_OPEN);
      double current_sl = PositionGetDouble(POSITION_SL);
      double current_tp = PositionGetDouble(POSITION_TP);
      bool is_buy = OpenPositions[idx].is_buy;
      TRADE_CATEGORY cat = OpenPositions[idx].category;

      double current = is_buy ? SymbolInfoDouble(_Symbol, SYMBOL_BID) : SymbolInfoDouble(_Symbol, SYMBOL_ASK);
      double profit_points = is_buy ? (current - entry) / _Point : (entry - current) / _Point;

      int partial_tp_pts = (cat == CATEGORY_COUNTER_TREND) ? Counter_Partial_TP : Continuation_Partial_TP;
      double partial_pct = (cat == CATEGORY_COUNTER_TREND) ? Counter_Partial_Percent : Continuation_Partial_Percent;
      int be_pts = (cat == CATEGORY_COUNTER_TREND) ? Counter_BreakEven_Points : Continuation_BreakEven_Points;
      int trail_pts = (cat == CATEGORY_COUNTER_TREND) ? Counter_Trail_Points : Continuation_Trail_Points;

      if(!OpenPositions[idx].partial_tp_hit && profit_points >= partial_tp_pts)
      {
         double current_lot = PositionGetDouble(POSITION_VOLUME);
         double close_size = NormalizeDouble(OpenPositions[idx].original_lot * partial_pct / 100.0, 2);

         if(close_size > 0 && close_size <= current_lot)
         {
            if(Trade.PositionClosePartial(ticket, close_size))
               OpenPositions[idx].partial_tp_hit = true;
         }
      }

      if(!OpenPositions[idx].be_set && profit_points >= be_pts)
      {
         if((is_buy && current_sl < entry) || (!is_buy && current_sl > entry))
         {
            if(Trade.PositionModify(ticket, entry, current_tp))
               OpenPositions[idx].be_set = true;
         }
      }

      if(profit_points >= be_pts + 50)
      {
         OpenPositions[idx].trailing_active = true;

         double newSL = 0;
         bool should_modify = false;

         if(is_buy)
         {
            newSL = current - trail_pts * _Point;
            if(newSL > current_sl + 30 * _Point) should_modify = true;
         }
         else
         {
            newSL = current + trail_pts * _Point;
            if(newSL < current_sl - 30 * _Point) should_modify = true;
         }

         if(should_modify) Trade.PositionModify(ticket, newSL, current_tp);
      }
   }
}

//+------------------------------------------------------------------+
void OnTick()
{
   UpdateIndicators();
   DetectWarnings();

   static int tick_count = 0;
   tick_count++;
   if(tick_count >= 100)
   {
      CalculateLevels();
      if(Show_Levels) DrawLevels();
      tick_count = 0;
   }

   UpdateModeAndState();
   ManagePositions();

   double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);
   double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
   double current = (bid + ask) / 2.0;
   double previous = iClose(_Symbol, PERIOD_CURRENT, 1);
   double buffer = MA_Touch_Buffer * _Point;

   //=================================================================
   // PULLBACK COUNTER-TREND SETUPS (50 SL)
   //=================================================================
   if(Current_Family == FAMILY_TRENDING && Is_Pullback_State)
   {
      bool bull = IsBullBias();
      bool bear = IsBearBias();
      bool ma50_not_reclaimed = (bull && !Bull_MA50_Reclaimed()) || (bear && !Bear_MA50_Reclaimed());

      if(ma50_not_reclaimed)
      {
         int pb_signals = 0;
         if(MA7_Cross_14_Warning) pb_signals++;
         if(MFIB_Reject_Warning) pb_signals++;
         if(Band_Snap_Warning) pb_signals++;
         if(Stoch_Reject_Warning || Stoch_Extreme_Warning) pb_signals++;

         if(pb_signals >= 2)
         {
            if(bull) OpenTrade(false, bid, "PB-COUNTER-SELL", SETUP_PULLBACK_COUNTER, CATEGORY_COUNTER_TREND);
            if(bear) OpenTrade(true,  ask, "PB-COUNTER-BUY",  SETUP_PULLBACK_COUNTER, CATEGORY_COUNTER_TREND);
         }
      }
   }

   //=================================================================
   // RETRACEMENT COUNTER-TREND SETUPS (50 SL)
   //=================================================================
   if(Current_Family == FAMILY_TRENDING && Is_Retracement_State)
   {
      bool bull = IsBullBias();
      bool bear = IsBearBias();
      bool ma50_not_reclaimed = (bull && !Bull_MA50_Reclaimed()) || (bear && !Bear_MA50_Reclaimed());

      if(ma50_not_reclaimed)
      {
         int ret_signals = 0;
         if(MA7_Cross_21_Warning) ret_signals++;
         if(MFIB_Reject_Warning) ret_signals++;
         if(Band_Snap_Warning) ret_signals++;
         if(Stoch_Reject_Warning || Stoch_Extreme_Warning) ret_signals++;

         if(ret_signals >= 2)
         {
            if(bull) OpenTrade(false, bid, "RET-COUNTER-SELL", SETUP_RETRACEMENT_COUNTER, CATEGORY_COUNTER_TREND);
            if(bear) OpenTrade(true,  ask, "RET-COUNTER-BUY",  SETUP_RETRACEMENT_COUNTER, CATEGORY_COUNTER_TREND);
         }
      }
   }

   //=================================================================
   // CONTINUATION SETUPS (150 SL) - ALL 16 ORIGINAL SETUPS
   //=================================================================
   if(Current_Family == FAMILY_TRENDING && Current_State == STATE_CONTINUATION)
   {
      // 1. MA14 CROSS
      int ma14_crosses = 0;
      for(int i=0; i<10; i++) if(i != 1 && MA_Current[1] > MA_Current[i]) ma14_crosses++;
      if(ma14_crosses >= 2) OpenTrade(true, ask, "MA14-CROSS↑", SETUP_MA14_CROSS, CATEGORY_CONTINUATION);

      ma14_crosses = 0;
      for(int i=0; i<10; i++) if(i != 1 && MA_Current[1] < MA_Current[i]) ma14_crosses++;
      if(ma14_crosses >= 2) OpenTrade(false, bid, "MA14-CROSS↓", SETUP_MA14_CROSS, CATEGORY_CONTINUATION);

      // 2. MA50 BOUNCE
      if(MathAbs(current - MA_Current[3]) <= buffer)
      {
         OpenTrade(true, ask, "MA50-BOUNCE↑", SETUP_MA50_BOUNCE, CATEGORY_CONTINUATION);
         OpenTrade(false, bid, "MA50-BOUNCE↓", SETUP_MA50_BOUNCE, CATEGORY_CONTINUATION);
      }

      // 3. MA140 BOUNCE
      if(MathAbs(current - MA_Current[4]) <= buffer)
      {
         OpenTrade(true, ask, "MA140-BOUNCE↑", SETUP_MA140_BOUNCE, CATEGORY_CONTINUATION);
         OpenTrade(false, bid, "MA140-BOUNCE↓", SETUP_MA140_BOUNCE, CATEGORY_CONTINUATION);
      }

      // 4. MA230 BOUNCE
      if(MathAbs(current - MA_Current[5]) <= buffer)
      {
         OpenTrade(true, ask, "MA230-BOUNCE↑", SETUP_MA230_BOUNCE, CATEGORY_CONTINUATION);
         OpenTrade(false, bid, "MA230-BOUNCE↓", SETUP_MA230_BOUNCE, CATEGORY_CONTINUATION);
      }

      // 5. MA500 TOUCH
      if(MathAbs(current - MA_Current[6]) <= buffer)
      {
         OpenTrade(true, ask, "MA500-TOUCH↑", SETUP_MA500_TOUCH, CATEGORY_CONTINUATION);
         OpenTrade(false, bid, "MA500-TOUCH↓", SETUP_MA500_TOUCH, CATEGORY_CONTINUATION);
      }

      // 6. FIB BREAKS
      for(int i=1; i<6; i++)
      {
         if(MathAbs(current - PriceLevels[i]) <= buffer)
         {
            if(previous < PriceLevels[i])
               OpenTrade(true, ask, "FIB-BREAK↑", SETUP_FIB_BREAK, CATEGORY_CONTINUATION);
            if(previous > PriceLevels[i])
               OpenTrade(false, bid, "FIB-BREAK↓", SETUP_FIB_BREAK, CATEGORY_CONTINUATION);
         }
      }

      // 7. FIB RECLAIM
      for(int i=1; i<6; i++)
      {
         if(NearLevel(current, PriceLevels[i], buffer))
         {
            if(MA_Previous[0] < PriceLevels[i] && MA_Current[0] > PriceLevels[i])
               OpenTrade(true, ask, "FIB-RECLAIM↑", SETUP_FIB_RECLAIM, CATEGORY_CONTINUATION);
            if(MA_Previous[0] > PriceLevels[i] && MA_Current[0] < PriceLevels[i])
               OpenTrade(false, bid, "FIB-RECLAIM↓", SETUP_FIB_RECLAIM, CATEGORY_CONTINUATION);
         }
      }

      // 8. MAGNET WALK
      bool hugging = (Current_ATR > 0.0) ? (MathAbs(current - MA_Current[2]) / Current_ATR < 0.7) : false;
      if(hugging && MA_Current[0] > MA_Current[3])
         OpenTrade(true, ask, "MAGNET-WALK↑", SETUP_MAGNET_WALK, CATEGORY_CONTINUATION);
      if(hugging && MA_Current[0] < MA_Current[3])
         OpenTrade(false, bid, "MAGNET-WALK↓", SETUP_MAGNET_WALK, CATEGORY_CONTINUATION);

      // 9. MFIB LADDER (near MFIB levels)
      if(NearLevel(current, MFIB_Level_618, buffer) || NearLevel(current, MFIB_Level_382, buffer))
      {
         if(IsBullBias()) OpenTrade(true, ask, "MFIB-LADDER↑", SETUP_MFIB_LADDER, CATEGORY_CONTINUATION);
         if(IsBearBias()) OpenTrade(false, bid, "MFIB-LADDER↓", SETUP_MFIB_LADDER, CATEGORY_CONTINUATION);
      }
   }

   //=================================================================
   // RANGE SETUPS (50 SL) - Counter-trend parameters
   //=================================================================
   if(Current_Family == FAMILY_RANGING)
   {
      // Range edge entries
      if(MathAbs(current - PriceLevels[1]) < buffer && Stoch_K_Current < 35)
         OpenTrade(true, ask, "RANGE-BUY", SETUP_RANGE_ENGINE, CATEGORY_COUNTER_TREND);
      if(MathAbs(current - PriceLevels[5]) < buffer && Stoch_K_Current > 65)
         OpenTrade(false, bid, "RANGE-SELL", SETUP_RANGE_ENGINE, CATEGORY_COUNTER_TREND);

      // MFIB reject in range
      if(MFIB_Reject_Warning && (Stoch_Reject_Warning || Stoch_Extreme_Warning || Warning_Confluence_3Plus))
      {
         if(current <= MFIB_Level_050) OpenTrade(true,  ask, "RANGE-MFIB-BUY",  SETUP_RANGE_ENGINE, CATEGORY_COUNTER_TREND);
         if(current >= MFIB_Level_050) OpenTrade(false, bid, "RANGE-MFIB-SELL", SETUP_RANGE_ENGINE, CATEGORY_COUNTER_TREND);
      }

      // Fib reject in range
      if(Fib_Reject_Warning)
      {
         if(current <= PriceLevels[3]) OpenTrade(true,  ask, "RANGE-FIB-BUY",  SETUP_FIB_REJECT, CATEGORY_COUNTER_TREND);
         if(current >= PriceLevels[3]) OpenTrade(false, bid, "RANGE-FIB-SELL", SETUP_FIB_REJECT, CATEGORY_COUNTER_TREND);
      }
   }

   //=================================================================
   // CHOP SETUPS (50 SL) - Counter-trend parameters
   //=================================================================
   if(Current_Family == FAMILY_CHOP)
   {
      if(Stoch_Extreme_Warning || Stoch_Reject_Warning || Fib_Reject_Warning || MFIB_Reject_Warning || Warning_Confluence_3Plus)
      {
         if(Stoch_K_Current <= Stoch_Low)  OpenTrade(true,  ask, "CHOP-REV-BUY",  SETUP_MEAN_REV, CATEGORY_COUNTER_TREND);
         if(Stoch_K_Current >= Stoch_High) OpenTrade(false, bid, "CHOP-REV-SELL", SETUP_MEAN_REV, CATEGORY_COUNTER_TREND);
      }

      // Band snap in chop
      if(Band_Snap_Warning)
      {
         if(current < MA_Current[0]) OpenTrade(true,  ask, "CHOP-SNAP-BUY",  SETUP_MEAN_REV, CATEGORY_COUNTER_TREND);
         if(current > MA_Current[0]) OpenTrade(false, bid, "CHOP-SNAP-SELL", SETUP_MEAN_REV, CATEGORY_COUNTER_TREND);
      }
   }
}
//+------------------------------------------------------------------+