Untitled 1490

dumpykhan970

Apr 22nd, 2026

Never

Not a member of GistPad yet? Sign Up, it unlocks many cool features!

None 264.22 KB | None | 0 0

copy raw download clone embed print report

//+------------------------------------------------------------------+
//| AIBRAIN OTC v45.4 - OVERLAP + TIMER + SR + POPUP FIXED |
//| Fixed: Other pairs no overlap, text size 11, timer screen pos |
//| Fixed: SR lines stable (no shift), popup notification removed |
//+------------------------------------------------------------------+
#property copyright "AIBRAIN ULTIMATE - KM RANA"
#property version "46.2"
#property strict
#property indicator_chart_window
#define PFX "AIB9_"
#define VER "v46.2"
#define LB 18
#define MAX_LEVELS 5
#define MAX_REJ 50
#define LOOKBACK 50
input string SPM_FILE = "KM RANA";
input int HOLD_SEC = 60;
input int POS_X = 4;
input int POS_Y = 20;
input int DASH_W = 660;
input bool SHOW_TIMER = true;
input bool SHOW_SR_LINES = true;
input string ENTRY_MODE = "TIME";
input int FLAG_MIN_SEC = 10;
input int FLAG_MAX_SEC = 35;
input int TIME_MIN_SEC = 10;
input int TIME_MAX_SEC = 35;
input int MIN_REMAINING_SEC = 15;
input double REVERSAL_PCT = 30.0;
input double WICK_PCT = 0.65;
input int HRN_CONFIRM_BARS = 2;
input bool HA_ALIGN_FILTER = false;
input bool CONSENSUS_FILTER = false;
input bool ENABLE_NOTIFY = true;
input bool FAST_MODE = false;
input int BROKER_SPREAD_THRESHOLD= 6;
input double OTC_TRAP_WEIGHT = 15.0;
input int CROWD_EXTREME_PCT = 70;
input bool ENABLE_BROKER_KILLER = true;
input bool ENABLE_SESSION_FILTER = true;
input bool ENABLE_SPIKE_FILTER = true;
input bool ENABLE_LAST_SEC_BLOCK = true;
input bool ENABLE_RISK_CONTROL = true;
input bool ENABLE_ENTRY_ZONE = true;
input bool ML_ADAPTIVE = true;
input bool VOLUME_PROFILE_TRAP = true;
input bool MTF_CONFIRM = false;
input bool ENABLE_TELEGRAM = false;
input string TELEGRAM_TOKEN = "";
input string TELEGRAM_CHAT_ID = "";
input string TRADE_MODE = "NORMAL";
input string STRATEGY_MODE = "TRAP_ONLY";
input int STRATEGY_THRESHOLD = 75;
input int MAX_LOSS_STREAK = 2;
input double MIN_CONFIDENCE = 75.0;
input bool ENABLE_RISK_LOCK = true;
input double PATTERN_TOLERANCE_PIPS = 8.0;
input int MIN_PATTERN_SEPARATION = 5;
input bool SHOW_COMMON_POINTS = true;
input double COMMON_POINT_TOL_PIPS = 15.0;
input bool SHOW_WICK_REJECT_LINES = true;
input int WICK_MIN_TOUCHES = 1;
input double WICK_ZONE_PIPS = 15.0;
input int WICK_EXPIRE_BARS = 60;
// ============================================================
// BB PULLBACK SETTINGS
// ============================================================
input bool ENABLE_BB_PULLBACK = true;
input int BB_PERIOD = 20;
input double BB_DEVIATION = 2.0;
input int BB_SIGNAL_EXPIRE_BARS = 5;
// ============================================================
// ============================================================
// NCP PRO v7.3 SETTINGS — OTC BROKER KILLER + LEARNING ENGINE
// ============================================================
input bool ENABLE_MTG = true;
input int NCP_OpenNoiseSeconds = 3;
input int NCP_KillZoneSeconds = 55;
input double NCP_MaxSpreadPips = 4.0;
input int NCP_ATRPeriod = 14;
input double NCP_MinATRPips = 0.4; // Very low = more signals
input int NCP_FastEMA = 3;
input int NCP_MidEMA = 7;
input int NCP_SlowEMA = 15;
input bool NCP_UseM5Confirm = true;
input bool NCP_UseVolume = true;
input double NCP_RoundStepPips = 10.0;
input double NCP_RoundTolPips = 4.0;
input int NCP_MinProbMedium = 57; // Low threshold = more signals
input int NCP_MinProbStrong = 63;
input int NCP_MinProbExtreme = 70;
input bool NCP_UseRSINorm = true;
input int NCP_RSIPeriod = 10;
input double NCP_RSIBase = 50.0;
input double NCP_RSIM5Target = 45.0;
input double NCP_RSIM15Target = 40.0;
// Learning Engine
input bool ENABLE_LEARNING = true;
input string MEMORY_FILE_NAME = "NCP_Brain_v7.csv";
input int MIN_TRADES_TO_LEARN = 15;
input double LEARNING_STEP = 0.025;
// Trap Detection
input bool ENABLE_TRAP_DETECTION = true;
input int TRAP_LOOKBACK = 30;
#define NEON_GREEN C'0,255,100'
#define NEON_RED C'255,40,80'
#define NEON_YELLOW C'255,220,0'
#define NEON_ORANGE C'255,120,0'
#define NEON_CYAN C'0,255,200'
#define NEON_PURPLE C'200,0,255'
#define NEON_PINK C'255,80,180'
#define NEON_BLUE C'0,200,255'
#define NEON_LIME C'80,255,80'
#define NEON_GOLD C'255,180,0'
#define DARK_BLUE_NEON C'0,100,255'
#define NEON_WHITE C'220,230,255'
#define CGR C'160,170,190'
#define BB_GREY C'180,180,190'
#define BG_DARK1 C'6,8,16'
#define BG_DARK2 C'10,14,24'
#define BG_DARK3 C'14,20,32'
#define BG_DARK4 C'18,26,40'
struct HTFLevel{ double price; string timeframe; string type; datetime time; int strength; bool isRoundNumber; };
//+------------------------------------------------------------------+
// GLOBAL VARIABLES
//+------------------------------------------------------------------+
string g_haM1="",g_haM5="",g_haBoth="";
color g_haM1Color=clrGray,g_haM5Color=clrGray;
static double NW[36];
static double g_rsc=0,g_tfa=3;
static datetime g_spm_t=0,g_last_bar=0;
double ResLevels[MAX_LEVELS],SupLevels[MAX_LEVELS];
int resCount=0,supCount=0;
datetime lastSRBar=0;
static double g_nearest_res=0,g_nearest_sup=0;
static string g_brk_str="NO BRK";
static color g_brk_color=CGR;
struct RejLevel{double price;int touches;};
static RejLevel g_rj[MAX_REJ];
static int g_rj_cnt=0;
static double g_hrn_price=0;
static bool g_hrn_is_sup=true;
static int g_hrn_brk_bars=0;
static datetime g_hrn_scan_bar=0;
static string g_hrn_str="--";
static double g_hrn_score=0;
static bool g_hrn_confirmed_break=false;
static int g_otcCallPct=50,g_otcPutPct=50;
static string g_pairNames[8],g_pairSigs[8];
static double g_pairConfs[8];
static int g_pairCount=0;
static double g_frozen_gProb=50,g_frozen_rProb=50;
static string g_frozen_pAction="UNCERTAIN";
static color g_frozen_pColor=NEON_YELLOW;
static double g_calc_gProb=50,g_calc_rProb=50;
static string g_calc_pAction="UNCERTAIN";
static color g_calc_pColor=NEON_YELLOW;
static double g_gProb=50,g_rProb=50;
static string g_pAction="UNCERTAIN";
static color g_pColor=NEON_YELLOW;
static datetime g_last_freeze_bar=0;
static double g_accuracy=65.0;
static int g_acc_correct=0,g_acc_total=0;
static datetime g_acc_lastBar=0;
static double g_lastPredGreen=50.0;
static datetime g_lastPredBar=0;
static string g_finalSignal="WAIT";
static color g_finalColor=NEON_YELLOW;
static datetime g_signalTime=0;
static string g_lastNotified="";
static string g_marketMode="RANGE",g_prevMode="";
static int g_lossStreak=0;
static bool g_tradingStopped=false;
static string g_strategyType="NONE";
static string g_strategyReason="";
static double qmrA=0,qmrB=0,qmrC=0,qmrD=0;
static bool qmrActive=false;
static datetime qmrExpire=0;
#define MAX_COMMON_PTS 5
static double g_commonPrice[MAX_COMMON_PTS];
static datetime g_commonTime[MAX_COMMON_PTS];
static int g_commonCount=0;
static datetime g_commonExpire[MAX_COMMON_PTS];
static string g_commonType[MAX_COMMON_PTS];
static datetime g_lastCommonScan=0;
#define MAX_WICK_LINES 5
static double g_wickLinePrice[MAX_WICK_LINES];
static int g_wickLineTouches[MAX_WICK_LINES];
static datetime g_wickLineExpire[MAX_WICK_LINES];
static int g_wickLineCount=0;
static datetime g_lastWickScan=0;
static bool g_isSideways=false;
static string g_tfa_detail="";
static HTFLevel g_htfLevels[50];
static int g_htfLevelCount=0;
static bool g_mtfConfirmed=true;
static string g_filterStatus="ALL CLEAR";
static string g_adv1="WAIT KAR";
static string g_symbolKey="";
static double g_brokerBias=0.0;
// ============================================================
// BB PULLBACK GLOBAL VARIABLES - NEW
// ============================================================
static string g_bbSignal = "--"; // "CALL", "PUT", "--"
static color g_bbColor = CGR;
static double g_bbTouchPrice = 0.0; // Jahan BB touch hua
static datetime g_bbSignalTime = 0; // Signal kab aaya
static int g_bbSignalBars = 0; // Kitne bars ho gaye
static string g_bbDetail = ""; // Detail text
// 30-sec HA variables
static double g_ha30_open = 0.0;
static double g_ha30_close = 0.0;
static double g_ha30_high = 0.0;
static double g_ha30_low = 0.0;
static datetime g_ha30_bar = 0;
// Max grey lines on chart
#define MAX_BB_LINES 8
static double g_bbLinePrice[MAX_BB_LINES];
static datetime g_bbLineExpire[MAX_BB_LINES];
static string g_bbLineType[MAX_BB_LINES];
static int g_bbLineCount=0;
// ============================================================
// NCP PRO GLOBALS
// ============================================================
static string g_mtgState = "INIT";
static string g_mtgReason = "";
static string g_mtgAction = "";
static color g_mtgClr = CGR;
static double g_mtgHype = 50.0;
static double g_mtgBetrayal = 50.0;
static string g_mtgPattern = "";
static int g_mtgBullCount = 0;
static int g_mtgBearCount = 0;
static double g_mtgRecovery = 0.0;
static datetime g_mtg_lastBar = 0;
static double g_trapScore = 0;
// NCP Learning Engine globals
static double g_callWeight = 1.0;
static double g_putWeight = 1.0;
static int g_totalTrades = 0;
static int g_callTrades = 0;
static int g_putTrades = 0;
static int g_callWins = 0;
static int g_putWins = 0;
// Signal tracking for win/loss detection
static datetime g_ncpLastSignalTime = 0;
static string g_ncpLastSignalType = "";
static double g_ncpLastEntryPrice = 0.0;
static bool g_ncpSignalProcessed = true;
// Score smoothing — gradual build, no sudden spikes
static double g_smoothCallScore = 50.0;
static double g_smoothPutScore = 50.0;
//+------------------------------------------------------------------+
// 30-SECOND HA CANDLE - BACKTESTING SAFE VERSION
// Strategy: Current M1 candle ke current tick se live HA banao
// Backtesting mein bhi kaam karta hai kyunki Time[] arrays use karta hai
// elapsed time dependent NAHI hai - pure price-based hai
//+------------------------------------------------------------------+
void Calc30SecHA(){
if(Bars < 5) return;
// Current live candle (index 0) - live tick data
double cur_open = Open[0];
double cur_high = High[0];
double cur_low = Low[0];
double cur_close = Close[0];
// Prev fully closed candle (index 1) - confirmed data
double prev_open = Open[1];
double prev_high = High[1];
double prev_low = Low[1];
double prev_close = Close[1];
// HA for prev closed candle
double haC_prev = (prev_open + prev_high + prev_low + prev_close) / 4.0;
double haC_prev2 = (Open[2] + High[2] + Low[2] + Close[2]) / 4.0;
double haO_prev2 = (Open[3] + Close[3]) / 2.0;
double haO_prev = (haO_prev2 + haC_prev2) / 2.0;
// HA for current live candle
double haC_cur = (cur_open + cur_high + cur_low + cur_close) / 4.0;
double haO_cur = (haO_prev + haC_prev) / 2.0; // Standard HA open
g_ha30_open = haO_cur;
g_ha30_close = haC_cur;
g_ha30_high = cur_high;
g_ha30_low = cur_low;
g_ha30_bar = Time[0];
}
bool Is30SecHABull(){ return (g_ha30_close > g_ha30_open); }
bool Is30SecHABear(){ return (g_ha30_close < g_ha30_open); }
//+------------------------------------------------------------------+
// BB PULLBACK DETECTION - FIXED
// Color logic:
// CALL signal → GREEN
// PUT signal → RED
// No signal → YELLOW (normal/wait state)
//+------------------------------------------------------------------+
void DetectBBPullback(){
if(!ENABLE_BB_PULLBACK || Bars < BB_PERIOD + 5) return;
Calc30SecHA();
double bbUpper1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 1);
double bbLower1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 1);
double bbUpper0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 0);
double bbLower0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 0);
double bbMid0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_MAIN, 0);
if(bbUpper1 <= 0 || bbLower1 <= 0) return;
bool ha30Bull = Is30SecHABull();
bool ha30Bear = Is30SecHABear();
// ============================================================
// ADX + RSI CONFIRMATION - NEW
// ============================================================
double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
double plusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
bool adxBear = (minusDI > plusDI);
bool adxBull = (plusDI > minusDI);
bool adxActive = (adx >= 15);
bool adxStrong = (adx >= 20);
bool rsiOverbought = (rsi >= 60);
bool rsiOversold = (rsi <= 40);
bool rsiExtremeOB = (rsi >= 70);
bool rsiExtremeOS = (rsi <= 30);
// PUT confirmation score
int putConfirm = 0;
if(ha30Bear) putConfirm++;
if(adxBear) putConfirm++;
if(rsiOverbought) putConfirm++;
if(rsiExtremeOB) putConfirm++;
// CALL confirmation score
int callConfirm = 0;
if(ha30Bull) callConfirm++;
if(adxBull) callConfirm++;
if(rsiOversold) callConfirm++;
if(rsiExtremeOS) callConfirm++;
string adxStr = "ADX:"+DoubleToString(adx,0)+(adxStrong?"*":"");
string rsiStr = "RSI:"+DoubleToString(rsi,0);
string diStr = (adxBull?"DI^":adxBear?"DIv":"DI=");
// Expire check
if(g_bbSignal != "--" && g_bbSignalTime > 0){
int barsElapsed = (int)((TimeCurrent() - g_bbSignalTime) / (Period() * 60));
if(barsElapsed > BB_SIGNAL_EXPIRE_BARS){
g_bbSignal = "--"; g_bbColor = NEON_YELLOW;
g_bbDetail = ""; g_bbTouchPrice = 0.0;
}
}
bool touchedUpper = (High[1] >= bbUpper1 * 0.9998);
bool touchedLower = (Low[1] <= bbLower1 * 1.0002);
bool wickUpper = (High[1] > bbUpper1 && Close[1] < bbUpper1);
bool wickLower = (Low[1] < bbLower1 && Close[1] > bbLower1);
string newSignal = "--";
double touchPriceNew = 0.0;
string detailNew = "";
color newColor = NEON_YELLOW;
// PUT: BB upper + min 2 confirmations
if((touchedUpper || wickUpper) && putConfirm >= 2){
newSignal = "PUT";
touchPriceNew = bbUpper1;
string conf = (putConfirm>=4)?"STRONG":(putConfirm>=3)?"GOOD":"WEAK";
detailNew = "BB UP|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr;
newColor = (putConfirm >= 3) ? NEON_RED : NEON_ORANGE;
}
// CALL: BB lower + min 2 confirmations
else if((touchedLower || wickLower) && callConfirm >= 2){
newSignal = "CALL";
touchPriceNew = bbLower1;
string conf = (callConfirm>=4)?"STRONG":(callConfirm>=3)?"GOOD":"WEAK";
detailNew = "BB LO|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr;
newColor = (callConfirm >= 3) ? NEON_GREEN : NEON_CYAN;
}
if(newSignal != "--"){
bool isNew = (newSignal != g_bbSignal || touchPriceNew != g_bbTouchPrice);
if(isNew){
g_bbSignal = newSignal;
g_bbTouchPrice = touchPriceNew;
g_bbSignalTime = TimeCurrent();
g_bbDetail = detailNew;
g_bbColor = newColor;
AddBBLine(touchPriceNew, newSignal);
Print("BB PULLBACK: ",newSignal," | ",detailNew," Conf:",(newSignal=="PUT"?putConfirm:callConfirm),"/4");
}
} else if(g_bbSignal == "--"){
g_bbColor = NEON_YELLOW;
}
DrawBBLines(bbUpper0, bbLower0, bbMid0);
}
//+------------------------------------------------------------------+
// BB LINES DRAW ON CHART
//+------------------------------------------------------------------+
void DrawBBLines(double upper, double lower, double mid){
if(!ENABLE_BB_PULLBACK) return;
// Upper BB - grey dashed line
string nmU = PFX+"BB_UPPER";
SafeDel(nmU);
if(upper > 0){
ObjectCreate(0, nmU, OBJ_HLINE, 0, 0, upper);
ObjectSetInteger(0, nmU, OBJPROP_COLOR, BB_GREY);
ObjectSetInteger(0, nmU, OBJPROP_WIDTH, 1);
ObjectSetInteger(0, nmU, OBJPROP_STYLE, STYLE_DASH);
ObjectSetInteger(0, nmU, OBJPROP_BACK, false);
}
// Lower BB - grey dashed line
string nmL = PFX+"BB_LOWER";
SafeDel(nmL);
if(lower > 0){
ObjectCreate(0, nmL, OBJ_HLINE, 0, 0, lower);
ObjectSetInteger(0, nmL, OBJPROP_COLOR, BB_GREY);
ObjectSetInteger(0, nmL, OBJPROP_WIDTH, 1);
ObjectSetInteger(0, nmL, OBJPROP_STYLE, STYLE_DASH);
ObjectSetInteger(0, nmL, OBJPROP_BACK, false);
}
// Mid BB - lighter grey dot line
string nmM = PFX+"BB_MID";
SafeDel(nmM);
if(mid > 0){
ObjectCreate(0, nmM, OBJ_HLINE, 0, 0, mid);
ObjectSetInteger(0, nmM, OBJPROP_COLOR, C'100,100,110');
ObjectSetInteger(0, nmM, OBJPROP_WIDTH, 1);
ObjectSetInteger(0, nmM, OBJPROP_STYLE, STYLE_DOT);
ObjectSetInteger(0, nmM, OBJPROP_BACK, false);
}
// Labels
int dg = (int)MarketInfo(Symbol(), MODE_DIGITS);
if(dg <= 0) dg = 5;
string lblU = PFX+"BB_U_LBL";
SafeDel(lblU);
if(upper > 0 && Bars > 2){
ObjectCreate(0, lblU, OBJ_TEXT, 0, Time[2], upper);
ObjectSetText(lblU, "BB("+IntegerToString(BB_PERIOD)+")", 8, "Arial", BB_GREY);
ObjectSetInteger(0, lblU, OBJPROP_BACK, false);
}
}
//+------------------------------------------------------------------+
// ADD BB TOUCH LINE — sirf 1 line at a time (latest signal wali)
void AddBBLine(double price, string sigType){
if(price <= 0) return;
// Pehli sab purani BB touch lines delete karo
for(int i = 0; i < MAX_BB_LINES; i++){
SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i));
SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i));
}
g_bbLineCount = 0;
// Sirf naya ek line add karo
g_bbLinePrice[0] = price;
g_bbLineExpire[0] = TimeCurrent() + 60 * BB_SIGNAL_EXPIRE_BARS;
g_bbLineType[0] = sigType;
g_bbLineCount = 1;
DrawAllBBTouchLines();
}
void DrawAllBBTouchLines(){
// Clean all slots
for(int i = 0; i < MAX_BB_LINES; i++){
SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i));
SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i));
}
// Remove expired
if(g_bbLineCount > 0 && TimeCurrent() > g_bbLineExpire[0]){
g_bbLineCount = 0;
return;
}
if(g_bbLineCount <= 0) return;
int dg = (int)MarketInfo(Symbol(), MODE_DIGITS);
if(dg <= 0) dg = 5;
// Draw only the single active line
string nm = PFX+"BB_TOUCH_0";
string lbl = PFX+"BB_TOUCH_LBL_0";
ObjectCreate(0, nm, OBJ_HLINE, 0, 0, g_bbLinePrice[0]);
ObjectSetInteger(0, nm, OBJPROP_COLOR, BB_GREY);
ObjectSetInteger(0, nm, OBJPROP_WIDTH, 2);
ObjectSetInteger(0, nm, OBJPROP_STYLE, STYLE_SOLID);
ObjectSetInteger(0, nm, OBJPROP_BACK, false);
if(Bars > 3){
string txt = (g_bbLineType[0]=="CALL") ? "BB^ CALL" : "BBv PUT";
color lc = (g_bbLineType[0]=="CALL") ? NEON_GREEN : NEON_RED;
ObjectCreate(0, lbl, OBJ_TEXT, 0, Time[3], g_bbLinePrice[0]);
ObjectSetText(lbl, txt, 8, "Arial Bold", lc);
ObjectSetInteger(0, lbl, OBJPROP_BACK, false);
}
}
//+------------------------------------------------------------------+
// MTG AI - MOMENTUM TRAP GAUGE
// 1-minute OTC ke liye: 3-5 candle patterns detect karta hai
// States: SLEEPING → HYPE → SETUP → SCAM/RECOVERY
//
// Pattern Logic:
// 1. HYPE: 3+ bull candles streak, expanding body, high volume
// 2. SETUP: Current candle red banana shuru hua
// 3. SCAM: Fakeout + wick trap + body reversal confirm
// 4. RECOVERY: Price mid-zone tak wapas aaya = CALL signal
//+------------------------------------------------------------------+
// ============================================================
// NCP PRO — NEXT CANDLE PREDICTOR PRO
// RSI Multi-Timeframe Normalized + EMA Trend + Volume + Patterns
// Runs every tick, updates g_mtgState/g_mtgHype/g_mtgBetrayal
// ============================================================
// ============================================================
// NCP PRO v4.2 — OTC BROKER KILLER | TRAP REVERSAL
// Best of v4.1 + AIBRAIN integration
// Signals: CALL / PUT / PUT TRAP / CALL TRAP / WAIT
// ============================================================
// ============================================================
// NCP PRO v7.3 — BROKER KILLER + LEARNING ENGINE
// Signal smoothing: no sudden spikes, gradual build
// Learning: tracks wins/losses, adjusts weights carefully
// Trap: engulfing + wick patterns + crowd run
// ============================================================
// --- LEARNING ENGINE FUNCTIONS ---
void LoadBrainMemory(){
if(!ENABLE_LEARNING) return;
int h=FileOpen(MEMORY_FILE_NAME,FILE_READ|FILE_CSV|FILE_SHARE_READ);
if(h!=INVALID_HANDLE){
if(FileSize(h)>10){
g_totalTrades=(int)FileReadNumber(h);
g_callTrades =(int)FileReadNumber(h);
g_putTrades =(int)FileReadNumber(h);
g_callWins =(int)FileReadNumber(h);
g_putWins =(int)FileReadNumber(h);
g_callWeight =FileReadNumber(h);
g_putWeight =FileReadNumber(h);
// Guard against bad values
if(g_callWeight<0.2||g_callWeight>1.8) g_callWeight=1.0;
if(g_putWeight <0.2||g_putWeight >1.8) g_putWeight =1.0;
Print("NCP Brain loaded: ",g_totalTrades," trades | CW:",DoubleToString(g_callWeight,3)," PW:",DoubleToString(g_putWeight,3));
}
FileClose(h);
}
}
void SaveBrainMemory(){
if(!ENABLE_LEARNING) return;
int h=FileOpen(MEMORY_FILE_NAME,FILE_WRITE|FILE_CSV|FILE_SHARE_WRITE);
if(h!=INVALID_HANDLE){
FileWrite(h,g_totalTrades);FileWrite(h,g_callTrades);FileWrite(h,g_putTrades);
FileWrite(h,g_callWins);FileWrite(h,g_putWins);
FileWrite(h,g_callWeight);FileWrite(h,g_putWeight);
FileClose(h);
}
}
void UpdateBrain(string sig,bool win){
if(!ENABLE_LEARNING) return;
g_totalTrades++;
if(sig=="CALL"){g_callTrades++;if(win)g_callWins++;}
else if(sig=="PUT"){g_putTrades++;if(win)g_putWins++;}
if(g_totalTrades < MIN_TRADES_TO_LEARN){ SaveBrainMemory(); return; }
double adj=LEARNING_STEP;
// Adaptive: winning = boost, losing = reduce (but carefully)
if(sig=="CALL"){
double wr=(g_callTrades>0)?(double)g_callWins/g_callTrades:0.5;
double adaptive=adj*(wr-0.5)*2.0;
if(win) g_callWeight=MathMin(1.8,g_callWeight+adj+adaptive);
else g_callWeight=MathMax(0.3,g_callWeight-adj*1.5+adaptive);
// Noise guard: don't let weight collapse too fast
if(g_callTrades<MIN_TRADES_TO_LEARN+5) g_callWeight=MathMax(0.6,g_callWeight);
} else if(sig=="PUT"){
double wr=(g_putTrades>0)?(double)g_putWins/g_putTrades:0.5;
double adaptive=adj*(wr-0.5)*2.0;
if(win) g_putWeight=MathMin(1.8,g_putWeight+adj+adaptive);
else g_putWeight=MathMax(0.3,g_putWeight-adj*1.5+adaptive);
if(g_putTrades<MIN_TRADES_TO_LEARN+5) g_putWeight=MathMax(0.6,g_putWeight);
}
SaveBrainMemory();
}
void CheckPreviousResult(){
if(g_ncpSignalProcessed||g_ncpLastSignalType==""||g_ncpLastSignalTime==0) return;
// Check if enough time passed (at least 1 bar closed)
if(Time[0]==g_ncpLastSignalTime) return;
// Use bar that closed AFTER signal (bar index 1)
double sigOpen =iOpen(NULL,PERIOD_M1,1);
double sigClose=iClose(NULL,PERIOD_M1,1);
// Win logic: check price movement vs entry
bool win=false;
if(g_ncpLastSignalType=="CALL")
win=(sigClose>sigOpen); // Candle closed higher = WIN
else if(g_ncpLastSignalType=="PUT")
win=(sigClose<sigOpen); // Candle closed lower = WIN
// IMPORTANT: Mark as processed BEFORE UpdateBrain
g_ncpSignalProcessed=true;
UpdateBrain(g_ncpLastSignalType,win);
Print("NCP Result: ",g_ncpLastSignalType," ",win?"WIN":"LOSS"," | Trades:",g_totalTrades,
" | CW:",DoubleToString(g_callWeight,3)," PW:",DoubleToString(g_putWeight,3));
}
// --- BROKER TRAP CALCULATOR (v7.3 FIXED) ---
// Uses recent bars (1-15) instead of old bars (3-30)
// Includes live candle (index 0) for real-time trap detection
double CalculateBrokerTrap(double callBias,double putBias){
if(!ENABLE_TRAP_DETECTION||Bars<20) return 0;
double trapScore=0;
bool jpy=(StringFind(Symbol(),"JPY")>=0);
double pip=jpy?0.01:0.0001;
// === CHECK RECENT BARS (1-15) - FIXED: was 3-30 ===
for(int i=1;i<=15&&i<Bars-1;i++){
// Engulfing patterns
bool bullEngulf=(Close[i]>Open[i])&&(Close[i-1]<Open[i-1])&&
(Close[i]>=Open[i-1])&&(Open[i]<=Close[i-1]);
bool bearEngulf=(Close[i]<Open[i])&&(Close[i-1]>Open[i-1])&&
(Close[i]<=Open[i-1])&&(Open[i]>=Close[i-1]);
// Star patterns (3 candle)
if(i>=2){
bool mornStar=(Close[i-2]<Open[i-2])&&
(MathAbs(Close[i-1]-Open[i-1])<pip*3)&& // Fixed: was Point*5
(Close[i]>Open[i]);
bool eveStar =(Close[i-2]>Open[i-2])&&
(MathAbs(Close[i-1]-Open[i-1])<pip*3)&& // Fixed: was Point*5
(Close[i]<Open[i]);
// Context: prior trend
if(i>=3){
if(bullEngulf&&Close[i-3]<Close[i-2]) trapScore+=3.5;
if(bearEngulf&&Close[i-3]>Close[i-2]) trapScore+=3.5;
if(mornStar&&Close[i-3]<Close[i-2]) trapScore+=3.0;
if(eveStar&&Close[i-3]>Close[i-2]) trapScore+=3.0;
}
}
// Large wick traps (rejection candles)
double rng=High[i]-Low[i];
if(rng<=0) continue;
double uw=(High[i]-MathMax(Open[i],Close[i]))/rng;
double lw=(MathMin(Open[i],Close[i])-Low[i])/rng;
if(uw>0.55&&Close[i]<Open[i]) trapScore+=2.0; // Upper wick rejection + bearish = trap
if(lw>0.55&&Close[i]>Open[i]) trapScore+=2.0; // Lower wick rejection + bullish = trap
}
// === CHECK LIVE CANDLE (index 0) - NEW: Real-time detection ===
double rng0=High[0]-Low[0];
if(rng0>0){
double uw0=(High[0]-MathMax(Open[0],Close[0]))/rng0;
double lw0=(MathMin(Open[0],Close[0])-Low[0])/rng0;
// Live rejection happening NOW = high confidence trap
if(uw0>0.65&&Close[0]<Open[0]) trapScore+=4.0;
if(lw0>0.65&&Close[0]>Open[0]) trapScore+=4.0;
// Live engulfing forming
if(Close[0]>Open[0]&&Close[1]<Open[1]){ // Bullish engulfing forming
if(Close[0]>Open[1]&&Open[0]<Close[1]) trapScore+=3.0;
}
if(Close[0]<Open[0]&&Close[1]>Open[1]){ // Bearish engulfing forming
if(Close[0]<Open[1]&&Open[0]>Close[1]) trapScore+=3.0;
}
}
// Bias multiplier - but cap it to prevent extreme scores
double biasStr=MathMax(callBias,putBias)-50;
double biasMul=1.0+biasStr/150.0; // Fixed: was /100.0 (too aggressive)
if(biasMul>1.5) biasMul=1.5; // Cap at 1.5x
if(biasMul<0.5) biasMul=0.5; // Floor at 0.5x
trapScore*=biasMul;
return MathMin(100,trapScore);
}
// --- MAIN CALCULATE FUNCTION (v7.3 COMPLETE FIX) ---
void CalculateMTG(){
if(!ENABLE_MTG||Bars<50){g_mtgState="OFF";g_mtgReason="";g_mtgClr=CGR;return;}
bool jpy=(StringFind(Symbol(),"JPY")>=0);
double pip=jpy?0.01:0.0001;
// Check previous result on new bar
CheckPreviousResult();
// Time filter
int sec=(int)(TimeCurrent()-Time[0]);
if(sec<NCP_OpenNoiseSeconds){g_mtgState="...";g_mtgReason="Bar open";g_mtgClr=CGR;g_mtgHype=50;g_mtgBetrayal=50;return;}
if(sec>=NCP_KillZoneSeconds){g_mtgState="END";g_mtgReason="Late";g_mtgClr=NEON_ORANGE;g_mtgHype=50;g_mtgBetrayal=50;return;}
// Spread filter
double spPips=MarketInfo(Symbol(),MODE_SPREAD)*Point/pip;
if(spPips>NCP_MaxSpreadPips){g_mtgState="SPREAD";g_mtgReason=DoubleToString(spPips,1)+"p";g_mtgClr=NEON_ORANGE;g_mtgHype=50;g_mtgBetrayal=50;return;}
// ATR filter
double atr=iATR(Symbol(),PERIOD_M1,NCP_ATRPeriod,1);
double atrPips=atr/pip;
if(atrPips<NCP_MinATRPips){g_mtgState="FLAT";g_mtgReason="Low ATR";g_mtgClr=CGR;g_mtgHype=50;g_mtgBetrayal=50;return;}
// === INDICATORS ===
double eF=iMA(NULL,0,NCP_FastEMA,0,MODE_EMA,PRICE_CLOSE,1);
double eM=iMA(NULL,0,NCP_MidEMA, 0,MODE_EMA,PRICE_CLOSE,1);
double eS=iMA(NULL,0,NCP_SlowEMA,0,MODE_EMA,PRICE_CLOSE,1);
// FIXED: Proper trend detection (no double counting)
bool upTrend=(eF>eM&&eM>eS);
bool dnTrend=(eF<eM&&eM<eS);
bool upBias=(eF>eS)&&!upTrend; // FIXED: exclude if already upTrend
bool dnBias=(eF<eS)&&!dnTrend; // FIXED: exclude if already dnTrend
bool h5Up=false,h5Dn=false;
if(NCP_UseM5Confirm){
double h5F=iMA(NULL,PERIOD_M5,NCP_FastEMA,0,MODE_EMA,PRICE_CLOSE,1);
double h5M=iMA(NULL,PERIOD_M5,NCP_MidEMA, 0,MODE_EMA,PRICE_CLOSE,1);
double h5S=iMA(NULL,PERIOD_M5,NCP_SlowEMA,0,MODE_EMA,PRICE_CLOSE,1);
h5Up=(h5F>h5M&&h5M>h5S);
h5Dn=(h5F<h5M&&h5M<h5S);
}
// FIXED: RSI Normalization - capped to prevent inflation
double nM5=(NCP_RSIM5Target>0)?NCP_RSIBase/NCP_RSIM5Target:1.0;
double nM15=(NCP_RSIM15Target>0)?NCP_RSIBase/NCP_RSIM15Target:1.0;
if(nM5>1.3) nM5=1.3; // FIXED: cap at 1.3
if(nM15>1.5) nM15=1.5; // FIXED: cap at 1.5
double r1=iRSI(NULL,0,NCP_RSIPeriod,PRICE_CLOSE,1);
double r5=iRSI(NULL,PERIOD_M5,NCP_RSIPeriod,PRICE_CLOSE,1);
double r15=iRSI(NULL,PERIOD_M15,NCP_RSIPeriod,PRICE_CLOSE,1);
double n5v=r5*nM5;
double n15v=r15*nM15;
int rBullCt=(r1>50?1:0)+(n5v>50?1:0)+(n15v>50?1:0);
int rBearCt=(r1<50?1:0)+(n5v<50?1:0)+(n15v<50?1:0);
bool rBull2=(rBullCt>=2);
bool rBear2=(rBearCt>=2);
double stK=iStochastic(Symbol(),PERIOD_M1,5,3,3,MODE_SMA,0,MODE_MAIN,1);
bool stOS=(stK<25),stOB=(stK>75);
double macdM=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_MAIN,1);
double macdS=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_SIGNAL,1);
double macdM2=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_MAIN,2);
double macdS2=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_SIGNAL,2);
bool macdBull=(macdM>macdS);
bool macdBear=(macdM<macdS);
bool macdCrossUp=(macdM>macdS&&macdM2<=macdS2);
bool macdCrossDn=(macdM<macdS&&macdM2>=macdS2);
// === CANDLE ANALYSIS ===
double body1=MathAbs(Close[1]-Open[1]);
double rng1=High[1]-Low[1];
if(rng1<=0){g_mtgState="WAIT";return;}
double uwPct=(High[1]-MathMax(Open[1],Close[1]))/rng1;
double lwPct=(MathMin(Open[1],Close[1])-Low[1])/rng1;
double bPct=body1/rng1;
bool bull1=(Close[1]>Open[1]);
bool bear1=(Close[1]<Open[1]);
bool sBull=(bull1&&bPct>=0.5&&body1>atr*0.3);
bool sBear=(bear1&&bPct>=0.5&&body1>atr*0.3);
bool rejUp=(uwPct>0.40&&bPct<0.50);
bool rejDn=(lwPct>0.40&&bPct<0.50);
bool doji=(bPct<0.20);
double mom1=(Close[1]-Close[2])/pip;
double mom3=(Close[1]-Close[4])/pip;
bool bMom=(mom1>0.8&&mom3>1.5);
bool brMom=(mom1<-0.8&&mom3<-1.5);
double hh3=MathMax(High[2],MathMax(High[3],High[4]));
double ll3=MathMin(Low[2], MathMin(Low[3], Low[4]));
bool bkUp=(Close[1]>hh3&&body1>atr*0.25);
bool bkDn=(Close[1]<ll3&&body1>atr*0.25);
bool fkUp=(High[1]>hh3&&Close[1]<hh3);
bool fkDn=(Low[1]<ll3&&Close[1]>ll3);
int bullRun=0,bearRun=0;
for(int i=1;i<=6&&i<Bars;i++){
if(Close[i]>Open[i]){if(bearRun>0)break;bullRun++;}
else if(Close[i]<Open[i]){if(bullRun>0)break;bearRun++;}
else break;
}
double rndSt=NCP_RoundStepPips*pip;
double rndTl=NCP_RoundTolPips*pip;
double bs=MathFloor(Close[1]/rndSt)*rndSt;
bool rrUp=false,rrDn=false;
for(int k=-1;k<=1;k++){
double lv=bs+k*rndSt;
if(MathAbs(Close[1]-lv)<=rndTl){
if(High[1]>lv&&Close[1]<lv-pip) rrUp=true;
if(Low[1]<lv&&Close[1]>lv+pip) rrDn=true;
break;
}
}
double v1=(double)Volume[1],vAvg=0;
for(int i=2;i<=11;i++) vAvg+=(double)Volume[i];
vAvg/=10.0;
bool hiVol=(NCP_UseVolume&&vAvg>0&&v1>vAvg*1.2);
bool loVol=(NCP_UseVolume&&vAvg>0&&v1<vAvg*0.85);
// === SCORING ===
double cS=50.0,pS=50.0;
if(upTrend){cS+=15;pS-=8;}
else if(dnTrend){pS+=15;cS-=8;}
else if(upBias){cS+=7;}
else if(dnBias){pS+=7;}
if(NCP_UseM5Confirm){
if(h5Up){cS+=9;pS-=5;}
if(h5Dn){pS+=9;cS-=5;}
}
if(rBull2){cS+=10;pS-=5;}
if(rBear2){pS+=10;cS-=5;}
if(stOS){cS+=10;pS-=5;}
if(stOB){pS+=10;cS-=5;}
if(macdCrossUp){cS+=12;pS-=6;}
else if(macdBull){cS+=5;}
if(macdCrossDn){pS+=12;cS-=6;}
else if(macdBear){pS+=5;}
if(bMom){cS+=10;pS-=5;}
if(brMom){pS+=10;cS-=5;}
if(sBull&&!rejUp){cS+=13;pS-=7;}
if(sBear&&!rejDn){pS+=13;cS-=7;}
if(rejUp){pS+=12;cS-=6;}
if(rejDn){cS+=12;pS-=6;}
if(doji){cS-=3;pS-=3;}
if(bkUp){cS+=9;pS-=4;}
if(bkDn){pS+=9;cS-=4;}
if(fkUp){pS+=11;cS-=5;}
if(fkDn){cS+=11;pS-=5;}
if(bullRun>=3){pS+=14;cS-=7;}
else if(bearRun>=3){cS+=14;pS-=7;}
if(bullRun>=4){pS+=6;}
if(bearRun>=4){cS+=6;}
if(bullRun>=5){pS+=4;}
if(bearRun>=5){cS+=4;}
if(rrUp){pS+=10;cS-=5;}
if(rrDn){cS+=10;pS-=5;}
if(NCP_UseVolume){
if(hiVol){
if(bull1) cS+=7;
if(bear1) pS+=7;
}
if(loVol){cS-=2;pS-=2;}
}
// === NEW: Live Candle Bonus (Close[0] analysis) ===
double rng0=High[0]-Low[0];
if(rng0>0){
double uw0=(High[0]-MathMax(Open[0],Close[0]))/rng0;
double lw0=(MathMin(Open[0],Close[0])-Low[0])/rng0;
bool bull0=(Close[0]>Open[0]);
bool bear0=(Close[0]<Open[0]);
if(uw0>0.50&&!bull0){pS+=8;cS-=4;}
if(lw0>0.50&&!bear0){cS+=8;pS-=4;}
if(bull0&&bull1) cS+=5;
if(bear0&&bear1) pS+=5;
}
// Trap context (recent 30 bars)
double tBull=0,tBear=0;
for(int t=2;t<=30&&t<Bars;t++){
double r=High[t]-Low[t];
if(r<=0) continue;
double uw=High[t]-MathMax(Open[t],Close[t]);
double lw=MathMin(Open[t],Close[t])-Low[t];
if(uw>r*0.55&&Close[t]<Open[t]) tBear+=1.2;
if(lw>r*0.55&&Close[t]>Open[t]) tBull+=1.2;
}
if(tBull>tBear+2.0) cS+=MathMin(10.0,(tBull-tBear));
if(tBear>tBull+2.0) pS+=MathMin(10.0,(tBear-tBull));
// Confluence booster
int bC=0,brC=0;
if(upTrend||upBias) bC++;
if(dnTrend||dnBias) brC++;
if(h5Up) bC++;
if(h5Dn) brC++;
if(rBull2) bC++;
if(rBear2) brC++;
if(stOS) bC++;
if(stOB) brC++;
if(macdBull||macdCrossUp) bC++;
if(macdBear||macdCrossDn) brC++;
if(bMom) bC++;
if(brMom) brC++;
if(sBull) bC++;
if(sBear) brC++;
if(rejDn) bC++;
if(rejUp) brC++;
if(bkUp||fkDn) bC++;
if(bkDn||fkUp) brC++;
if(rrDn) bC++;
if(rrUp) brC++;
if(hiVol&&bull1) bC++;
if(hiVol&&bear1) brC++;
if(bearRun>=3) bC++;
if(bullRun>=3) brC++;
if(bC>=5){cS+=4;}
if(brC>=5){pS+=4;}
if(bC>=7){cS+=3;}
if(brC>=7){pS+=3;}
if(bC>=9){cS+=2;}
if(brC>=9){pS+=2;}
// Normalize raw score
cS=MathMax(1.0,cS);
pS=MathMax(1.0,pS);
double tot=cS+pS;
cS=(cS/tot)*100.0;
pS=100.0-cS;
// === LEARNING WEIGHT (only after MIN_TRADES) ===
if(ENABLE_LEARNING&&g_totalTrades>=MIN_TRADES_TO_LEARN){
double wCap=MathMax(0.6,g_callWeight);
double wPap=MathMax(0.6,g_putWeight);
cS*=wCap;
pS*=wPap;
tot=cS+pS;
if(tot>0){cS=(cS/tot)*100.0;pS=100.0-cS;}
}
// === BROKER TRAP DETECTION ===
g_trapScore=0;
if(ENABLE_TRAP_DETECTION){
g_trapScore=CalculateBrokerTrap(cS,pS);
if(g_trapScore>70){
if(cS>pS){pS+=18;cS-=10;}
else{cS+=18;pS-=10;}
tot=cS+pS;
cS=(cS/tot)*100.0;
pS=100.0-cS;
}
}
// === SCORE SMOOTHING — DISPLAY ONLY ===
double smoothFactor=0.55;
g_smoothCallScore = g_smoothCallScore*(1.0-smoothFactor) + cS*smoothFactor;
g_smoothPutScore = g_smoothPutScore*(1.0-smoothFactor) + pS*smoothFactor;
double smoothTot=g_smoothCallScore+g_smoothPutScore;
if(smoothTot>0){
g_smoothCallScore=(g_smoothCallScore/smoothTot)*100.0;
g_smoothPutScore=100.0-g_smoothCallScore;
}
// Display uses SMOOTHED values
g_mtgHype = NormalizeDouble(g_smoothCallScore, 1);
g_mtgBetrayal = NormalizeDouble(g_smoothPutScore, 1);
// SIGNAL uses RAW values (FIXED: this was the main bug!)
// Strength based on RAW scores
double edge=MathAbs(cS-pS);
string str="WEAK";
if(edge>=22) str="EXTREME";
else if(edge>=15) str="STRONG";
else if(edge>=8) str="MEDIUM";
// Save globals
g_mtgPattern = str;
g_mtgBullCount = bC;
g_mtgBearCount = brC;
g_mtgRecovery = NormalizeDouble(atrPips,1);
string rsiStr="";
if(NCP_UseRSINorm)
rsiStr="R1:"+DoubleToString(r1,0)+" N5:"+DoubleToString(n5v,0)+" T:"+DoubleToString(g_trapScore,0);
// FIXED: Lowered thresholds for more signals
int minP=NCP_MinProbMedium;
if(str=="STRONG") minP=NCP_MinProbStrong-2;
if(str=="EXTREME") minP=NCP_MinProbExtreme-3;
// === FINAL SIGNAL (on new bar only for tracking) ===
if(Time[0]!=g_ncpLastSignalTime){
g_ncpLastSignalTime=Time[0];
g_ncpSignalProcessed=false;
}
bool isTrap=(ENABLE_TRAP_DETECTION&&g_trapScore>70);
if(cS>=minP&&cS>pS){
g_mtgState = isTrap?"PUT TRAP":"CALL";
g_mtgReason = rsiStr;
g_mtgAction = isTrap?"PUT "+DoubleToString(g_trapScore,0)+"% TRAP!":"CALL "+DoubleToString(cS,1)+"% ["+str+"]";
g_mtgClr = isTrap?NEON_PURPLE:(str=="EXTREME")?NEON_GREEN:(str=="STRONG")?NEON_LIME:NEON_CYAN;
if(!g_ncpSignalProcessed){
g_ncpLastSignalType=isTrap?"PUT":"CALL";
g_ncpLastSignalTime=Time[0];
}
}
else if(pS>=minP&&pS>cS){
g_mtgState = isTrap?"CALL TRAP":"PUT";
g_mtgReason = rsiStr;
g_mtgAction = isTrap?"CALL "+DoubleToString(g_trapScore,0)+"% TRAP!":"PUT "+DoubleToString(pS,1)+"% ["+str+"]";
g_mtgClr = isTrap?NEON_PURPLE:(str=="EXTREME")?NEON_RED:(str=="STRONG")?C'255,60,60':NEON_ORANGE;
if(!g_ncpSignalProcessed){
g_ncpLastSignalType=isTrap?"CALL":"PUT";
g_ncpLastSignalTime=Time[0];
}
}
else{
g_mtgState = "WAIT";
g_mtgReason = rsiStr;
string edgeDir=(cS>pS)?">C":">P";
g_mtgAction = edgeDir+" "+DoubleToString(MathMax(cS,pS),0)+"%";
g_mtgClr = NEON_YELLOW;
g_ncpSignalProcessed=true;
}
}
//+------------------------------------------------------------------+
// HA CANDLE CALCULATION (M1 + M5)
//+------------------------------------------------------------------+
void CalcHA(){
if(Bars<10) return;
ArraySetAsSeries(Open,true); ArraySetAsSeries(High,true); ArraySetAsSeries(Low,true); ArraySetAsSeries(Close,true);
static double haO1[500],haC1[500]; static datetime lb1=0;
ArraySetAsSeries(haO1,true); ArraySetAsSeries(haC1,true);
datetime c1=iTime(NULL,PERIOD_M1,0);
if(c1!=lb1){ lb1=c1; int lim=MathMin(iBars(NULL,PERIOD_M1),500);
for(int i=lim-1;i>=0;i--){ haC1[i]=(Open[i]+High[i]+Low[i]+Close[i])/4.0;
if(i==lim-1) haO1[i]=(Open[i]+Close[i])/2.0; else haO1[i]=(haO1[i+1]+haC1[i+1])/2.0; }}
double d1=MathAbs(haC1[1]-haO1[1]),r1=High[1]-Low[1];
bool dz=(r1>0&&d1<r1*0.1),b1=(!dz&&haC1[1]>haO1[1]),be1=(!dz&&haC1[1]<haO1[1]);
if(b1){g_haM1="HA BULLISH 1";g_haM1Color=clrLime;}
else if(be1){g_haM1="HA BEARISH 1";g_haM1Color=clrRed;}
else{g_haM1="HA DOJI 1";g_haM1Color=clrYellow;}
if(iBars(NULL,PERIOD_M5)>=10){
static double haO5[200],haC5[200]; static datetime lb5=0;
ArraySetAsSeries(haO5,true); ArraySetAsSeries(haC5,true);
datetime c5=iTime(NULL,PERIOD_M5,0);
if(c5!=lb5){ lb5=c5; int lim=MathMin(iBars(NULL,PERIOD_M5),200);
for(int i=lim-1;i>=0;i--){ double o=iOpen(NULL,PERIOD_M5,i),h=iHigh(NULL,PERIOD_M5,i),l=iLow(NULL,PERIOD_M5,i),c=iClose(NULL,PERIOD_M5,i);
haC5[i]=(o+h+l+c)/4.0; if(i==lim-1) haO5[i]=(o+c)/2.0; else haO5[i]=(haO5[i+1]+haC5[i+1])/2.0; }}
double d5=MathAbs(haC5[1]-haO5[1]),r5=iHigh(NULL,PERIOD_M5,1)-iLow(NULL,PERIOD_M5,1);
bool dz5=(r5>0&&d5<r5*0.1),b5=(!dz5&&haC5[1]>haO5[1]),be5=(!dz5&&haC5[1]<haO5[1]);
if(b5){g_haM5="HA BULLISH 5";g_haM5Color=clrLime;}
else if(be5){g_haM5="HA BEARISH 5";g_haM5Color=clrRed;}
else{g_haM5="HA DOJI 5";g_haM5Color=clrYellow;}
if(b1&&b5)g_haBoth="BOTH BULL"; else if(be1&&be5)g_haBoth="BOTH BEAR"; else g_haBoth="MIXED";
}else{g_haM5="5 --";g_haM5Color=clrGray;g_haBoth="HA --";}
}
//+------------------------------------------------------------------+
// HELPER FUNCTIONS
//+------------------------------------------------------------------+
bool IsLineNearby(double price,double pipTol=3.0){
bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=pipTol*pip;
for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i);
if((int)ObjectGetInteger(0,nm,OBJPROP_TYPE)==OBJ_HLINE){
double lp=ObjectGetDouble(0,nm,OBJPROP_PRICE); if(MathAbs(lp-price)<tol) return true; }}
return false;
}
string GetCurrentSession(color &sC){
int h=TimeHour(TimeGMT());
if(h>=12&&h<16){sC=NEON_GOLD;return "LON+NY";}
if(h>=7&&h<9){sC=NEON_CYAN;return "ASI+LON";}
if(h>=7&&h<16){sC=NEON_GREEN;return "LONDON";}
if(h>=12&&h<21){sC=NEON_BLUE;return "NEW YORK";}
if(h>=0&&h<9){sC=NEON_ORANGE;return "ASIA";}
sC=C'100,100,120'; return "SYDNEY";
}
bool IsSessionActive(){int h=TimeHour(TimeGMT());return(h>=7&&h<=21);}
bool IsBigCandle(int s){if(Bars<20)return false;double a=iATR(NULL,PERIOD_M1,14,0);return(a>0&&(High[s]-Low[s])>a*1.8);}
bool CheckMTFConfirmation(){
if(!MTF_CONFIRM) return true;
bool m1Bull=(Close[1]>Open[1]);
bool m5Bull=false,m15Bull=false;
if(iBars(NULL,PERIOD_M5)>=3) m5Bull=(iClose(NULL,PERIOD_M5,1)>iOpen(NULL,PERIOD_M5,1));
if(iBars(NULL,PERIOD_M15)>=3) m15Bull=(iClose(NULL,PERIOD_M15,1)>iOpen(NULL,PERIOD_M15,1));
int bullCount=0,bearCount=0;
if(m1Bull) bullCount++; else bearCount++;
if(m5Bull) bullCount++; else bearCount++;
if(m15Bull) bullCount++; else bearCount++;
g_mtfConfirmed=(bullCount>=2 || bearCount>=2);
return g_mtfConfirmed;
}
double Tanh(double x){double e=MathExp(2.0*x);return(e-1.0)/(e+1.0);}
double CalcFractalDimension(int period){
if(period<2)return 1.5;double sum=0.0;
for(int i=1;i<period;i++){double r1=High[i]-Low[i],r2=High[i+1]-Low[i+1];if(r1<=0.0||r2<=0.0)continue;sum+=MathLog(r1/r2+0.001)*MathLog((double)i/(double)period);}
double result=2.0-sum/period;if(result<1.0)result=1.0;if(result>2.0)result=2.0;return result;
}
double DetectBrokerTrap(int lookback){
int bull=0,bear=0;for(int i=1;i<=lookback;i++){if(Close[i]>Open[i])bull++;else if(Close[i]<Open[i])bear++;}
double crowd=(bull>bear)?(double)bull/lookback:(double)bear/lookback;
double priceMove=MathAbs(Close[1]-Close[lookback])/(Close[lookback]+0.00001);
if(crowd>0.7&&priceMove<0.002)return 0.9;if(crowd>0.6&&priceMove>0.001)return 0.5;return 0.3;
}
double QuickMedian(double &arr[],int size){
double sorted[20];for(int i=0;i<size;i++)sorted[i]=arr[i];
for(int i=0;i<size-1;i++)for(int j=i+1;j<size;j++)if(sorted[i]>sorted[j]){double tmp=sorted[i];sorted[i]=sorted[j];sorted[j]=tmp;}
return(sorted[size/2]+sorted[(size-1)/2])/2.0;
}
double CalcAdvancedTFA(string &detail){
if(Bars<30){detail="Bars low";return 3.0;}
double score=0;string p="";
double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);
double adxSc=(adx>=25)?1.0:(adx>=20)?0.6:(adx>=15)?0.3:0.1;
score+=adxSc;p+="ADX:"+((adxSc>=0.6)?"+":"-")+" ";
double v1=iVolume(NULL,PERIOD_M1,1),vA=0;
for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);
vA=(vA>0)?vA/5.0:1;double vr=v1/vA;
double volSc=(vr>=2.0)?1.0:(vr>=1.5)?0.7:(vr>=1.1)?0.4:0.1;
score+=volSc;p+="VOL:"+((volSc>=0.5)?"+":"-")+" ";
double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
double rsiSc=0.2;if(rsi>=60||rsi<=40)rsiSc=1.0;else if(rsi>=55||rsi<=45)rsiSc=0.6;
score+=rsiSc;p+="RSI:"+((rsiSc>=0.6)?"+":"-")+" ";
double atr=iATR(NULL,PERIOD_M1,14,1),cs=High[1]-Low[1],atrSc=0.2;
if(atr>0){double r=cs/atr;if(r>=0.7&&r<=1.5)atrSc=1.0;else if(r>=0.5&&r<=2.0)atrSc=0.6;else atrSc=0.3;}
score+=atrSc;p+="ATR:"+((atrSc>=0.6)?"+":"-")+" ";
double body=MathAbs(Close[1]-Open[1]),range=High[1]-Low[1],bdySc=0.2;
if(range>0){double br=body/range;if(br>=0.6)bdySc=1.0;else if(br>=0.4)bdySc=0.6;else if(br>=0.2)bdySc=0.3;}
score+=bdySc;p+="BODY:"+((bdySc>=0.6)?"+":"-")+" ";
double sesSc=IsSessionActive()?1.0:0.4;
score+=sesSc;p+="SES:"+((sesSc>=0.7)?"+":"-");
double finalScore=MathMin(6.0,score);int rounded=(int)MathRound(finalScore);
string dir="MIX";
if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")dir="STRONG UP";
else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")dir="STRONG DOWN";
else if(g_haM1=="HA BULLISH 1")dir="UP";
else if(g_haM1=="HA BEARISH 1")dir="DOWN";
detail=p+" | "+IntegerToString(rounded)+"/6 "+dir;
g_tfa_detail=detail;return finalScore;
}
double CalcAdvancedMicroAI(){
if(Bars<20)return 50.0;double score=50.0;
for(int i=1;i<=5;i++){double r=High[i]-Low[i];if(r<=0)continue;double uw=(High[i]-MathMax(Open[i],Close[i]))/r,lw=(MathMin(Open[i],Close[i])-Low[i])/r,w=(6.0-i)/5.0;if(uw>0.60)score-=w*15;if(lw>0.60)score+=w*15;}
double pos5=0;for(int i=1;i<=5;i++){double r=High[i]-Low[i];if(r<=0)continue;pos5+=(Close[i]-Low[i])/r;}score+=(pos5/5.0-0.5)*20.0;
int gc=0,rc=0;for(int i=1;i<=8;i++){if(Close[i]>Open[i])gc++;else if(Close[i]<Open[i])rc++;}score+=(gc-rc)*2.5;
double vl1=(double)iVolume(NULL,PERIOD_M1,1),vA=0;for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);vA/=5.0;
if(vA>0){double vr=vl1/vA;if(vr>1.5&&Close[1]>Open[1])score+=8;if(vr>1.5&&Close[1]<Open[1])score-=8;}
double r1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),r5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
if(r1<35)score+=10;if(r1>65)score-=10;if(r1>r5&&Close[1]<Close[5])score+=6;if(r1<r5&&Close[1]>Close[5])score-=6;
return MathMax(5.0,MathMin(95.0,score));
}
double VolumeTrapScore();
int CalcAdvancedMicroTrap(){
if(Bars<20)return 0;int score=0;double r=High[1]-Low[1];
if(r>0){double uw=(High[1]-MathMax(Open[1],Close[1]))/r,lw=(MathMin(Open[1],Close[1])-Low[1])/r;if(uw>0.65)score+=30;else if(uw>0.50)score+=15;if(lw>0.65)score+=20;else if(lw>0.50)score+=10;}
double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
if(v2>0&&v1/v2>2.0)score+=25;else if(v2>0&&v1/v2>1.5)score+=12;
double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi>78||rsi<22)score+=20;else if(rsi>72||rsi<28)score+=10;
if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))score+=25;
bool aG=(Close[1]>Open[1]&&Close[2]>Open[2]&&Close[3]>Open[3]),aR=(Close[1]<Open[1]&&Close[2]<Open[2]&&Close[3]<Open[3]);
if(aG||aR)score+=15;
double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);if(sp>BROKER_SPREAD_THRESHOLD*1.5)score+=10;
score+=(int)VolumeTrapScore();return MathMin(100,score);
}
double CalcAdvancedFractal(){
if(Bars<15)return 0;double score=0;
for(int i=2;i<=8&&i+2<Bars;i++){
if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){double d=(High[i]-Close[0])/Point;if(d<50&&d>-10)score+=35;}
if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){double d=(Close[0]-Low[i])/Point;if(d<50&&d>-10)score+=25;}}
int dj=0;for(int i=1;i<=6;i++){double b=MathAbs(Close[i]-Open[i]),rg=High[i]-Low[i];if(rg>0&&b<rg*0.20)dj++;}
if(dj>=3)score+=25;
double r1=High[1]-Low[1];if(r1>0){double uw1=(High[1]-MathMax(Open[1],Close[1]))/r1,lw1=(MathMin(Open[1],Close[1])-Low[1])/r1;if(uw1>0.70||lw1>0.70)score+=20;}
return MathMin(100,score);
}
string CalcAdvancedMarketBias(color &bC,double brain,double rsc){
if(Bars<30){bC=NEON_YELLOW;return "CALCULATING";}
double score=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
double pc=Close[0]-Close[10];
if(pc>5*pip)score+=4;else if(pc>2*pip)score+=2;else if(pc<-5*pip)score-=4;else if(pc<-2*pip)score-=2;
double hh1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hh2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
double ll1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],ll2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
if(hh1>hh2&&ll1>ll2)score+=4;else if(hh1<hh2&&ll1<ll2)score-=4;else if(hh1>hh2)score+=2;else if(hh1<hh2)score-=2;
double ema20=0,ema20p=0;for(int i=0;i<20;i++)ema20+=Close[i];ema20/=20;
for(int i=1;i<=20&&i<Bars;i++)ema20p+=Close[i];ema20p/=20;
if(ema20>ema20p)score+=3;else if(ema20<ema20p)score-=3;
double ema50=0;for(int i=0;i<50&&i<Bars;i++)ema50+=Close[i];ema50/=MathMin(50,Bars);
if(ema20>ema50)score+=3;else score-=3;
int gC=0,rC=0;for(int i=1;i<=10;i++){if(Close[i]>Open[i])gC++;else if(Close[i]<Open[i])rC++;}
if(gC>=7)score+=3;else if(rC>=7)score-=3;else if(gC>=5)score+=1;else if(rC>=5)score-=1;
bool m1B=(g_haM1=="HA BULLISH 1"),m1Be=(g_haM1=="HA BEARISH 1"),m5B=(g_haM5=="HA BULLISH 5"),m5Be=(g_haM5=="HA BEARISH 5");
if(m1B&&m5B)score+=4;else if(m1Be&&m5Be)score-=4;else if(m1B)score+=2;else if(m1Be)score-=2;
double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1),pDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_PLUSDI,1),mDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MINUSDI,1);
if(adx>20){if(pDI>mDI+5)score+=4;else if(mDI>pDI+5)score-=4;}
if(brain>3)score-=2;else if(brain<-3)score+=2;
if(Close[1]>Open[1])score+=1;else if(Close[1]<Open[1])score-=1;
if(rsc>2)score+=1;else if(rsc<-2)score-=1;
if(score>=12){bC=NEON_GREEN;return "STRONG BULL";}if(score>=7){bC=NEON_GREEN;return "BULLISH";}if(score>=3){bC=NEON_CYAN;return "LIGHT BULL";}
if(score<=-12){bC=NEON_RED;return "STRONG BEAR";}if(score<=-7){bC=NEON_RED;return "BEARISH";}if(score<=-3){bC=NEON_ORANGE;return "LIGHT BEAR";}
bC=NEON_YELLOW;return "NEUTRAL";
}
void CalcAdvancedPrediction(double &gP,double &rP,string &reason,color &pC){
if(Bars<50){gP=50;rP=50;reason="Bars low";pC=NEON_YELLOW;return;}
bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
double green=0,red=0;
double body1=MathAbs(Close[1]-Open[1]),range1=High[1]-Low[1];
if(range1>0){double uw=High[1]-MathMax(Open[1],Close[1]),lw=MathMin(Open[1],Close[1])-Low[1];
if(uw>range1*0.60&&Close[1]>Open[1])red+=22;else if(lw>range1*0.60&&Close[1]<Open[1])green+=22;
else if((uw+lw)/range1>0.55){if(uw>lw)red+=12;else green+=12;}}
double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),cci=iCCI(NULL,PERIOD_M1,14,PRICE_TYPICAL,1),stochK=iStochastic(NULL,PERIOD_M1,5,3,3,MODE_SMA,0,MODE_MAIN,1);
int os=0,ob=0;
if(rsi<30)os++;else if(rsi>70)ob++;if(cci<-120)os++;else if(cci>120)ob++;if(stochK<20)os++;else if(stochK>80)ob++;
if(os>=3)green+=18;else if(os>=2)green+=12;else if(ob>=3)red+=18;else if(ob>=2)red+=12;
double rsiPrev=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
double low1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],low2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
double high1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],high2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
if(low1<low2&&rsi>rsiPrev&&rsi<45)green+=15;if(high1>high2&&rsi<rsiPrev&&rsi>55)red+=15;
double v1=iVolume(NULL,PERIOD_M1,1),vAvg=0;for(int i=2;i<=10;i++)vAvg+=iVolume(NULL,PERIOD_M1,i);vAvg=(vAvg>0)?vAvg/9.0:1.0;
double vol_ratio=(vAvg>0)?v1/vAvg:1.0;
if(vol_ratio>2.0){if(Close[1]>Open[1])red+=20;else green+=20;}else if(vol_ratio>1.5){if(Close[1]>Open[1])red+=12;else green+=12;}else if(vol_ratio>1.2){if(Close[1]>Open[1])green+=5;else red+=5;}
double m1_haC1=(Open[1]+High[1]+Low[1]+Close[1])/4.0,m1_haC2=(Open[2]+High[2]+Low[2]+Close[2])/4.0;
double m1_haO2=(Open[3]+Close[3])/2.0,m1_haO1=(m1_haO2+m1_haC2)/2.0;
bool haBull1=(m1_haC1>m1_haO1);
double haStr1=MathAbs(m1_haC1-m1_haO1)/(High[1]-Low[1]+0.00001);
bool haBull5=false;double haStr5=0;
if(iBars(NULL,PERIOD_M5)>=5){
double o1=iOpen(NULL,PERIOD_M5,1),h1=iHigh(NULL,PERIOD_M5,1),l1=iLow(NULL,PERIOD_M5,1),c1=iClose(NULL,PERIOD_M5,1);
double o2=iOpen(NULL,PERIOD_M5,2),h2=iHigh(NULL,PERIOD_M5,2),l2=iLow(NULL,PERIOD_M5,2),c2=iClose(NULL,PERIOD_M5,2);
double o3=iOpen(NULL,PERIOD_M5,3),c3=iClose(NULL,PERIOD_M5,3);
double haC1_5=(o1+h1+l1+c1)/4.0,haC2_5=(o2+h2+l2+c2)/4.0,haO2_5=(o3+c3)/2.0,haO1_5=(haO2_5+haC2_5)/2.0;
haBull5=(haC1_5>haO1_5);haStr5=MathAbs(haC1_5-haO1_5)/(h1-l1+0.00001);}
if(haBull1&&haBull5)green+=15;else if(!haBull1&&!haBull5)red+=15;
else if(haBull1&&haStr1>0.5)green+=8;else if(!haBull1&&haStr1>0.5)red+=8;
double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1),plusDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_PLUSDI,1),minusDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MINUSDI,1);
double diDiff=plusDI-minusDI;
if(adx>25){if(diDiff>8)green+=12;else if(diDiff>4)green+=8;else if(diDiff<-8)red+=12;else if(diDiff<-4)red+=8;}
else if(adx>15){if(plusDI>minusDI)green+=4;else red+=4;}
else{if(Close[1]>Open[1])red+=3;else green+=3;}
double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,20,2)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,20,2)];
double dR=(res-Close[0])/pip,dS=(Close[0]-sup)/pip;
if(dR<8&&dR>=0)red+=12;else if(dR<15&&dR>=0)red+=6;
if(dS<8&&dS>=0)green+=12;else if(dS<15&&dS>=0)green+=6;
if(g_hrn_price>0){double dH=MathAbs(Close[0]-g_hrn_price)/pip;if(dH<5){if(Close[0]>g_hrn_price)red+=8;else green+=8;}}
double macdMain=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_MAIN,1),macdSig=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
double macdPrev=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_MAIN,2),macdSigPrev=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_SIGNAL,2);
if(macdMain>macdSig&&macdPrev<=macdSigPrev)green+=10;else if(macdMain<macdSig&&macdPrev>=macdSigPrev)red+=10;
else if(macdMain>macdSig)green+=5;else if(macdMain<macdSig)red+=5;
if(g_otcCallPct>=75&&!haBull1)red+=15;else if(g_otcPutPct>=75&&haBull1)green+=15;
else if(g_otcCallPct>=65&&!haBull1)red+=8;else if(g_otcPutPct>=65&&haBull1)green+=8;
// BB Pullback bonus
if(ENABLE_BB_PULLBACK&&g_bbSignal=="CALL")green+=12;
else if(ENABLE_BB_PULLBACK&&g_bbSignal=="PUT")red+=12;
double diff=MathMax(-100.0,MathMin(100.0,green-red));
gP=MathMax(8.0,MathMin(92.0,50.0+diff*0.65));rP=100.0-gP;
double dom=MathMax(gP,rP);
if(dom>=82){reason=(gP>rP)?"STRONG GREEN":"STRONG RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
else if(dom>=72){reason=(gP>rP)?"GREEN":"RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
else if(dom>=60){reason=(gP>rP)?"WEAK GREEN":"WEAK RED";pC=(gP>rP)?NEON_CYAN:NEON_ORANGE;}
else{reason="WAIT";pC=NEON_YELLOW;}
}
string DetectMyStrategy(){
int cc=g_otcCallPct,cp=g_otcPutPct,thr=STRATEGY_THRESHOLD;
if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TRAP_ONLY"){
if(cc>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TRAP";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA RED";return "PUT";}
if(cp>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TRAP";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA GREEN";return "CALL";}}
if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TREND_ONLY"){
if(cc>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TREND";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA GREEN";return "CALL";}
if(cp>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TREND";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA RED";return "PUT";}}
g_strategyType="NONE";g_strategyReason="Wait "+IntegerToString(thr)+"% + HA";return "WAIT";
}
void CalcOTCCrowd(){
int cS=0,pS=0;int weights[15];
for(int w=0;w<15;w++)weights[w]=15-w*2;
for(int w=0;w<15;w++)if(weights[w]<1)weights[w]=1;
for(int i=1;i<=15&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
double uw=(High[i]-MathMax(Open[i],Close[i]))/rg,lw=(MathMin(Open[i],Close[i])-Low[i])/rg;int wgt=weights[i-1];
if(uw>0.70&&Close[i]<Open[i])cS+=4*wgt;if(lw>0.70&&Close[i]>Open[i])pS+=4*wgt;
if(uw>0.55&&Close[i]<Open[i])cS+=2*wgt;if(lw>0.55&&Close[i]>Open[i])pS+=2*wgt;
if(Close[i]>Open[i])cS+=1*wgt;else if(Close[i]<Open[i])pS+=1*wgt;}
int tot=cS+pS;if(tot==0){g_otcCallPct=50;g_otcPutPct=50;}
else{int rC=(int)(cS*100.0/tot),rP=100-rC;
if(rC>=rP){g_otcCallPct=MathMax(50,rC);g_otcPutPct=100-g_otcCallPct;}
else{g_otcPutPct=MathMax(50,rP);g_otcCallPct=100-g_otcPutPct;}}
}
double BrainSc(int &cp){
double s=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,LB,1)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,LB,1)];
double bH=MathMax(Open[1],Close[1]),bL=MathMin(Open[1],Close[1]);
if(High[1]>res&&bL<res)s-=4;if(Low[1]<sup&&bH>sup)s+=4;if(High[0]>res)s-=2;if(Low[0]<sup)s+=2;
double atr=iATR(NULL,PERIOD_M1,14,1);
if(atr!=0){double cn=(High[1]-Low[1])/atr,v1=(double)iVolume(NULL,PERIOD_M1,1),va=0;
for(int i=2;i<=10;i++)va+=iVolume(NULL,PERIOD_M1,i);va/=9.0;
double vr=va>0?v1/va:1;if(cn>1.2&&vr>1.5){if(Close[1]>Open[1])s-=3;else s+=3;}}
int c=0;for(int i=1;i<=30;i++)if(Close[i]>Open[i])c++;
cp=(int)(c*100.0/30.0);if(cp>=70)s-=5;if(cp<=30)s+=5;s*=1.5;
int dj=0;for(int i=1;i<=8;i++){double bd=MathAbs(Close[i]-Open[i]),rg=High[i]-Low[i];if(rg<=0)continue;
if(bd<rg*0.2)dj++;double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];
if(uw>bd*3)s+=2;if(lw>bd*3)s-=2;}if(dj>=4)s*=1.5;
int bu=0,be=0;for(int i=1;i<=8;i++){if(Close[i]>Open[i]){bu++;be=0;}else{be++;bu=0;}if(bu>=5)s-=3;if(be>=5)s+=3;}
int h=TimeHour(TimeCurrent());double mul=1.0;
if((h>=0&&h<=2)||(h>=8&&h<=11)||(h>=14&&h<=17))mul=1.20;if(h>=3&&h<=7)mul=0.90;
return s*mul;
}
double MicroWick(){double r=High[1]-Low[1];if(r<=0)return 0;return((High[1]-MathMax(Open[1],Close[1]))+(MathMin(Open[1],Close[1])-Low[1]))/r;}
double VolumeTrapScore(){
if(!VOLUME_PROFILE_TRAP||Bars<50)return 0;
double cur=Close[0],hi=High[iHighest(NULL,0,MODE_HIGH,50,1)],lo=Low[iLowest(NULL,0,MODE_LOW,50,1)];
double rg=hi-lo;if(rg<=0)return 0;int zn=5;double zs=rg/zn;double vz[5]={0,0,0,0,0};int zc[5]={0,0,0,0,0};
for(int i=1;i<=50;i++){double p=Close[i];int z=(int)((p-lo)/zs);if(z<0)z=0;if(z>=zn)z=zn-1;vz[z]+=Volume[i];zc[z]++;}
for(int z=0;z<zn;z++)if(zc[z]>0)vz[z]/=zc[z];
int cz=(int)((cur-lo)/zs);if(cz<0)cz=0;if(cz>=zn)cz=zn-1;
double vr=(double)Volume[1]/(vz[cz]+0.001);double wr=MicroWick();
if(vr>2.0&&wr>0.65)return 25;if(vr>1.8&&wr>0.55)return 15;return 0;
}
double UltimateTrapScore(){double wr=MicroWick(),v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
double avg=v2>0?v2:1.0,vr=v1/avg,rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),sc=0.0;
if(wr>0.65)sc+=40;if(vr>2.0)sc+=30;if(rsi>75||rsi<25)sc+=20;
if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))sc+=25;
sc+=VolumeTrapScore();return MathMin(100.0,sc);}
bool IsBrokerForce(double dummy=0){
int sd=0;for(int i=1;i<=3;i++){if(Close[i]>Open[i])sd++;else sd--;}
double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
return(MathAbs(sd)==3&&v1>v2*2.0&&sp>BROKER_SPREAD_THRESHOLD);}
double NeuralBiasFast(){double r=NeuralBias(0)*0.3+NeuralBias(1)*0.7;if(r>96)r=96;if(r<4)r=4;return r;}
double NeuralBias(int s){
double f[8];f[0]=fDoji(s)/100.0;f[1]=fWick(s)/100.0;f[2]=fVol()/100.0;f[3]=fMom(s)/100.0;
f[4]=fSpread()/100.0;f[5]=fMem(s)/100.0;f[6]=fTick(s)/100.0;f[7]=fFrac(s)/100.0;
double h[4]={0,0,0,0};for(int i=0;i<4;i++){for(int j=0;j<8;j++)h[i]+=f[j]*NW[j*4+i];h[i]=MathMax(0,h[i]-0.08);}
double o=0;for(int i=0;i<4;i++)o+=h[i]*NW[32+i];double r=50.0+o*22.0;return r>96?96:r<4?4:r;}
double fDoji(int s){int n=0;for(int i=s;i<s+5&&i<Bars;i++){double b=MathAbs(Open[i]-Close[i]),r=High[i]-Low[i];if(r>0&&b<r*0.25)n++;}return n*20.0;}
double fWick(int s){double r=High[s]-Low[s];if(r==0)return 0;double u=(High[s]-MathMax(Open[s],Close[s]))/r,l=(MathMin(Open[s],Close[s])-Low[s])/r;return(u>0.65||l>0.65)?95:(u>0.5||l>0.5)?70:0;}
double fVol(){if(Bars<11)return 0;double a=0;for(int i=1;i<=10;i++)a+=iVolume(NULL,PERIOD_M1,i);a/=10.0;if(a==0)return 0;double r=(double)iVolume(NULL,PERIOD_M1,0)/a;return r>3?95:r>2?75:r>1.5?50:0;}
double fMom(int s){if(s+3>=Bars)return 0;return((Close[s]>Open[s]&&Close[s+1]<Open[s+1])||(Close[s]<Open[s]&&Close[s+1]>Open[s+1]))?88:0;}
double fSpread(){double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);return sp>8?90:sp>5?70:sp>3?40:0;}
double fMem(int s){if(s+8>=Bars)return 0;int r=0;for(int i=s;i<s+8&&i+2<Bars;i+=2){bool vB=(Low[i]>Low[i+1]&&Low[i+2]>Low[i+1]&&Close[i+2]>Open[i+2]);bool aT=(High[i]<High[i+1]&&High[i+2]<High[i+1]&&Close[i+2]<Open[i+2]);if(vB||aT)r++;}return(double)r*12.5;}
double fTick(int s){if(s+5>=Bars)return 0;double vN=(double)iVolume(NULL,PERIOD_M1,s),vP=(double)iVolume(NULL,PERIOD_M1,s+1);if(vP==0)return 0;double vR=vN/vP,pc=MathAbs(Close[s]-Close[s+1])/Close[s+1]*100;if(vR>2.0&&pc<0.1)return 85;if(vR>1.5&&pc<0.05)return 60;return 0;}
double fFrac(int s){if(s+4>=Bars||s<2)return 0;bool b=(Low[s]<Low[s-1]&&Low[s]<Low[s-2]&&Low[s]<Low[s+1]&&Low[s]<Low[s+2]);bool t=(High[s]>High[s-1]&&High[s]>High[s-2]&&High[s]>High[s+1]&&High[s]>High[s+2]);return(b||t)?90:0;}
void CalcPrediction(double brain,double nb,int cp,double mai,int mts,double rsc,bool bf,double mw){
string ms=DetectMyStrategy();bool sA=(ms!="WAIT");
if(sA&&g_strategyType=="TRAP"){
if(ms=="PUT"){g_gProb=12.0;g_rProb=88.0;g_pAction="PUT TRAP!";g_pColor=NEON_PURPLE;g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}
if(ms=="CALL"){g_gProb=88.0;g_rProb=12.0;g_pAction="CALL TRAP!";g_pColor=NEON_PURPLE;g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}}
double tS=UltimateTrapScore();bool bF2=IsBrokerForce();
if(TRADE_MODE=="HUNT"){if(tS<85){g_gProb=50;g_rProb=50;g_pAction="HUNT: WAIT";g_pColor=NEON_YELLOW;g_calc_gProb=50;g_calc_rProb=50;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}}
if(ENABLE_BROKER_KILLER&&(tS>=85||(tS>=75&&bF2))&&g_marketMode!="TREND"){g_gProb=15;g_rProb=85;g_pAction="TRAP DETECTED";g_pColor=NEON_PURPLE;g_calc_gProb=15;g_calc_rProb=85;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}
double gS=0,rS=0,ab=MathMax(0.70,MathMin(1.30,g_accuracy/65.0));
if(IsSidewaysMarket()){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
bool nR=(g_nearest_res>0&&(g_nearest_res-Close[0])<8*pip),nS=(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<8*pip);
if(!nR&&!nS){g_gProb=50;g_rProb=50;g_pAction="SIDEWAYS";g_pColor=NEON_YELLOW;g_calc_gProb=50;g_calc_rProb=50;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}
if(nR)rS+=20;if(nS)gS+=20;}
if(sA&&g_strategyType=="TREND"){double sw=50.0;if(ms=="CALL"){gS+=sw*ab;g_pAction="TREND: CALL!";g_pColor=NEON_GREEN;}else if(ms=="PUT"){rS+=sw*ab;g_pAction="TREND: PUT!";g_pColor=NEON_RED;}}
if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")gS+=60;
else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")rS+=60;
else if(g_haM1=="HA BULLISH 1")gS+=30;else if(g_haM1=="HA BEARISH 1")rS+=30;
if(HA_ALIGN_FILTER&&g_haBoth=="MIXED"){gS*=0.5;rS*=0.5;}
gS+=(nb-50)/50.0*22*ab;rS-=(nb-50)/50.0*22*ab;
double bn=MathMax(-1.0,MathMin(1.0,brain/10.0));gS+=bn*15*ab;rS-=bn*15*ab;
bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
if(g_nearest_res>0&&(g_nearest_res-Close[0])<10*pip)rS+=12;
if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<10*pip)gS+=12;
double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi1>70)rS+=6;if(rsi1<30)gS+=6;
double sn=MathMax(-1.0,MathMin(1.0,rsc/3.0));gS+=sn*8*ab;rS-=sn*8*ab;
double wRS=GetWickRejectSignal();gS+=(wRS>0?wRS:0);rS+=(wRS<0?MathAbs(wRS):0);
double cPS=GetCommonPointSignal();gS+=(cPS>0?cPS:0);rS+=(cPS<0?MathAbs(cPS):0);
// BB Pullback signal contribution
if(ENABLE_BB_PULLBACK){if(g_bbSignal=="CALL")gS+=18*ab;else if(g_bbSignal=="PUT")rS+=18*ab;}
int rd=DetectRSIDivergence();if(rd==1)gS+=20;if(rd==-1)rS+=20;
int cp2=DetectClassicPatterns();if(cp2==1)gS+=12;if(cp2==-1)rS+=12;
int qm=DetectQMR();if(qm==1)gS+=25;if(qm==-1)rS+=25;
int sk=StreakReversalSignal();if(sk==1)gS+=18;if(sk==-1)rS+=18;
double adxV=GetADXStrength();int adxD=GetADXDirection();if(adxV>25){if(adxD==1)gS+=12;if(adxD==-1)rS+=12;}if(adxV<15){gS*=0.7;rS*=0.7;}
int vs=SmartVolumeSignal();if(vs==1)gS+=12;if(vs==-1)rS+=12;
if(!IsVolatilityGood()){gS*=0.5;rS*=0.5;}
double diff=MathMax(-100.0,MathMin(100.0,gS-rS));
g_gProb=MathMax(8.0,MathMin(92.0,50.0+(diff/1.8)));g_rProb=100.0-g_gProb;
if(sA&&g_strategyType=="TREND"){
if(ms=="CALL"){g_gProb=MathMax(g_gProb,85.0);g_rProb=100.0-g_gProb;}
if(ms=="PUT"){g_rProb=MathMax(g_rProb,85.0);g_gProb=100.0-g_rProb;}
g_gProb=MathMin(92.0,MathMax(8.0,g_gProb));g_rProb=100.0-g_gProb;}
double dom=MathMax(g_gProb,g_rProb);
if(dom>=82){if(g_gProb>g_rProb){if(!sA){g_pAction="GREEN";g_pColor=NEON_GREEN;}}else{if(!sA){g_pAction="RED";g_pColor=NEON_RED;}}}
else if(dom>=75){if(g_gProb>g_rProb){if(!sA){g_pAction="GREEN";g_pColor=NEON_CYAN;}}else{if(!sA){g_pAction="RED";g_pColor=NEON_ORANGE;}}}
else{if(!sA){g_pAction="WAIT";g_pColor=NEON_YELLOW;}}
g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;
}
void DetectCommonPoints(){
if(!SHOW_COMMON_POINTS){g_commonCount=0;return;}
if(Time[0]==g_lastCommonScan)return;g_lastCommonScan=Time[0];g_commonCount=0;
datetime nowBar=Time[0];int periodSec=PeriodSeconds(PERIOD_M1);
double m5h=iHigh(NULL,PERIOD_M5,iHighest(NULL,PERIOD_M5,MODE_HIGH,10,1));
double m5l=iLow(NULL,PERIOD_M5,iLowest(NULL,PERIOD_M5,MODE_LOW,10,1));
if(m5l>0&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=m5l;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="CALL";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
if(g_hrn_price>0&&g_hrn_is_sup&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=g_hrn_price;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="CALL";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
if(m5h>0&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=m5h;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="PUT";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
if(g_hrn_price>0&&!g_hrn_is_sup&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=g_hrn_price;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="PUT";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
for(int i=g_commonCount-1;i>=0;i--)if(TimeCurrent()>g_commonExpire[i]){for(int j=i;j<g_commonCount-1;j++){g_commonPrice[j]=g_commonPrice[j+1];g_commonTime[j]=g_commonTime[j+1];g_commonType[j]=g_commonType[j+1];g_commonExpire[j]=g_commonExpire[j+1];}g_commonCount--;}
}
void DrawCommonPoints(){
for(int i=0;i<MAX_COMMON_PTS;i++){SafeDel(PFX+"COMMON_"+IntegerToString(i));SafeDel(PFX+"COMMON_L_"+IntegerToString(i));SafeDel(PFX+"COMMON_HL_"+IntegerToString(i));}
if(!SHOW_COMMON_POINTS||g_commonCount==0)return;
for(int i=0;i<g_commonCount;i++){if(TimeCurrent()>g_commonExpire[i])continue;if(IsLineNearby(g_commonPrice[i],8.0))continue;
string id=PFX+"COMMON_"+IntegerToString(i),idL=PFX+"COMMON_L_"+IntegerToString(i),idH=PFX+"COMMON_HL_"+IntegerToString(i);color zc=DARK_BLUE_NEON;
ObjectCreate(0,idH,OBJ_HLINE,0,0,g_commonPrice[i]);ObjectSetInteger(0,idH,OBJPROP_COLOR,zc);ObjectSetInteger(0,idH,OBJPROP_WIDTH,3);ObjectSetInteger(0,idH,OBJPROP_STYLE,STYLE_SOLID);ObjectSetInteger(0,idH,OBJPROP_BACK,false);
ObjectCreate(0,id,OBJ_TEXT,0,Time[0],g_commonPrice[i]);ObjectSetText(id,"*",16,"Arial",zc);ObjectSetInteger(0,id,OBJPROP_BACK,false);
string lbl=(g_commonType[i]=="CALL")?"^ CALL ZONE":"v PUT ZONE";
ObjectCreate(0,idL,OBJ_TEXT,0,Time[0]+PeriodSeconds(PERIOD_M1)*3,g_commonPrice[i]);ObjectSetText(idL,lbl,10,"Arial Bold",zc);ObjectSetInteger(0,idL,OBJPROP_BACK,false);}
}
void DetectWickRejections(){
g_isSideways=IsSidewaysMarket();if(!SHOW_WICK_REJECT_LINES){g_wickLineCount=0;return;}
if(Time[0]==g_lastWickScan)return;g_lastWickScan=Time[0];
bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double zone=WICK_ZONE_PIPS*pip*2;double cur=Close[0];
g_wickLineCount=0;datetime now=Time[0],expT=now+PeriodSeconds(PERIOD_M1)*WICK_EXPIRE_BARS*2;
for(int i=1;i<=40&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];double rl=0;bool fd=false;
if(uw>rg*0.30){rl=High[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
if(lw>rg*0.30){rl=Low[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
if(!fd)continue;bool ex=false;
for(int j=0;j<g_wickLineCount;j++)if(MathAbs(g_wickLinePrice[j]-rl)<zone){g_wickLineTouches[j]++;ex=true;break;}
if(!ex&&g_wickLineCount<MAX_WICK_LINES){g_wickLinePrice[g_wickLineCount]=rl;g_wickLineTouches[g_wickLineCount]=1;g_wickLineExpire[g_wickLineCount]=expT;g_wickLineCount++;}}
for(int i=g_wickLineCount-1;i>=0;i--)if(TimeCurrent()>g_wickLineExpire[i]){for(int j=i;j<g_wickLineCount-1;j++){g_wickLinePrice[j]=g_wickLinePrice[j+1];g_wickLineTouches[j]=g_wickLineTouches[j+1];g_wickLineExpire[j]=g_wickLineExpire[j+1];}g_wickLineCount--;}
}
void DrawWickRejectLines(){
for(int i=0;i<MAX_WICK_LINES;i++){SafeDel(PFX+"WICK_"+IntegerToString(i));SafeDel(PFX+"WICK_L_"+IntegerToString(i));}
if(!SHOW_WICK_REJECT_LINES||!g_isSideways)return;
bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
for(int i=0;i<g_wickLineCount;i++){if(TimeCurrent()>g_wickLineExpire[i])continue;if(MathAbs(cur-g_wickLinePrice[i])/pip>20.0)continue;if(IsLineNearby(g_wickLinePrice[i],5.0))continue;
string id=PFX+"WICK_"+IntegerToString(i),idL=PFX+"WICK_L_"+IntegerToString(i);color lc=C'0,180,255';
ObjectCreate(0,id,OBJ_HLINE,0,0,g_wickLinePrice[i]);ObjectSetInteger(0,id,OBJPROP_COLOR,lc);ObjectSetInteger(0,id,OBJPROP_WIDTH,2);ObjectSetInteger(0,id,OBJPROP_STYLE,STYLE_DOT);ObjectSetInteger(0,id,OBJPROP_BACK,false);
string lbl="W"+IntegerToString(g_wickLineTouches[i])+"x";
ObjectCreate(0,idL,OBJ_TEXT,0,Time[0]+PeriodSeconds(PERIOD_M1)*2,g_wickLinePrice[i]);ObjectSetText(idL,lbl,9,"Arial Bold",lc);ObjectSetInteger(0,idL,OBJPROP_BACK,false);}
}
double GetWickRejectSignal(){if(!g_isSideways||g_wickLineCount==0)return 0;double sc=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
for(int i=0;i<g_wickLineCount;i++){double d=MathAbs(Close[0]-g_wickLinePrice[i])/pip;bool iS=(g_wickLinePrice[i]<Close[0]);
if(d<5){if(iS)sc+=15*g_wickLineTouches[i];else sc-=15*g_wickLineTouches[i];}else if(d<10){if(iS)sc+=8*g_wickLineTouches[i];else sc-=8*g_wickLineTouches[i];}}return MathMax(-40,MathMin(40,sc));}
double GetCommonPointSignal(){if(g_commonCount==0)return 0;double sc=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
for(int i=0;i<g_commonCount;i++){if(TimeCurrent()>g_commonExpire[i])continue;double d=MathAbs(Close[0]-g_commonPrice[i])/pip;if(d<8){if(g_commonType[i]=="CALL")sc+=25;else sc-=25;}}return MathMax(-30,MathMin(30,sc));}
void DetectHiddenLevels(){g_htfLevelCount=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double curP=Close[0];
double rU=MathCeil(curP/(10*pip))*(10*pip),rD=MathFloor(curP/(10*pip))*(10*pip);
if(MathAbs(curP-rU)/pip<=15)AddLevel(rU,"ROUND","RESISTANCE",TimeCurrent(),8,true);
if(MathAbs(curP-rD)/pip<=15)AddLevel(rD,"ROUND","SUPPORT",TimeCurrent(),8,true);
DetectHTFLevels(PERIOD_M5,"M5",3,pip);DetectHTFLevels(PERIOD_M15,"M15",5,pip);DetectHTFLevels(PERIOD_M30,"M30",7,pip);DetectHTFLevels(PERIOD_H1,"H1",9,pip);
SortLevelsByStrength();}
void DetectHTFLevels(ENUM_TIMEFRAMES tf,string tfN,int bS,double pip){
int bars=MathMin(50,iBars(NULL,tf));if(bars<10)return;double curP=Close[0];
for(int i=2;i<bars-2;i++){
if(IsSwingHigh(tf,i,2)){double d=MathAbs(curP-iHigh(NULL,tf,i))/pip;if(d<=20)AddLevel(iHigh(NULL,tf,i),tfN,"RESISTANCE",iTime(NULL,tf,i),bS+(20-(int)d)/2,false);}
if(IsSwingLow(tf,i,2)){double d=MathAbs(curP-iLow(NULL,tf,i))/pip;if(d<=20)AddLevel(iLow(NULL,tf,i),tfN,"SUPPORT",iTime(NULL,tf,i),bS+(20-(int)d)/2,false);}}}
bool IsSwingHigh(ENUM_TIMEFRAMES tf,int p,int lb){
double h=iHigh(NULL,tf,p);
for(int i=1;i<=lb;i++){if(p-i<0||p+i>=iBars(NULL,tf))return false;if(iHigh(NULL,tf,p-i)>=h||iHigh(NULL,tf,p+i)>=h)return false;}
return true;}
bool IsSwingLow(ENUM_TIMEFRAMES tf,int p,int lb){
double l=iLow(NULL,tf,p);
for(int i=1;i<=lb;i++){if(p-i<0||p+i>=iBars(NULL,tf))return false;if(iLow(NULL,tf,p-i)<=l||iLow(NULL,tf,p+i)<=l)return false;}
return true;}
void AddLevel(double price,string tf,string type,datetime time,int strength,bool isRound){
if(g_htfLevelCount>=50)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
for(int i=0;i<g_htfLevelCount;i++)if(MathAbs(g_htfLevels[i].price-price)/pip<5)return;
g_htfLevels[g_htfLevelCount].price=price;g_htfLevels[g_htfLevelCount].timeframe=tf;g_htfLevels[g_htfLevelCount].type=type;g_htfLevels[g_htfLevelCount].time=time;g_htfLevels[g_htfLevelCount].strength=strength;g_htfLevels[g_htfLevelCount].isRoundNumber=isRound;g_htfLevelCount++;}
void SortLevelsByStrength(){
for(int i=0;i<g_htfLevelCount-1;i++)for(int j=0;j<g_htfLevelCount-i-1;j++)if(g_htfLevels[j].strength<g_htfLevels[j+1].strength){HTFLevel tmp=g_htfLevels[j];g_htfLevels[j]=g_htfLevels[j+1];g_htfLevels[j+1]=tmp;}}
void DrawHiddenLevels(){
for(int i=0;i<50;i++){SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i));SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i)+"_LBL");}
int dc=MathMin(10,g_htfLevelCount);int drawn=0;
for(int i=0;i<dc&&drawn<5;i++){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;if(MathAbs(Close[0]-g_htfLevels[i].price)/pip>30)continue;if(IsLineNearby(g_htfLevels[i].price,5.0))continue;
string nm=PFX+"HTF_LEVEL_"+IntegerToString(drawn);color lc=g_htfLevels[i].isRoundNumber?NEON_PURPLE:(StringFind(g_htfLevels[i].type,"SUPPORT")>=0?NEON_GREEN:NEON_RED);
ObjectCreate(0,nm,OBJ_HLINE,0,0,g_htfLevels[i].price);ObjectSetInteger(0,nm,OBJPROP_COLOR,lc);ObjectSetInteger(0,nm,OBJPROP_WIDTH,1);ObjectSetInteger(0,nm,OBJPROP_STYLE,STYLE_DOT);ObjectSetInteger(0,nm,OBJPROP_BACK,false);
string ln=nm+"_LBL";ObjectCreate(0,ln,OBJ_TEXT,0,Time[0],g_htfLevels[i].price);ObjectSetText(ln,StringFormat("%s %s S:%d",g_htfLevels[i].timeframe,g_htfLevels[i].type,g_htfLevels[i].strength),9,"Arial",lc);drawn++;}}
string DetectSuddenReversal(){if(Close[1]<Open[1]&&Close[0]>Open[0]){if(iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,0)<30)return "BULL REVERSAL";}if(Close[1]>Open[1]&&Close[0]<Open[0]){if(iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,0)>70)return "BEAR REVERSAL";}return "";}
void SafeDel(string id){if(ObjectFind(0,id)>=0)ObjectDelete(0,id);}
void DrawHLine(string id,double price,color clr,int width,int style){if(price<=0)return;SafeDel(id);ObjectCreate(0,id,OBJ_HLINE,0,0,price);ObjectSetInteger(0,id,OBJPROP_COLOR,clr);ObjectSetInteger(0,id,OBJPROP_WIDTH,width);ObjectSetInteger(0,id,OBJPROP_STYLE,style);ObjectSetInteger(0,id,OBJPROP_BACK,false);}
void HideSPM(){
for(int i=ObjectsTotal()-1;i>=0;i--){
string nm=ObjectName(i);
if(StringFind(nm,PFX)==0) continue; // Our objects - skip
if(StringFind(nm,PFX+"candle_timer")>=0) continue; // Timer - keep
int tp=(int)ObjectGetInteger(0,nm,OBJPROP_TYPE);
if(tp==OBJ_LABEL||tp==OBJ_RECTANGLE_LABEL||tp==OBJ_TEXT) ObjectDelete(0,nm);
}
}
void NuclearDeleteAll(){
for(int i=ObjectsTotal()-1;i>=0;i--){
string nm=ObjectName(i);
if(StringFind(nm,PFX+"candle_timer")>=0) continue; // Keep timer
int tp=(int)ObjectGetInteger(0,nm,OBJPROP_TYPE);
if(tp==OBJ_HLINE||tp==OBJ_LABEL||tp==OBJ_RECTANGLE_LABEL||tp==OBJ_TEXT)
ObjectDelete(0,nm);
}
}
void DelDashboard(){
for(int i=ObjectsTotal()-1;i>=0;i--){
string nm=ObjectName(i);
if(StringFind(nm,PFX)!=0) continue;
if(StringFind(nm,"HRN_LINE")>=0) continue;
if(StringFind(nm,"HRN_LBL")>=0) continue;
if(StringFind(nm,"candle_timer")>=0) continue;
if(StringFind(nm,"HTF_LEVEL")>=0) continue;
if(StringFind(nm,"COMMON_")>=0) continue;
if(StringFind(nm,"WICK_")>=0) continue;
if(StringFind(nm,"BB_")>=0) continue;
ObjectDelete(nm);
}
}
void LoadMLWeights(){
if(!ML_ADAPTIVE)return;g_symbolKey=Symbol();string fn="ML_weights_"+g_symbolKey+".dat";
int h=FileOpen(fn,FILE_READ|FILE_TXT);if(h!=INVALID_HANDLE){string d=FileReadString(h);FileClose(h);g_brokerBias=StringToDouble(d);if(g_brokerBias<-0.5)g_brokerBias=-0.5;if(g_brokerBias>0.5)g_brokerBias=0.5;}else g_brokerBias=0.0;}
void SaveMLWeights(){
if(!ML_ADAPTIVE)return;string fn="ML_weights_"+g_symbolKey+".dat";
int h=FileOpen(fn,FILE_WRITE|FILE_TXT);if(h!=INVALID_HANDLE){FileWriteString(h,DoubleToString(g_brokerBias,6));FileClose(h);}}
void UpdateMLWeights(bool win){
if(!ML_ADAPTIVE)return;double lr=0.02;if(win)g_brokerBias+=lr*(g_frozen_gProb/100.0);else g_brokerBias-=lr*(g_frozen_rProb/100.0);
if(g_brokerBias>0.5)g_brokerBias=0.5;if(g_brokerBias<-0.5)g_brokerBias=-0.5;SaveMLWeights();}
void UpdateAccuracy(){if(Bars<5||Time[0]==g_acc_lastBar)return;g_acc_lastBar=Time[0];
if(g_lastPredBar==Time[1]&&MathAbs(g_lastPredGreen-50.0)>10.0){bool aG=(Close[1]>Open[1]),pG=(g_lastPredGreen>50.0),win=(aG==pG);
if(win){g_acc_correct++;g_lossStreak=0;}else g_lossStreak++;g_acc_total++;
if(g_acc_total>0)g_accuracy=MathMax(40.0,MathMin(90.0,(double)g_acc_correct/g_acc_total*100.0));
if(ML_ADAPTIVE&&g_lastPredGreen>50.0&&g_lastPredGreen<100.0)UpdateMLWeights(win);}
g_lastPredGreen=g_frozen_gProb;g_lastPredBar=Time[0];}
double ValidateHistoricalAccuracy(){if(Bars<55)return 65.0;int cr=0,tt=0;for(int i=10;i<=50&&i+1<Bars;i++){int gc=0;for(int j=i+1;j<=i+5&&j<Bars;j++)if(Close[j]>Open[j])gc++;double pG=(gc>2)?65.0:35.0;bool aG=(Close[i]>Open[i]);if((pG>55&&aG)||(pG<45&&!aG))cr++;tt++;}return tt>0?(double)cr/tt*100.0:65.0;}
void UpdateWeights(){double lr=0.01;if(g_lastPredBar==Time[1]){bool c=((Close[1]>Open[1])==(g_lastPredGreen>50));if(c){NW[32]+=lr;NW[33]-=lr;}else{NW[32]-=lr;NW[33]+=lr;}NW[32]=MathMax(0.5,MathMin(2.0,NW[32]));NW[33]=MathMin(-0.5,MathMax(-2.0,NW[33]));}}
string DetectMarketMode(double brain,double rsc,int cp,double nb){double atr=iATR(NULL,PERIOD_M1,14,1),avgR=(High[1]-Low[1]+High[2]-Low[2]+High[3]-Low[3])/3.0;bool hV=(avgR>0&&atr/avgR>1.3);if(MathAbs(brain)>=3.5&&MathAbs(rsc)>=1.5&&hV)return "TREND";if(cp>=70||cp<=30)return "REVERSAL";if(nb>=70||nb<=30)return "TREND";return "RANGE";}
bool IsSidewaysMarket(){if(Bars<30)return false;double adx=GetADXStrength();if(adx<25)return true;double h20=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,20,1)],l20=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,20,1)];double r20=h20-l20;double atr=iATR(NULL,PERIOD_M1,14,1);if(atr>0&&r20<atr*8)return true;return false;}
bool IsVolatilityGood(){if(Bars<100)return true;double dh=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,60,0)],dl=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,60,0)];double tr=dh-dl;double ac=0;for(int i=1;i<=20;i++)ac+=(High[i]-Low[i]);ac/=20.0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double mr=jpy?0.30:0.0030;if(tr<mr)return false;if(ac>0&&(High[0]-Low[0])<ac*0.3)return false;return true;}
int DetectRSIDivergence(){if(Bars<30)return 0;double rN=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),rP=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,8);double lN=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],lPv=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];if(lN<lPv&&rN>rP&&rN<40)return 1;double hN=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hPv=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];if(hN>hPv&&rN<rP&&rN>60)return -1;return 0;}
int StreakReversalSignal(){if(Bars<15)return 0;int g=0,r=0;for(int i=1;i<Bars;i++){if(Close[i]>Open[i]){if(r>0)break;g++;}else if(Close[i]<Open[i]){if(g>0)break;r++;}else break;}if(g>=4)return -1;if(r>=4)return 1;return 0;}
double GetADXStrength(){if(Bars<20)return 0;return iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);}
int GetADXDirection(){if(Bars<20)return 0;double p=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_PLUSDI,1),m=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MINUSDI,1);if(p>m+5)return 1;if(m>p+5)return -1;return 0;}
int SmartVolumeSignal(){if(Bars<15)return 0;double v1=(double)iVolume(NULL,PERIOD_M1,1),avg=0;for(int i=2;i<=10;i++)avg+=iVolume(NULL,PERIOD_M1,i);avg/=9.0;if(avg==0)return 0;double vr=v1/avg;if(vr<1.8)return 0;bool g=(Close[1]>Open[1]);if(vr>2.5&&g)return 1;if(vr>2.5&&!g)return -1;if(vr>3.0&&g&&High[1]-Close[1]>Close[1]-Low[1])return -1;if(vr>3.0&&!g&&Close[1]-Low[1]>High[1]-Close[1])return 1;return 0;}
int DetectClassicPatterns(){if(Bars<30)return 0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double tol=PATTERN_TOLERANCE_PIPS*pip;double sh[2],sl[2];int shB[2],slB[2];int shC=0,slC=0;
for(int i=2;i<25&&(shC<2||slC<2);i++){if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){if(shC<2){sh[shC]=High[i];shB[shC]=i;shC++;}}if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){if(slC<2){sl[slC]=Low[i];slB[slC]=i;slC++;}}}
if(shC>=2){int bd=MathAbs(shB[0]-shB[1]);if(bd>=MIN_PATTERN_SEPARATION&&MathAbs(sh[0]-sh[1])<=tol){int bn=MathMin(shB[0],shB[1]),bx=MathMax(shB[0],shB[1]);double vl=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,bx-bn+1,bn)];if(Close[0]<vl)return -1;}}
if(slC>=2){int bd=MathAbs(slB[0]-slB[1]);if(bd>=MIN_PATTERN_SEPARATION&&MathAbs(sl[0]-sl[1])<=tol){int bn=MathMin(slB[0],slB[1]),bx=MathMax(slB[0],slB[1]);double ph=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,bx-bn+1,bn)];if(Close[0]>ph)return 1;}}return 0;}
int DetectQMR(){if(Bars<40)return 0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double sH[10],sL[10];int sHB[10],sLB[10];int hC=0,lC=0;
for(int i=3;i<40&&hC<10;i++)if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){sH[hC]=High[i];sHB[hC]=i;hC++;}
for(int i=3;i<40&&lC<10;i++)if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){sL[lC]=Low[i];sLB[lC]=i;lC++;}
if(hC<2||lC<2)return 0;
for(int iA=0;iA<hC;iA++)for(int iC2=0;iC2<hC;iC2++){if(iA==iC2||sHB[iA]<=sHB[iC2]||sH[iC2]>=sH[iA]-10*pip)continue;
for(int iB=0;iB<lC;iB++){if(sHB[iA]<=sLB[iB]||sLB[iB]<=sHB[iC2])continue;
for(int iD=0;iD<lC;iD++){if(iB==iD||sHB[iC2]<=sLB[iD]||sL[iD]>=sL[iB])continue;
bool m3=false;if(Bars>=8){double o1=Open[3],c1=Close[3],o2=Open[0],c2=Close[0];double b1=MathAbs(c1-o1);if(c2>o2&&c1<o1&&MathAbs(c2-o2)>b1*0.5)m3=true;}
bool m5=false;if(iBars(NULL,PERIOD_M5)>=3){double o1=iOpen(NULL,PERIOD_M5,2),c1=iClose(NULL,PERIOD_M5,2),o2=iOpen(NULL,PERIOD_M5,1),c2=iClose(NULL,PERIOD_M5,1);double b1=MathAbs(c1-o1);if(c2>o2&&c1<o1&&MathAbs(c2-o2)>b1*0.5)m5=true;}
if((m3||m5)&&Close[0]>sL[iD]&&Close[0]<sH[iC2]){qmrA=sH[iA];qmrB=sL[iB];qmrC=sH[iC2];qmrD=sL[iD];qmrActive=true;qmrExpire=TimeCurrent()+900;return 1;}}}}
for(int iA=0;iA<lC;iA++)for(int iC2=0;iC2<lC;iC2++){if(iA==iC2||sLB[iA]<=sLB[iC2]||sL[iC2]<=sL[iA]+10*pip)continue;
for(int iB=0;iB<hC;iB++){if(sLB[iA]<=sHB[iB]||sHB[iB]<=sLB[iC2])continue;
for(int iD=0;iD<hC;iD++){if(iB==iD||sLB[iC2]<=sHB[iD]||sH[iD]>=sH[iB])continue;
bool m3=false;if(Bars>=8){double o1=Open[3],c1=Close[3],o2=Open[0],c2=Close[0];double b1=MathAbs(c1-o1);if(c2<o2&&c1>o1&&MathAbs(c2-o2)>b1*0.5)m3=true;}
bool m5=false;if(iBars(NULL,PERIOD_M5)>=3){double o1=iOpen(NULL,PERIOD_M5,2),c1=iClose(NULL,PERIOD_M5,2),o2=iOpen(NULL,PERIOD_M5,1),c2=iClose(NULL,PERIOD_M5,1);double b1=MathAbs(c1-o1);if(c2<o2&&c1>o1&&MathAbs(c2-o2)>b1*0.5)m5=true;}
if((m3||m5)&&Close[0]<sH[iD]&&Close[0]>sL[iC2]){qmrA=sL[iA];qmrB=sH[iB];qmrC=sL[iC2];qmrD=sH[iD];qmrActive=true;qmrExpire=TimeCurrent()+900;return -1;}}}}
return 0;}
void AddRNLevel(double &arr[],int &cnt,double lv){if(cnt>=100)return;for(int i=0;i<cnt;i++)if(MathAbs(arr[i]-lv)<0.000001)return;arr[cnt]=lv;cnt++;}
double ScoreRoundNumber(double level,double pip){
double score=0,tol=3*pip;int touches=0,ru=0,rd=0;
for(int i=1;i<=LOOKBACK&&i<Bars;i++){double h=High[i],l=Low[i],c=Close[i],o=Open[i];
if(h>=level-tol&&l<=level+tol){touches++;
if(l<=level+tol&&c>level+tol){ru++;double bdy=MathMin(o,c),lw=bdy-l,rng=h-l;if(rng>0&&lw>rng*0.5)score+=5;}
if(h>=level-tol&&c<level-tol){rd++;double bdyH=MathMax(o,c),uw=h-bdyH,rng=h-l;if(rng>0&&uw>rng*0.5)score+=5;}}}
score+=touches*3;score+=ru*8+rd*8;
if(touches>=4)score+=15;else if(touches>=3)score+=10;else if(touches>=2)score+=5;
return score;}
double FindBestHiddenRoundNumber(double curPrice){
bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;int dg=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg<=0)dg=5;
double levels[];int levelCount=0;ArrayResize(levels,100);
double b100=MathFloor(curPrice/(100*pip))*(100*pip);for(int i=-1;i<=2;i++)AddRNLevel(levels,levelCount,b100+i*100*pip);
double b50=MathFloor(curPrice/(50*pip))*(50*pip);for(int i=-2;i<=3;i++)AddRNLevel(levels,levelCount,b50+i*50*pip);
double b25=MathFloor(curPrice/(25*pip))*(25*pip);for(int i=-3;i<=4;i++)AddRNLevel(levels,levelCount,b25+i*25*pip);
double b10=MathFloor(curPrice/(10*pip))*(10*pip);for(int i=-5;i<=6;i++)AddRNLevel(levels,levelCount,b10+i*10*pip);
double b5=MathFloor(curPrice/(5*pip))*(5*pip);for(int i=-4;i<=5;i++)AddRNLevel(levels,levelCount,b5+i*5*pip);
double bestLevel=0,bestScore=-1;
for(int i=0;i<levelCount;i++){double lv=levels[i],dist=MathAbs(curPrice-lv)/pip;if(dist>60)continue;double dp=(dist>40)?20:(dist>30)?10:(dist>20)?5:0;double sc=ScoreRoundNumber(lv,pip)-dp;if(sc<5)continue;if(sc>bestScore){bestScore=sc;bestLevel=lv;}}
if(bestLevel==0){double n100=MathRound(curPrice/(100*pip))*(100*pip),n50=MathRound(curPrice/(50*pip))*(50*pip),n25=MathRound(curPrice/(25*pip))*(25*pip),n10=MathRound(curPrice/(10*pip))*(10*pip),n5=MathRound(curPrice/(5*pip))*(5*pip);
double d100=MathAbs(curPrice-n100),d50=MathAbs(curPrice-n50),d25=MathAbs(curPrice-n25),d10=MathAbs(curPrice-n10);
if(d100<30*pip)bestLevel=n100;else if(d50<20*pip)bestLevel=n50;else if(d25<15*pip)bestLevel=n25;else if(d10<10*pip)bestLevel=n10;else bestLevel=n5;}
g_hrn_score=bestScore;return NormalizeDouble(bestLevel,dg);}
void ScanHRNLevels(){g_rj_cnt=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
for(int i=1;i<=LOOKBACK&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];
if(uw>rg*0.35){double lv=High[i];if(MathAbs(lv-cur)<=40*pip){bool f=false;for(int k=0;k<g_rj_cnt;k++)if(MathAbs(g_rj[k].price-lv)<8*pip){g_rj[k].touches++;f=true;break;}if(!f&&g_rj_cnt<MAX_REJ){g_rj[g_rj_cnt].price=lv;g_rj[g_rj_cnt].touches=1;g_rj_cnt++;}}}
if(lw>rg*0.35){double lv=Low[i];if(MathAbs(lv-cur)<=40*pip){bool f=false;for(int k=0;k<g_rj_cnt;k++)if(MathAbs(g_rj[k].price-lv)<8*pip){g_rj[k].touches++;f=true;break;}if(!f&&g_rj_cnt<MAX_REJ){g_rj[g_rj_cnt].price=lv;g_rj[g_rj_cnt].touches=1;g_rj_cnt++;}}}}
for(int i=0;i<g_rj_cnt-1;i++)for(int j=0;j<g_rj_cnt-i-1;j++)if(g_rj[j].touches<g_rj[j+1].touches){RejLevel tmp=g_rj[j];g_rj[j]=g_rj[j+1];g_rj[j+1]=tmp;}}
void UpdateHRN(){
if(Bars<LOOKBACK+10)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;int dg=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg<=0)dg=5;
if(Time[0]!=g_hrn_scan_bar){double nH=FindBestHiddenRoundNumber(Close[0]);if(g_hrn_price==0||MathAbs(nH-g_hrn_price)>2*pip){g_hrn_price=nH;g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}g_hrn_scan_bar=Time[0];}
double tol=1*pip;
if(g_hrn_is_sup){if(Bars>=3){bool c1b=(Close[1]<g_hrn_price-tol),c2b=(Close[2]<g_hrn_price-tol);if(c1b&&c2b){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}else if(c1b)g_hrn_brk_bars=1;else g_hrn_brk_bars=0;}}
else{if(Bars>=3){bool c1a=(Close[1]>g_hrn_price+tol),c2a=(Close[2]>g_hrn_price+tol);if(c1a&&c2a){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}else if(c1a)g_hrn_brk_bars=1;else g_hrn_brk_bars=0;}}
if(g_hrn_brk_bars>=HRN_CONFIRM_BARS){double nH=FindBestHiddenRoundNumber(Close[0]);if(MathAbs(nH-g_hrn_price)>3*pip){g_hrn_price=nH;g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}else{g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}}
g_hrn_str=DoubleToString(NormalizeDouble(g_hrn_price,dg),dg);
color hrnColor=g_hrn_is_sup?NEON_GREEN:NEON_RED;if(g_hrn_brk_bars==1)hrnColor=NEON_YELLOW;
DrawHLine(PFX+"HRN_LINE",g_hrn_price,hrnColor,3,STYLE_SOLID);
string ln=PFX+"HRN_LBL";SafeDel(ln);string typeStr=g_hrn_is_sup?"SUP":"RES";string confStr=(g_hrn_brk_bars==1)?" [1/2]":(g_hrn_confirmed_break?" [SHIFTING]":"");
ObjectCreate(0,ln,OBJ_TEXT,0,Time[0]+Period()*60*2,g_hrn_price);ObjectSetText(ln,"HRN "+typeStr+" "+g_hrn_str+confStr,10,"Arial Bold",hrnColor);ObjectSetInteger(0,ln,OBJPROP_BACK,false);}
void AddRes(double lv){if(lv<=0)return;for(int i=0;i<resCount;i++)if(MathAbs(ResLevels[i]-lv)<10*Point)return;if(resCount>=MAX_LEVELS){for(int i=0;i<MAX_LEVELS-1;i++)ResLevels[i]=ResLevels[i+1];resCount=MAX_LEVELS-1;}ResLevels[resCount++]=lv;}
void AddSup(double lv){if(lv<=0)return;for(int i=0;i<supCount;i++)if(MathAbs(SupLevels[i]-lv)<10*Point)return;if(supCount>=MAX_LEVELS){for(int i=0;i<MAX_LEVELS-1;i++)SupLevels[i]=SupLevels[i+1];supCount=MAX_LEVELS-1;}SupLevels[supCount++]=lv;}
void DrawNearestSR(){
// Remove ALL old SR lines from chart — NO shifting lines
for(int i=0;i<20;i++){SafeDel(PFX+"RES_"+IntegerToString(i));SafeDel(PFX+"SUP_"+IntegerToString(i));}
SafeDel(PFX+"NEAREST_RES");
SafeDel(PFX+"NEAREST_SUP");
// Only calculate values for dashboard — NO chart lines drawn
double cur=Close[0]; g_nearest_res=0; g_nearest_sup=0;
double mR=999999, mS=999999;
for(int i=0;i<resCount;i++)
if(ResLevels[i]>cur && (ResLevels[i]-cur)<mR){ mR=ResLevels[i]-cur; g_nearest_res=ResLevels[i]; }
for(int i=0;i<supCount;i++)
if(SupLevels[i]<cur && (cur-SupLevels[i])<mS){ mS=cur-SupLevels[i]; g_nearest_sup=SupLevels[i]; }
// Values used only in dashboard S/R cube — chart pe koi line nahi
}
void CheckBRK(){double pC=Close[1],pO=Open[1];g_brk_str="NO BRK";g_brk_color=CGR;if(g_nearest_res>0&&pC>g_nearest_res&&pO<=g_nearest_res){g_brk_str="BRK UP!";g_brk_color=NEON_GREEN;}else if(g_nearest_sup>0&&pC<g_nearest_sup&&pO>=g_nearest_sup){g_brk_str="BRK DOWN!";g_brk_color=NEON_RED;}}
void UpdateSR(){
// Only run once per new candle
if(Time[0]==lastSRBar) return;
lastSRBar=Time[0];
if(Bars<15) return;
bool jpy=(StringFind(Symbol(),"JPY")>=0);
double pip=jpy?0.01:0.0001;
double cur=Close[0];
// Find swing highs/lows from last 10 bars as potential S/R
// Use stronger candles (body > 40% of range)
for(int i=2;i<=10;i++){
double rng=High[i]-Low[i];
double bd=MathAbs(Close[i]-Open[i]);
if(rng<=0) continue;
// Swing high candidate: higher than neighbors
if(High[i]>High[i-1]&&High[i]>High[i+1]&&High[i]>cur+5*pip){
AddRes(High[i]);
}
// Swing low candidate
if(Low[i]<Low[i-1]&&Low[i]<Low[i+1]&&Low[i]<cur-5*pip){
AddSup(Low[i]);
}
}
// If arrays empty, add basic levels
if(resCount<1){double nR=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,10,1)];if(nR>cur)AddRes(nR);}
if(supCount<1){double nS=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,10,1)];if(nS<cur)AddSup(nS);}
DrawNearestSR();
CheckBRK();
}
void UpdateTimer(){
if(!SHOW_TIMER) return;
string nm = PFX+"candle_timer";
int ps = Period() * 60;
int el = (int)(TimeCurrent() - Time[0]);
int rem = ps - el;
if(rem <= 0) rem = ps;
if(rem > ps) rem = ps;
int mm = rem / 60, ss = rem % 60;
string t = (mm > 0 ? IntegerToString(mm) + ":" : "") +
(ss < 10 ? "0" : "") + IntegerToString(ss) + "s";
// Chart pe candle ke right mein 8px offset
// Time = current bar close time (Time[0] + period)
// Price = High[0] ka thoda upar
double atrVal = iATR(NULL, PERIOD_M1, 14, 0);
double offset = (atrVal > 0) ? atrVal * 0.25 : Point * 30;
// Candle ke TIME ke thoda baad place karo = right side mein dikhega
datetime tPos = Time[0] + 8; // 8 seconds = candle ke right mein
double pPos = High[0] + offset;
if(ObjectFind(0, nm) < 0){
ObjectCreate(0, nm, OBJ_TEXT, 0, tPos, pPos);
ObjectSetInteger(0, nm, OBJPROP_BACK, false);
ObjectSetInteger(0, nm, OBJPROP_SELECTABLE, false);
ObjectSetInteger(0, nm, OBJPROP_HIDDEN, false);
}
ObjectSetInteger(0, nm, OBJPROP_TIME, tPos);
ObjectSetDouble (0, nm, OBJPROP_PRICE, pPos);
ObjectSetText(nm, t, 11, "Arial Bold", NEON_YELLOW);
}
void InitNW(){NW[0]=0.852;NW[1]=0.724;NW[2]=0.913;NW[3]=0.681;NW[4]=0.795;NW[5]=0.836;NW[6]=0.772;NW[7]=0.894;NW[8]=0.623;NW[9]=0.748;NW[10]=0.887;NW[11]=0.716;NW[12]=0.661;NW[13]=0.829;NW[14]=0.753;NW[15]=0.942;NW[16]=0.784;NW[17]=0.697;NW[18]=0.871;NW[19]=0.735;NW[20]=0.813;NW[21]=0.768;NW[22]=0.932;NW[23]=0.674;NW[24]=0.845;NW[25]=0.709;NW[26]=0.888;NW[27]=0.651;NW[28]=0.921;NW[29]=0.743;NW[30]=0.802;NW[31]=0.867;NW[32]=1.24;NW[33]=-0.93;NW[34]=1.15;NW[35]=-1.08;}
void Bx(string id,int x,int y,int w,int h,color bg,color bd){string n=PFX+id;if(ObjectFind(0,n)<0)ObjectCreate(0,n,OBJ_RECTANGLE_LABEL,0,0,0);ObjectSetInteger(0,n,OBJPROP_XDISTANCE,x);ObjectSetInteger(0,n,OBJPROP_YDISTANCE,y);ObjectSetInteger(0,n,OBJPROP_XSIZE,w);ObjectSetInteger(0,n,OBJPROP_YSIZE,h);ObjectSetInteger(0,n,OBJPROP_BGCOLOR,bg);ObjectSetInteger(0,n,OBJPROP_BORDER_TYPE,BORDER_FLAT);ObjectSetInteger(0,n,OBJPROP_COLOR,bd);ObjectSetInteger(0,n,OBJPROP_BACK,false);}
void Tx(string id,int x,int y,string txt,color tc,int fs,bool bold){string n=PFX+id;if(ObjectFind(0,n)<0)ObjectCreate(0,n,OBJ_LABEL,0,0,0);ObjectSetInteger(0,n,OBJPROP_XDISTANCE,x);ObjectSetInteger(0,n,OBJPROP_YDISTANCE,y);ObjectSetText(n,txt,fs,bold?"Arial Bold":"Arial",tc);ObjectSetInteger(0,n,OBJPROP_BACK,false);}
void NeonBar(string id,int x,int y,int w,int h,double pct,color fc){Bx(id+"_bg",x,y,w,h,BG_DARK4,BG_DARK4);int fw=(int)(pct/100.0*w);if(fw<4)fw=4;if(fw>w)fw=w;Bx(id+"_f",x,y,fw,h,fc,fc);}
void Cube(string id,int x,int y,int w,int h,color bc,color bg,string lbl,color lc,string val,color vc,int vfs){Bx(id,x,y,w,h,bg,bc);if(StringLen(lbl)>0)Tx(id+"_l",x+10,y+6,lbl,lc,11,true);if(StringLen(val)>0)Tx(id+"_v",x+10,y+38,val,vc,vfs,true);}
void DrawOtherPairsCube(int x,int y,int w,int h){
Bx("c20",x,y,w,h,BG_DARK2,NEON_GOLD);
Tx("c20_l",x+8,y+4,"OTHER PAIRS",NEON_CYAN,10,true);
if(g_pairCount==0){
Tx("c20_v0",x+8,y+30,"No signals yet",CGR,10,false);
Tx("c20_v1",x+8,y+52,"(need 2+ instances)",C'100,100,100',9,false);
return;
}
// NO bars at all — only text lines, 20px per entry, no overlap possible
int lY=24;
for(int i=0;i<g_pairCount&&i<5;i++){
if(lY+16 > h-4) break;
string sp=g_pairNames[i];
if(StringLen(sp)>9) sp=StringSubstr(sp,0,9);
int qScore=(int)g_pairConfs[i];
string qLabel;
if(qScore>=80) qLabel="[S]";
else if(qScore>=65) qLabel="[G]";
else if(qScore>=50) qLabel="[M]";
else qLabel="[W]";
// Check if NCP signal matches this pair's signal
bool ncpMatch = (ENABLE_MTG &&
(g_mtgState=="CALL"||g_mtgState=="PUT"||
g_mtgState=="CALL TRAP"||g_mtgState=="PUT TRAP") &&
g_pairSigs[i]==StringSubstr(g_mtgState,0,4)); // "CALL" or "PUT_"
// More precise match check
bool isCallSig = (g_mtgState=="CALL"||g_mtgState=="CALL TRAP");
bool isPutSig = (g_mtgState=="PUT" ||g_mtgState=="PUT TRAP");
ncpMatch = ((isCallSig && g_pairSigs[i]=="CALL") ||
(isPutSig && g_pairSigs[i]=="PUT"));
// Color: purple if NCP matches, else normal green/red
color dc;
string prefix="";
if(ncpMatch){
dc = NEON_PURPLE; // NCP condition matched = purple
prefix = "* "; // Star marker
} else {
dc = (g_pairSigs[i]=="CALL") ? NEON_GREEN : NEON_RED;
}
string txt=prefix+sp+" "+g_pairSigs[i]+" "+IntegerToString(qScore)+qLabel;
Tx("c20_p"+IntegerToString(i),x+8,y+lY,txt,dc,10,true);
lY+=20;
}
}
void DrawOTCQuickCube(int x,int y,int w,int h){
Bx("c_quick",x,y,w,h,BG_DARK2,NEON_LIME);Tx("c_quick_l",x+8,y+2,"OTC QUICK",NEON_CYAN,10,true);
int age=(int)(TimeCurrent()-Time[0]);int ps=Period()*60;int rem=ps-age;if(rem<0)rem=0;
int mm=rem/60,ss2=rem%60;string tl=(mm>0?IntegerToString(mm)+"m ":"")+IntegerToString(ss2)+"s";
Tx("c_quick_t",x+8,y+20,"Time: "+tl,NEON_GOLD,11,true);
double spread=MarketInfo(Symbol(),MODE_SPREAD);color spC=(spread<=BROKER_SPREAD_THRESHOLD)?NEON_GREEN:NEON_ORANGE;
Tx("c_quick_s",x+8,y+38,"Spread: "+DoubleToString(spread,0),spC,10,true);
// VOLUME FIX: Bar[1]=last closed candle vs Bar[2]=candle before it (1 candle comparison only)
double volLast = (double)iVolume(NULL,PERIOD_M1,1); // Last fully closed candle
double volPrev = (double)iVolume(NULL,PERIOD_M1,2); // Candle just before last
double volRatio = (volPrev > 0) ? volLast / volPrev : 1.0;
bool candleBull = (Close[1] > Open[1]);
bool candleBear = (Close[1] < Open[1]);
color vColor; string vText;
if(candleBull){
if(volRatio>=2.0){vColor=NEON_GREEN;vText="UP "+DoubleToString(volRatio,1)+"x HI";}
else if(volRatio>=1.3){vColor=NEON_LIME;vText="UP "+DoubleToString(volRatio,1)+"x MD";}
else if(volRatio>=0.8){vColor=NEON_CYAN;vText="UP "+DoubleToString(volRatio,1)+"x LO";}
else{vColor=NEON_YELLOW;vText="UP "+DoubleToString(volRatio,1)+"x WK";}
} else if(candleBear){
if(volRatio>=2.0){vColor=NEON_RED;vText="DN "+DoubleToString(volRatio,1)+"x HI";}
else if(volRatio>=1.3){vColor=NEON_ORANGE;vText="DN "+DoubleToString(volRatio,1)+"x MD";}
else if(volRatio>=0.8){vColor=NEON_PINK;vText="DN "+DoubleToString(volRatio,1)+"x LO";}
else{vColor=NEON_YELLOW;vText="DN "+DoubleToString(volRatio,1)+"x WK";}
} else{vColor=NEON_YELLOW;vText="DOJI "+DoubleToString(volRatio,1)+"x";}
Tx("c_quick_v",x+8,y+56,vText,vColor,11,true);
string es=GetEntryStatus();color eC=GetEntryColor();Tx("c_quick_e",x+8,y+76,es,eC,10,true);}
string GetEntryStatus(){
int age=(int)(TimeCurrent()-Time[0]);int ps=Period()*60;int rem=ps-age;if(rem<0)rem=0;string ms=DetectMyStrategy();
if(ms!="WAIT"){string type=(g_strategyType=="TRAP")?"TRAP":"TREND";
if(ENTRY_MODE=="FLAG"){if(age<FLAG_MIN_SEC)return type+" WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s";if(rem<MIN_REMAINING_SEC)return type+" EXPIRED";if(age>FLAG_MAX_SEC)return type+" LATE";return type+" OPEN "+IntegerToString(rem)+"s";}
if(age<TIME_MIN_SEC)return type+" WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s";if(age>TIME_MAX_SEC)return type+" CLOSED";return type+" OPEN "+IntegerToString(age)+"s";}
if(ENTRY_MODE=="FLAG"){if(age<FLAG_MIN_SEC)return "WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s";if(rem<MIN_REMAINING_SEC)return "EXPIRED";if(age>FLAG_MAX_SEC)return "LATE";return "OPEN "+IntegerToString(rem)+"s left";}
if(age<TIME_MIN_SEC)return "WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s";if(age>TIME_MAX_SEC)return "CLOSED";return "OPEN "+IntegerToString(age)+"s";}
color GetEntryColor(){string s=GetEntryStatus();if(StringFind(s,"TRAP OPEN")>=0)return NEON_PURPLE;if(StringFind(s,"TREND OPEN")>=0)return NEON_LIME;if(StringFind(s,"OPEN")>=0)return NEON_GREEN;if(StringFind(s,"WAIT")>=0)return NEON_YELLOW;if(StringFind(s,"LATE")>=0||StringFind(s,"EXPIRED")>=0||StringFind(s,"CLOSED")>=0)return NEON_ORANGE;return NEON_RED;}
bool DirectionOK(){if(!ENABLE_ENTRY_ZONE)return true;double cur=Close[0],lo=Low[0],hi=High[0],rg=hi-lo;if(rg==0)return true;double pos=(cur-lo)/rg*100.0;if(MathMax(g_calc_gProb,g_calc_rProb)>=85)return true;string ms=DetectMyStrategy();if(ms=="CALL")return(pos>REVERSAL_PCT);if(ms=="PUT")return(pos<(100.0-REVERSAL_PCT));if(StringFind(g_adv1,"CALL")>=0)return(pos>REVERSAL_PCT&&(hi-cur)<rg*WICK_PCT);if(StringFind(g_adv1,"PUT")>=0)return(pos<(100.0-REVERSAL_PCT)&&(cur-lo)<rg*WICK_PCT);return true;}
bool EntryPrecisionOK(){if(TRADE_MODE=="GOD")return true;if(g_calc_gProb>80&&Close[0]<Open[0])return false;if(g_calc_rProb>80&&Close[0]>Open[0])return false;return true;}
bool ConsensusOK(){if(!CONSENSUS_FILTER)return true;string ms=DetectMyStrategy();if(ms=="WAIT")return true;bool haAgree=false;if(ms=="CALL"&&(g_haM1=="HA BULLISH 1"||g_haBoth=="BOTH BULL"))haAgree=true;if(ms=="PUT"&&(g_haM1=="HA BEARISH 1"||g_haBoth=="BOTH BEAR"))haAgree=true;return haAgree;}
void SendTelegramAlert(string message){
if(!ENABLE_TELEGRAM)return;if(StringLen(TELEGRAM_TOKEN)<10||StringLen(TELEGRAM_CHAT_ID)<5)return;
string url="https://api.telegram.org/bot"+TELEGRAM_TOKEN+"/sendMessage?chat_id="+TELEGRAM_CHAT_ID+"&text="+message;
char post[];char result_data[];string result_headers;int timeout=5000;
int res=WebRequest("GET",url,"",timeout,post,result_data,result_headers);
if(res==-1)Print("Telegram failed: ",GetLastError());}
//+------------------------------------------------------------------+
// MAIN DRAW FUNCTION
//+------------------------------------------------------------------+
void Draw(){
HideSPM(); DelDashboard();
int W=DASH_W,G=8,CW=(W-2*G)/3,CH=110,cx=POS_X+G,yy=POS_Y;
int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
g_marketMode=DetectMarketMode(brain,g_rsc,cp,nb);
if(StringLen(g_prevMode)>0&&g_prevMode!=g_marketMode){g_signalTime=0;g_finalSignal="WAIT";}
g_prevMode=g_marketMode;
CalcOTCCrowd();UpdateAccuracy();UpdateWeights();
double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
UpdateRiskControl();CheckMTFConfirmation();
double tfaScore=CalcAdvancedTFA(g_tfa_detail);
color ha1C=(g_haM1=="HA BULLISH 1")?NEON_GREEN:(g_haM1=="HA BEARISH 1")?NEON_RED:NEON_YELLOW;
color ha5C=(g_haM5=="HA BULLISH 5")?NEON_GREEN:(g_haM5=="HA BEARISH 5")?NEON_RED:NEON_YELLOW;
color biasClr;string biasStr=CalcAdvancedMarketBias(biasClr,brain,g_rsc);
// Strategy cube: g_strategyType already set in CalcPrediction() via DetectMyStrategy()
// Re-call se side-effects avoid karo — cached values use karo
string strategyMS = g_finalSignal; // Use already computed final signal direction
// But for strategy label, use g_strategyType and g_strategyReason directly
color stratC = (g_strategyType=="TRAP") ? NEON_PURPLE : (g_strategyType=="TREND") ? NEON_GREEN : CGR;
string stratSig = "";
if(g_strategyType=="TRAP" || g_strategyType=="TREND"){
// g_strategyReason has: "CALL xx% + HA GREEN" or "PUT xx% + HA RED"
if(StringFind(g_strategyReason,"CALL")>=0) stratSig = "CALL";
else if(StringFind(g_strategyReason,"PUT")>=0) stratSig = "PUT";
}
string stratLabel = (g_strategyType=="TRAP") ? "TRAP " + stratSig :
(g_strategyType=="TREND") ? "TREND " + stratSig : "NO STRATEGY";
// ============================================================
// SIGNAL CUBE - BB PULLBACK INTEGRATED - FIXED COLORS
// ============================================================
string finalSig = g_finalSignal;
color sigC = NEON_YELLOW; // Default = YELLOW (WAIT)
// BB signal integration: agar regular WAIT hai aur BB signal active hai
if(ENABLE_BB_PULLBACK && g_bbSignal != "--" && (finalSig == "WAIT" || finalSig == "")){
finalSig = "BB " + g_bbSignal;
sigC = g_bbColor; // GREEN for CALL, RED for PUT, YELLOW for no signal
} else {
if(finalSig=="CALL") sigC = NEON_GREEN;
else if(finalSig=="PUT") sigC = NEON_RED;
else if(finalSig=="WEAK CALL") sigC = NEON_CYAN;
else if(finalSig=="WEAK PUT") sigC = NEON_ORANGE;
else sigC = NEON_YELLOW; // WAIT = always YELLOW
}
// ROW 1 - PAIR, SIGNAL, NEXT CANDLE (CH=110)
Cube("c1",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"PAIR",NEON_CYAN,Symbol(),NEON_BLUE,13);
Bx("c2",cx+CW+G,yy,CW,CH,BG_DARK2,sigC);
Tx("c2_l",cx+CW+G+10,yy+4,"SIGNAL",NEON_CYAN,10,true);
Tx("c2_v",cx+CW+G+10,yy+26,finalSig,sigC,13,true);
if(ENABLE_BB_PULLBACK){
string ha30Txt=Is30SecHABull()?"HA30:BULL":Is30SecHABear()?"HA30:BEAR":"HA30:DOJI";
color ha30C=Is30SecHABull()?NEON_GREEN:Is30SecHABear()?NEON_RED:NEON_YELLOW;
Tx("c2_ha30",cx+CW+G+10,yy+60,ha30Txt,ha30C,9,false);
if(g_bbSignal!="--")Tx("c2_bb",cx+CW+G+10,yy+78,g_bbDetail,g_bbColor,9,false);
}
double gP,rP;string rsn;color pClr;
CalcAdvancedPrediction(gP,rP,rsn,pClr);
g_frozen_gProb=gP;g_frozen_rProb=rP;g_frozen_pAction=rsn;g_frozen_pColor=pClr;g_last_freeze_bar=Time[0];
Bx("c_pred",cx+2*(CW+G),yy,CW,CH,BG_DARK2,pClr);
Tx("c_pred_l",cx+2*(CW+G)+10,yy+4,"NEXT CANDLE",NEON_CYAN,10,true);
int bW=CW-20,gBW=(int)(gP/100.0*bW),rBW=(int)(rP/100.0*bW);
if(gBW<3)gBW=3;if(rBW<3)rBW=3;
Bx("c_pred_gbg",cx+2*(CW+G)+10,yy+22,bW,7,BG_DARK4,BG_DARK4);
Bx("c_pred_gfg",cx+2*(CW+G)+10,yy+22,gBW,7,NEON_GREEN,NEON_GREEN);
Tx("c_pred_gp",cx+2*(CW+G)+10,yy+31,"G:"+DoubleToString(gP,0)+"%",NEON_GREEN,11,true);
Bx("c_pred_rbg",cx+2*(CW+G)+10,yy+48,bW,7,BG_DARK4,BG_DARK4);
Bx("c_pred_rfg",cx+2*(CW+G)+10,yy+48,rBW,7,NEON_RED,NEON_RED);
Tx("c_pred_rp",cx+2*(CW+G)+10,yy+57,"R:"+DoubleToString(rP,0)+"%",NEON_RED,11,true);
Tx("c_pred_a",cx+2*(CW+G)+10,yy+76,rsn,pClr,11,true);
NeonBar("c_pred_b",cx+2*(CW+G)+10,yy+92,bW,7,MathMax(gP,rP),pClr);
yy+=CH+G;
// ROW 2 - NEURAL AI, CROWD, SESSION (CH=110)
Cube("c7",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"NEURAL AI",NEON_CYAN,DoubleToString(nb,1)+"%",(nb>72)?NEON_ORANGE:(nb<35)?NEON_CYAN:NEON_GREEN,16);
NeonBar("c7b",cx+12,yy+92,CW-24,7,nb,(nb>72)?NEON_ORANGE:(nb<35)?NEON_CYAN:NEON_GREEN);
Bx("c8",cx+CW+G,yy,CW,CH,BG_DARK2,NEON_CYAN);
Tx("c8_l",cx+CW+G+10,yy+4,"CROWD",NEON_CYAN,10,true);
Tx("c8_c",cx+CW+G+10,yy+24,"CALL "+IntegerToString(g_otcCallPct)+"%",NEON_RED,14,true);
Tx("c8_p",cx+CW+G+10,yy+54,"PUT "+IntegerToString(g_otcPutPct)+"%",NEON_GREEN,14,true);
Tx("c8_b",cx+CW+G+10,yy+86,"OTC Crowd",NEON_GOLD,9,false);
color sClr=CGR;string sName=GetCurrentSession(sClr);bool isAct=IsSessionActive();
Bx("c_ses",cx+2*(CW+G),yy,CW,CH,BG_DARK2,sClr);
Tx("c_ses_l",cx+2*(CW+G)+10,yy+4,"SESSION",NEON_CYAN,10,true);
Tx("c_ses_v",cx+2*(CW+G)+10,yy+22,sName,sClr,14,true);
int gH=TimeHour(TimeGMT()),gMn=TimeMinute(TimeGMT());
Tx("c_ses_t",cx+2*(CW+G)+10,yy+54,"GMT "+(gH<10?"0":"")+IntegerToString(gH)+":"+(gMn<10?"0":"")+IntegerToString(gMn),NEON_WHITE,11,false);
Tx("c_ses_s",cx+2*(CW+G)+10,yy+76,isAct?"ACTIVE":"LOW VOL",isAct?NEON_GREEN:NEON_ORANGE,11,true);
yy+=CH+G;
// ROW 3 - OTHER PAIRS, OTC QUICK, BRAIN (Strategy hata diya)
DrawOtherPairsCube(cx,yy,CW,CH);
DrawOTCQuickCube(cx+CW+G,yy,CW,CH);
// BRAIN cube yahan (Row 3, position 3)
Bx("c_brain_r3",cx+2*(CW+G),yy,CW,CH,BG_DARK3,NEON_CYAN);
Tx("c_brain_r3_l",cx+2*(CW+G)+10,yy+5,"BRAIN",NEON_CYAN,10,true);
color brainClr3=(brain>0)?NEON_GREEN:NEON_RED;
Tx("c_brain_r3_v",cx+2*(CW+G)+10,yy+28,(brain>=0?"+":"")+DoubleToString(brain,1),brainClr3,22,true);
// Strategy info as small text below brain value
Tx("c_brain_r3_s",cx+2*(CW+G)+10,yy+72,stratLabel,stratC,10,false);
NeonBar("c_brain_r3_b",cx+2*(CW+G)+12,yy+92,CW-24,7,MathMin(100,MathAbs(brain)*8+50),(brain>0)?NEON_GREEN:NEON_RED);
yy+=CH+G;
// ROW 4 - MICRO AI, MICRO TRAP, TFA (CH4=120 - taller)
int CH4=120;
color maC;
if(mai>72)maC=NEON_ORANGE;else if(mai>55)maC=NEON_YELLOW;else if(mai>45)maC=NEON_CYAN;else maC=NEON_GREEN;
Cube("c_mai",cx,yy,CW,CH4,maC,BG_DARK2,"MICRO AI",NEON_CYAN,DoubleToString(mai,0)+"%",maC,16);
NeonBar("c_mai_b",cx+12,yy+104,CW-24,7,mai,maC);
color mtsC=(mts>=90)?NEON_PURPLE:(mts>=75)?NEON_RED:(mts>=50)?NEON_ORANGE:NEON_GREEN;
Cube("c_mts",cx+CW+G,yy,CW,CH4,mtsC,BG_DARK2,"MICRO TRAP",NEON_CYAN,"SCORE "+IntegerToString(mts),mtsC,14);
NeonBar("c_mts_b",cx+CW+G+12,yy+104,CW-24,7,MathMin(100,mts),mtsC);
// TFA SCORE - fixed, no overlap
int tfaInt=(int)tfaScore;color tfaColor;string tfaLabel;
if(tfaInt>=5){tfaLabel="STRONG";tfaColor=NEON_GREEN;}
else if(tfaInt>=4){tfaLabel="GOOD";tfaColor=NEON_LIME;}
else if(tfaInt>=3){tfaLabel="MEDIUM";tfaColor=NEON_YELLOW;}
else if(tfaInt>=2){tfaLabel="WEAK";tfaColor=NEON_ORANGE;}
else{tfaLabel="POOR";tfaColor=C'100,100,120';}
color tfaBC=tfaColor;string dirTxt="";
if(g_haM1=="HA BEARISH 1"){tfaBC=NEON_RED;dirTxt="[DOWN]";}
else if(g_haM1=="HA BULLISH 1"){tfaBC=NEON_GREEN;dirTxt="[UP]";}
else dirTxt="[MIX]";
Bx("c_tfa",cx+2*(CW+G),yy,CW,CH4,BG_DARK3,tfaBC);
Tx("c_tfa_l",cx+2*(CW+G)+10,yy+4,"TFA SCORE",NEON_CYAN,10,true);
Tx("c_tfa_v",cx+2*(CW+G)+10,yy+22,IntegerToString(tfaInt)+"/6 "+tfaLabel,tfaBC,12,true);
Tx("c_tfa_dir",cx+2*(CW+G)+10,yy+44,dirTxt,tfaBC,11,true);
// Split TFA detail into 2 short lines
string tdet=g_tfa_detail;
int pp=StringFind(tdet," | ");
string td1=(pp>=0)?StringSubstr(tdet,0,pp):tdet;
string td2=(pp>=0)?StringSubstr(tdet,pp+3):"";
if(StringLen(td1)>24)td1=StringSubstr(td1,0,23);
if(StringLen(td2)>24)td2=StringSubstr(td2,0,23);
Tx("c_tfa_d1",cx+2*(CW+G)+10,yy+62,td1,CGR,8,false);
if(StringLen(td2)>0)Tx("c_tfa_d2",cx+2*(CW+G)+10,yy+76,td2,CGR,8,false);
int tfaFW=(int)((double)tfaInt/6.0*(CW-20));if(tfaFW<2)tfaFW=2;if(tfaFW>CW-20)tfaFW=CW-20;
Bx("c_tfa_bb",cx+2*(CW+G)+10,yy+104,CW-20,7,BG_DARK4,BG_DARK4);
Bx("c_tfa_bf",cx+2*(CW+G)+10,yy+104,tfaFW,7,tfaBC,tfaBC);
yy+=CH4+G;
// ROW 5 - NCP PRO (replaces FRACTAL), MARKET BIAS, S/R LEVELS (CH5=120)
int CH5=120;
// NCP PRO v4.2 CUBE
if(ENABLE_MTG){
bool isTrap=(g_mtgState=="PUT TRAP"||g_mtgState=="CALL TRAP");
color mtgC=g_mtgClr;
if(mtgC==CGR||mtgC==clrGray) mtgC=C'55,65,85';
// Trap = purple flashing border
color borderC = isTrap ? NEON_PURPLE : mtgC;
Bx("c_mtg",cx,yy,CW,CH5,BG_DARK2,borderC);
// Title: NCP + run count
string runStr="";
if(g_mtgBullCount>=2) runStr=" "+IntegerToString(g_mtgBullCount)+"G-RUN";
else if(g_mtgBearCount>=2) runStr=" "+IntegerToString(g_mtgBearCount)+"R-RUN";
Tx("c_mtg_l",cx+10,yy+4,"NCP PRO"+runStr,NEON_PURPLE,9,true);
// State (big) — TRAP gets special size
int stateFS = isTrap ? 11 : 13;
Tx("c_mtg_s",cx+10,yy+20,g_mtgState,mtgC,stateFS,true);
// CALL% bar + text
int cW=(int)(g_mtgHype/100.0*(CW-22));if(cW<2)cW=2;if(cW>CW-22)cW=CW-22;
color cBarC=(g_mtgHype>=g_mtgBetrayal)?NEON_GREEN:C'35,70,35';
Bx("c_mtg_cbb",cx+10,yy+42,CW-22,6,BG_DARK4,BG_DARK4);
Bx("c_mtg_cbf",cx+10,yy+42,cW,6,cBarC,cBarC);
Tx("c_mtg_ct",cx+10,yy+50,"CALL: "+DoubleToString(g_mtgHype,1)+"%",NEON_GREEN,10,true);
// PUT% bar + text
int pW=(int)(g_mtgBetrayal/100.0*(CW-22));if(pW<2)pW=2;if(pW>CW-22)pW=CW-22;
color pBarC=(g_mtgBetrayal>g_mtgHype)?NEON_RED:C'70,25,25';
Bx("c_mtg_pbb",cx+10,yy+66,CW-22,6,BG_DARK4,BG_DARK4);
Bx("c_mtg_pbf",cx+10,yy+66,pW,6,pBarC,pBarC);
Tx("c_mtg_pt",cx+10,yy+74,"PUT: "+DoubleToString(g_mtgBetrayal,1)+"%",NEON_RED,10,true);
// Action — trap gets purple, else normal
string actD=g_mtgAction;if(StringLen(actD)>24)actD=StringSubstr(actD,0,23);
color actC=isTrap?NEON_PURPLE:(g_mtgState=="CALL")?NEON_GREEN:(g_mtgState=="PUT")?NEON_RED:NEON_YELLOW;
Tx("c_mtg_a",cx+10,yy+88,actD,actC,10,true);
// Strength + RSI
string rsnD=(StringLen(g_mtgReason)>0)?g_mtgReason:g_mtgPattern;
if(StringLen(rsnD)>24)rsnD=StringSubstr(rsnD,0,23);
Tx("c_mtg_r",cx+10,yy+104,rsnD,CGR,8,false);
} else {
double frac=CalcAdvancedFractal();
color frC=(frac>=75)?NEON_RED:(frac>=50)?NEON_ORANGE:(frac>=25)?NEON_YELLOW:NEON_GREEN;
string frT=(frac>=75)?"TRAP ZONE!":(frac>=50)?"WARNING":(frac>=25)?"CAUTION":"CLEAR";
Cube("c_frc",cx,yy,CW,CH5,frC,BG_DARK2,"FRACTAL",NEON_CYAN,frT,frC,13);
NeonBar("c_frc_b",cx+12,yy+104,CW-24,7,frac,frC);
}
// MARKET BIAS - fixed spacing
Bx("c_bias",cx+CW+G,yy,CW,CH5,BG_DARK2,biasClr);
Tx("c_bias_l",cx+CW+G+10,yy+4,"MARKET BIAS",NEON_CYAN,10,true);
string bStr=biasStr;if(StringLen(bStr)>13)bStr=StringSubstr(bStr,0,12);
Tx("c_bias_v",cx+CW+G+10,yy+22,bStr,biasClr,13,true);
Tx("c_bias_m",cx+CW+G+10,yy+52,"MODE: "+g_marketMode,(g_marketMode=="TREND")?NEON_GREEN:(g_marketMode=="REVERSAL")?NEON_RED:NEON_YELLOW,10,false);
color accC=(g_accuracy>=70)?NEON_GREEN:(g_accuracy>=60)?NEON_YELLOW:NEON_RED;
Tx("c_bias_a",cx+CW+G+10,yy+72,"ACC: "+DoubleToString(g_accuracy,1)+"%",accC,10,false);
NeonBar("c_bias_b",cx+CW+G+10,yy+88,CW-20,7,g_accuracy,accC);
// S/R LEVELS
int dg_sr=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg_sr<=0)dg_sr=5;
Bx("c18",cx+2*(CW+G),yy,CW,CH5,BG_DARK2,NEON_CYAN);
Tx("c18_l",cx+2*(CW+G)+10,yy+4,"S/R LEVELS",NEON_CYAN,10,true);
Tx("c18_r",cx+2*(CW+G)+10,yy+24,"R: "+(g_nearest_res>0?DoubleToString(g_nearest_res,dg_sr):"--"),NEON_RED,13,true);
Tx("c18_s",cx+2*(CW+G)+10,yy+54,"S: "+(g_nearest_sup>0?DoubleToString(g_nearest_sup,dg_sr):"--"),NEON_GREEN,13,true);
Tx("c18_b",cx+2*(CW+G)+10,yy+86,g_brk_str,g_brk_color,11,true);
yy+=CH5+G;
// ROW 6 - WICKS, HA CANDLES, REVERSAL (CH6=120)
int CH6=120;
color wickC=(mw>0.70)?NEON_RED:(mw>0.50)?NEON_ORANGE:NEON_GREEN;
Bx("c15",cx,yy,CW,CH6,BG_DARK2,wickC);
Tx("c15_l",cx+10,yy+4,"WICKS",NEON_CYAN,10,true);
Tx("c15_v",cx+10,yy+26,DoubleToString(mw,2),wickC,18,true);
Tx("c15_b",cx+10,yy+62,(mw>0.70)?"KILL SHOT":(mw>0.50)?"HIGH":"LOW",wickC,11,false);
NeonBar("c15_bar",cx+10,yy+80,CW-20,7,mw*100,wickC);
// HA CANDLES - fixed M5 cutoff
Bx("c_ha",cx+CW+G,yy,CW,CH6,BG_DARK2,ha1C);
Tx("c_ha_l",cx+CW+G+10,yy+4,"HA CANDLES",NEON_CYAN,10,true);
string haM1txt=g_haM1,haM5txt=g_haM5;
if(StringLen(haM1txt)>16)haM1txt=StringSubstr(haM1txt,3);
if(StringLen(haM5txt)>16)haM5txt=StringSubstr(haM5txt,3);
Tx("c_ha_m1",cx+CW+G+10,yy+24,"M1: "+haM1txt,ha1C,11,true);
Tx("c_ha_m5",cx+CW+G+10,yy+50,"M5: "+haM5txt,ha5C,11,true);
string haComb="";color haCombC=NEON_YELLOW;
if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5"){haComb="BOTH BULL";haCombC=NEON_GREEN;}
else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5"){haComb="BOTH BEAR";haCombC=NEON_RED;}
else if(g_haBoth=="MIXED")haComb="MIXED";
else haComb=g_haBoth;
Tx("c_ha_c",cx+CW+G+10,yy+76,haComb,haCombC,11,true);
// REVERSAL
string revReason=DetectSuddenReversal();color revColor=NEON_YELLOW;
if(StringFind(revReason,"BULL")>=0)revColor=NEON_GREEN;
if(StringFind(revReason,"BEAR")>=0)revColor=NEON_RED;
Bx("c_reason",cx+2*(CW+G),yy,CW,CH6,BG_DARK2,revColor);
Tx("c_reason_l",cx+2*(CW+G)+10,yy+4,"REVERSAL",NEON_CYAN,10,true);
Tx("c_reason_v",cx+2*(CW+G)+10,yy+36,(StringLen(revReason)>0?revReason:"No reversal"),revColor,10,false);
yy+=CH6+G;
// BB PULLBACK ROW - with ADX+RSI confirmation display
if(ENABLE_BB_PULLBACK){
int bbRowH=52;
color bbRowBorder = (g_bbSignal=="CALL")?NEON_GREEN:(g_bbSignal=="PUT")?NEON_RED:BB_GREY;
Bx("c_bb_row",cx,yy,W-2*G,bbRowH,BG_DARK3,bbRowBorder);
// Line 1: BB info + HA30 + bands
string ha30Str=Is30SecHABull()?"BULL":Is30SecHABear()?"BEAR":"DOJI";
color ha30C2=Is30SecHABull()?NEON_GREEN:Is30SecHABear()?NEON_RED:NEON_YELLOW;
double adxD=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);
double rsiD=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
double bbU2=iBands(NULL,PERIOD_M1,BB_PERIOD,BB_DEVIATION,0,PRICE_CLOSE,MODE_UPPER,0);
double bbL2=iBands(NULL,PERIOD_M1,BB_PERIOD,BB_DEVIATION,0,PRICE_CLOSE,MODE_LOWER,0);
int dg3=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg3<=0)dg3=5;
Tx("c_bb_row_l",cx+10,yy+4,"BB("+IntegerToString(BB_PERIOD)+") PULLBACK",BB_GREY,9,true);
Tx("c_bb_ha2",cx+190,yy+4,"HA30:"+ha30Str,ha30C2,9,true);
Tx("c_bb_adx",cx+310,yy+4,"ADX:"+DoubleToString(adxD,0),adxD>=20?NEON_LIME:CGR,9,false);
Tx("c_bb_rsi",cx+390,yy+4,"RSI:"+DoubleToString(rsiD,0),(rsiD>=70||rsiD<=30)?NEON_RED:CGR,9,false);
if(bbU2>0&&bbL2>0){
Tx("c_bb_u2",cx+470,yy+4,"U:"+DoubleToString(bbU2,dg3),NEON_ORANGE,8,false);
Tx("c_bb_d2",cx+570,yy+4,"L:"+DoubleToString(bbL2,dg3),NEON_CYAN,8,false);
}
// Line 2: Signal + full detail
if(g_bbSignal!="--"){
string sigTxt = "BB "+g_bbSignal+" | "+g_bbDetail;
if(StringLen(sigTxt)>60) sigTxt=StringSubstr(sigTxt,0,58)+"..";
Tx("c_bb_sig2",cx+10,yy+22,sigTxt,g_bbColor,10,true);
} else {
Tx("c_bb_sig2",cx+10,yy+22,"Waiting for BB touch + 2+ confirmations (HA30+ADX+RSI)...",CGR,9,false);
}
yy+=bbRowH+G;
}
// BOTTOM ROW - HRN, SPM, STRATEGY
int bottomW=(W-2*G-2*G)/3,bottomH=106;yy+=4;int x1=cx;
// HRN LEVEL
Bx("c_hrn",x1,yy,bottomW,bottomH,BG_DARK2,NEON_PINK);
Tx("c_hrn_l",x1+8,yy+4,"HRN LEVEL",NEON_PINK,10,true);
Tx("c_hrn_v",x1+8,yy+22,g_hrn_str,NEON_PINK,13,true);
Tx("c_hrn_t",x1+8,yy+46,g_hrn_is_sup?"SUPPORT":"RESISTANCE",NEON_PINK,10,false);
color scoreC=(g_hrn_score>=30)?NEON_GREEN:(g_hrn_score>=15)?NEON_YELLOW:NEON_ORANGE;
Tx("c_hrn_sc",x1+8,yy+62,"Score: "+DoubleToString(g_hrn_score,0),scoreC,10,false);
Tx("c_hrn_b",x1+8,yy+78,"Brk "+IntegerToString(g_hrn_brk_bars)+"/"+IntegerToString(HRN_CONFIRM_BARS),NEON_PINK,10,false);
Tx("c_hrn_s",x1+8,yy+94,g_isSideways?"SIDEWAYS":"TRENDING",g_isSideways?NEON_YELLOW:NEON_GREEN,9,false);
int x2=x1+bottomW+G;
// SPM
Bx("c5",x2,yy,bottomW,bottomH,BG_DARK3,NEON_CYAN);
Tx("c5_l",x2+10,yy+12,"SPM",NEON_CYAN,10,true);
Tx("c5_v",x2+10,yy+44,(g_rsc>=0?"+":"")+DoubleToString(g_rsc,1),(g_rsc>0)?NEON_GREEN:NEON_RED,22,true);
int x3=x2+bottomW+G;
// STRATEGY
Bx("c_strat_b",x3,yy,bottomW,bottomH,BG_DARK3,stratC);
Tx("c_strat_b_l",x3+10,yy+6,"STRATEGY",NEON_CYAN,10,true);
Tx("c_strat_b_v",x3+10,yy+30,stratLabel,stratC,11,true);
Tx("c_strat_b_r",x3+10,yy+60,g_strategyReason,CGR,8,false);
yy+=bottomH+5;
// FILTER STATUS BAR
int fsW=W-2*G;
color fsC=(g_filterStatus=="ALL CLEAR")?NEON_GREEN:(StringFind(g_filterStatus,"ACTIVE")>=0)?NEON_LIME:(StringFind(g_filterStatus,"LOCK")>=0)?NEON_RED:NEON_ORANGE;
Bx("c_filter",cx,yy,fsW,22,BG_DARK3,fsC);
Tx("c_filter_v",cx+10,yy+4,"FILTER: "+g_filterStatus,fsC,11,true);
HideSPM();
ChartRedraw();
}
void UpdateRiskControl(){
static datetime llt=0;
if(ENABLE_RISK_LOCK){if(g_lossStreak>=MAX_LOSS_STREAK){g_tradingStopped=true;llt=TimeCurrent();g_filterStatus="RISK LOCK "+IntegerToString(g_lossStreak)+"L";}if(g_tradingStopped&&TimeCurrent()-llt>3600){g_tradingStopped=false;g_lossStreak=0;g_filterStatus="RISK UNLOCK";}}}
void FinalSignalEngine(double brain,int cp,int mts){
g_filterStatus="ALL CLEAR";
if(ENABLE_RISK_CONTROL&&g_tradingStopped){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="RISK LOCKED";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(ENABLE_SESSION_FILTER&&!IsSessionActive()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="SESSION OFF";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(MTF_CONFIRM&&!g_mtfConfirmed){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="MTF NO CONF";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(ENABLE_SPIKE_FILTER&&IsBigCandle(1)){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="SPIKE BLOCK";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(ENABLE_LAST_SEC_BLOCK){int age=(int)(TimeCurrent()-Time[0]);int ps=Period()*60;int rem=ps-age;if(rem<0)rem=0;if(rem<MIN_REMAINING_SEC){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="LAST SEC BLOCK";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}}
double conf=MathMax(g_calc_gProb,g_calc_rProb);
if(conf<MIN_CONFIDENCE){g_finalSignal="WAIT";g_finalColor=NEON_YELLOW;g_filterStatus="LOW CONF "+DoubleToString(conf,0)+"%";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
bool reverseSignal=(g_accuracy<45.0&&g_acc_total>20);
if(reverseSignal)g_filterStatus="REVERSE MODE";
string ms=DetectMyStrategy();
if(ms!="WAIT"){
if(CONSENSUS_FILTER&&!ConsensusOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="NO CONSENSUS";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(ENABLE_ENTRY_ZONE&&!DirectionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="BAD ENTRY ZONE";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(!EntryPrecisionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="PRECISION FAIL";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(reverseSignal){if(ms=="CALL")ms="PUT";else if(ms=="PUT")ms="CALL";}
g_finalSignal=ms;g_finalColor=(ms=="CALL")?NEON_GREEN:NEON_RED;g_filterStatus=(g_strategyType=="TRAP")?"TRAP ACTIVE":"TREND ACTIVE";
if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT"){g_finalSignal=ms;g_signalTime=TimeCurrent();}
SendSignalNotification(ms,conf);return;}
double th=FAST_MODE?70:68;string rawSignal="WAIT";
if(g_calc_gProb>th)rawSignal="CALL";else if(g_calc_rProb>th)rawSignal="PUT";
else if(g_calc_gProb>60)rawSignal="WEAK CALL";else if(g_calc_rProb>60)rawSignal="WEAK PUT";
if(reverseSignal){if(rawSignal=="CALL")rawSignal="PUT";else if(rawSignal=="PUT")rawSignal="CALL";else if(rawSignal=="WEAK CALL")rawSignal="WEAK PUT";else if(rawSignal=="WEAK PUT")rawSignal="WEAK CALL";}
g_finalSignal=rawSignal;
if((g_finalSignal=="CALL"||g_finalSignal=="PUT")&&ENABLE_ENTRY_ZONE&&!DirectionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="BAD ENTRY ZONE";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if((g_finalSignal=="CALL"||g_finalSignal=="PUT")&&!EntryPrecisionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="PRECISION FAIL";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT")g_signalTime=TimeCurrent();
if(g_finalSignal=="CALL"){g_finalColor=NEON_GREEN;g_filterStatus="GREEN SIGNAL";SendSignalNotification("CALL",conf);}
else if(g_finalSignal=="PUT"){g_finalColor=NEON_RED;g_filterStatus="RED SIGNAL";SendSignalNotification("PUT",conf);}
else if(g_finalSignal=="WEAK CALL"){g_finalColor=NEON_CYAN;g_filterStatus="WEAK GREEN";}
else if(g_finalSignal=="WEAK PUT"){g_finalColor=NEON_ORANGE;g_filterStatus="WEAK RED";}
else g_finalColor=NEON_YELLOW;}
void SendSignalNotification(string sig,double conf){
if(!ENABLE_NOTIFY) return;
string msg=Symbol()+" | "+sig+" | "+DoubleToString(conf,0)+"% | "+g_filterStatus;
if(msg==g_lastNotified) return;
g_lastNotified=msg;
// NO popup Alert, NO SendNotification (mobile push) - removed as requested
// Only Telegram if enabled, and Print to log
if(ENABLE_TELEGRAM) SendTelegramAlert("AIBRAIN\n"+Symbol()+"\n"+sig+"\nConf: "+DoubleToString(conf,0)+"%\n"+g_filterStatus);
Print(msg);
}
void BroadcastSignal(){
double conf=MathMax(g_frozen_gProb,g_frozen_rProb);if(conf<55)return;
string fn="OTC_Signals_Master.txt",pair=Symbol();string sig=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
int exp=(int)(TimeCurrent()+65);string line=pair+"|"+sig+"|"+DoubleToString(conf,0)+"|"+IntegerToString((int)TimeCurrent())+"|"+IntegerToString(exp);
int h=FileOpen(fn,FILE_READ|FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);
if(h==INVALID_HANDLE){h=FileOpen(fn,FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);if(h==INVALID_HANDLE)return;FileWriteString(h,line+"\n");FileClose(h);return;}
string content="";while(!FileIsEnding(h)){string ex=FileReadString(h);if(StringLen(ex)>10&&StringFind(ex,pair+"|")!=0)content+=ex+"\n";}
content=line+"\n"+content;string lns[];int cnt=0,pos=0;int f=StringFind(content,"\n",pos);
while(f!=-1&&cnt<100){ArrayResize(lns,cnt+1);lns[cnt]=StringSubstr(content,pos,f-pos);cnt++;pos=f+1;f=StringFind(content,"\n",pos);}
if(pos<StringLen(content)){ArrayResize(lns,cnt+1);lns[cnt]=StringSubstr(content,pos);cnt++;}
if(cnt>50){content="";for(int i=0;i<50;i++)if(StringLen(lns[i])>10)content+=lns[i]+"\n";}
FileSeek(h,0,SEEK_SET);FileWriteString(h,content);FileFlush(h);FileClose(h);}
// ============================================================
// PAIR QUALITY SCORE - 1 MINUTE OTC OPTIMIZED
// Har pair ko 0-100 score deta hai based on:
// 1. HA M1 alignment (25 pts)
// 2. HA M5 alignment (15 pts)
// 3. RSI position (20 pts)
// 4. Volume spike (15 pts)
// 5. Momentum - consecutive candles (15 pts)
// 6. Spread check (10 pts)
// Returns score aur signal direction
// ============================================================
int CalcPairQuality(string pair, string &outSig, string &outDetail){
// HA M1 calculation
double o1=iOpen(pair,PERIOD_M1,1), h1=iHigh(pair,PERIOD_M1,1);
double l1=iLow(pair,PERIOD_M1,1), c1=iClose(pair,PERIOD_M1,1);
double o2=iOpen(pair,PERIOD_M1,2), h2=iHigh(pair,PERIOD_M1,2);
double l2=iLow(pair,PERIOD_M1,2), c2=iClose(pair,PERIOD_M1,2);
double o3=iOpen(pair,PERIOD_M1,3), c3=iClose(pair,PERIOD_M1,3);
if(o1==0||c1==0||o2==0||c2==0||o3==0||c3==0){ outSig="WAIT"; return 0; }
double haC1=(o1+h1+l1+c1)/4.0, haC2=(o2+h2+l2+c2)/4.0;
double haO2=(o3+c3)/2.0, haO1=(haO2+haC2)/2.0;
bool haM1Bull=(haC1>haO1), haM1Bear=(haC1<haO1);
double haBody=MathAbs(haC1-haO1), haRange=(h1-l1);
double haStrength=(haRange>0)? haBody/haRange : 0;
// HA M5
double m5_o1=iOpen(pair,PERIOD_M5,1), m5_h1=iHigh(pair,PERIOD_M5,1);
double m5_l1=iLow(pair,PERIOD_M5,1), m5_c1=iClose(pair,PERIOD_M5,1);
double m5_o2=iOpen(pair,PERIOD_M5,2), m5_h2=iHigh(pair,PERIOD_M5,2);
double m5_l2=iLow(pair,PERIOD_M5,2), m5_c2=iClose(pair,PERIOD_M5,2);
double m5_o3=iOpen(pair,PERIOD_M5,3), m5_c3=iClose(pair,PERIOD_M5,3);
bool haM5Bull=false, haM5Bear=false;
if(m5_o1>0&&m5_c1>0&&m5_o2>0&&m5_c2>0&&m5_o3>0&&m5_c3>0){
double m5haC1=(m5_o1+m5_h1+m5_l1+m5_c1)/4.0, m5haC2=(m5_o2+m5_h2+m5_l2+m5_c2)/4.0;
double m5haO2=(m5_o3+m5_c3)/2.0, m5haO1=(m5haO2+m5haC2)/2.0;
haM5Bull=(m5haC1>m5haO1); haM5Bear=(m5haC1<m5haO1);
}
// RSI M1
double rsi=iRSI(pair,PERIOD_M1,14,PRICE_CLOSE,1);
// Volume ratio (bar1 vs bar2)
double vol1=(double)iVolume(pair,PERIOD_M1,1);
double vol2=(double)iVolume(pair,PERIOD_M1,2);
double volRatio=(vol2>0)?vol1/vol2:1.0;
// Spread
double spread=(double)MarketInfo(pair,MODE_SPREAD);
// Momentum: consecutive candles same direction
int bullStreak=0, bearStreak=0;
for(int i=1;i<=4;i++){
double ci=iClose(pair,PERIOD_M1,i), oi=iOpen(pair,PERIOD_M1,i);
if(ci==0||oi==0) break;
if(ci>oi){ if(bearStreak>0)break; bullStreak++; }
else if(ci<oi){ if(bullStreak>0)break; bearStreak++; }
else break;
}
// ============================================================
// DETERMINE SIGNAL DIRECTION
// Priority: HA M1 + M5 both agree = strong
// ============================================================
bool bullDir=false, bearDir=false;
if(haM1Bull&&haM5Bull) { bullDir=true; }
else if(haM1Bear&&haM5Bear) { bearDir=true; }
else if(haM1Bull&&rsi<45) { bullDir=true; } // M1 bull + oversold
else if(haM1Bear&&rsi>55) { bearDir=true; } // M1 bear + overbought
else { outSig="WAIT"; return 0; }
// ============================================================
// SCORING
// ============================================================
int score=0;
string det="";
// 1. HA M1 (25 pts)
if(bullDir&&haM1Bull){ int s=(haStrength>0.6)?25:(haStrength>0.4)?18:12; score+=s; det+="HA1+"; }
if(bearDir&&haM1Bear){ int s=(haStrength>0.6)?25:(haStrength>0.4)?18:12; score+=s; det+="HA1+"; }
// 2. HA M5 alignment (15 pts)
if(bullDir&&haM5Bull){ score+=15; det+="HA5+"; }
else if(bearDir&&haM5Bear){ score+=15; det+="HA5+"; }
else det+="HA5-";
// 3. RSI zone (20 pts)
if(bullDir){
if(rsi<30){ score+=20; det+="RSI_OS "; }
else if(rsi<40){ score+=14; det+="RSI_low "; }
else if(rsi<50){ score+=8; det+="RSI_mid "; }
else{ score+=2; det+="RSI_hi "; }
} else {
if(rsi>70){ score+=20; det+="RSI_OB "; }
else if(rsi>60){ score+=14; det+="RSI_hi "; }
else if(rsi>50){ score+=8; det+="RSI_mid "; }
else{ score+=2; det+="RSI_lo "; }
}
// 4. Volume (15 pts)
if(volRatio>=2.0){ score+=15; det+="VOL_HI "; }
else if(volRatio>=1.5){ score+=10; det+="VOL_MD "; }
else if(volRatio>=1.1){ score+=5; det+="VOL_LO "; }
// 5. Momentum streak (15 pts)
int streak=(bullDir)?bullStreak:bearStreak;
if(streak>=3){ score+=15; det+="STK"+IntegerToString(streak); }
else if(streak>=2){ score+=10; det+="STK"+IntegerToString(streak); }
else if(streak>=1){ score+=5; det+="STK1"; }
// 6. Spread (10 pts) — low spread = good
if(spread<=3){ score+=10; }
else if(spread<=6){ score+=6; }
else if(spread<=10){ score+=3; }
// else 0 pts
outSig = bullDir ? "CALL" : "PUT";
outDetail = det;
return MathMin(100, score);
}
string GetPairHADirection(string pair){
double o1=iOpen(pair,PERIOD_M1,1),h1=iHigh(pair,PERIOD_M1,1),l1=iLow(pair,PERIOD_M1,1),c1=iClose(pair,PERIOD_M1,1);
double o2=iOpen(pair,PERIOD_M1,2),h2=iHigh(pair,PERIOD_M1,2),l2=iLow(pair,PERIOD_M1,2),c2=iClose(pair,PERIOD_M1,2);
double o3=iOpen(pair,PERIOD_M1,3),c3=iClose(pair,PERIOD_M1,3);
if(o1==0||h1==0||l1==0||c1==0||o2==0||c2==0||o3==0||c3==0)return "NEUTRAL";
double haC1=(o1+h1+l1+c1)/4.0,haC2=(o2+h2+l2+c2)/4.0,haO2=(o3+c3)/2.0,haO1=(haO2+haC2)/2.0;
if(haC1>haO1)return "BULL";else if(haC1<haO1)return "BEAR";return "NEUTRAL";}
double GetPairVolumeRatio(string pair){double v1=iVolume(pair,PERIOD_M1,1),v2=iVolume(pair,PERIOD_M1,2);if(v2<=0)return 1.0;return v1/v2;}
double CalculateCorrelation(string sym1,string sym2){
int bars=MathMin(iBars(sym1,PERIOD_M1),iBars(sym2,PERIOD_M1));if(bars<50)return 0;
double sum1=0,sum2=0,sum1sq=0,sum2sq=0,sum12=0;
for(int i=0;i<bars;i++){double c1=iClose(sym1,PERIOD_M1,i),c2=iClose(sym2,PERIOD_M1,i);if(c1==0||c2==0)continue;sum1+=c1;sum2+=c2;sum1sq+=c1*c1;sum2sq+=c2*c2;sum12+=c1*c2;}
int n=bars;double num=n*sum12-sum1*sum2;double den=MathSqrt((n*sum1sq-sum1*sum1)*(n*sum2sq-sum2*sum2));if(den==0)return 0;return num/den;}
// ============================================================
// SCAN SIGNALS - QUALITY SCORED VERSION
// File se broadcast signals read karo
// Phir har pair ka quality score check karo
// Sirf high-quality pairs dikhao
// ============================================================
void ScanSignals(){
g_pairCount=0;
string fn="OTC_Signals_Master.txt", cur=Symbol();
int h=FileOpen(fn,FILE_READ|FILE_TXT|FILE_SHARE_READ);
if(h==INVALID_HANDLE) return;
datetime now=TimeCurrent();
// Temp arrays for sorting by quality score
string tmpNames[8]; string tmpSigs[8];
double tmpConfs[8]; int tmpScores[8];
string tmpDetails[8];
int tmpCount=0;
while(!FileIsEnding(h) && tmpCount<8){
string ln=FileReadString(h);
if(StringLen(ln)<15) continue;
int p1=StringFind(ln,"|"),p2=StringFind(ln,"|",p1+1),p3=StringFind(ln,"|",p2+1),p4=StringFind(ln,"|",p3+1);
if(p1<0||p2<0||p3<0||p4<0) continue;
string pair=StringSubstr(ln,0,p1);
if(pair==cur) continue;
string sig=StringSubstr(ln,p1+1,p2-p1-1);
double conf=StringToDouble(StringSubstr(ln,p2+1,p3-p2-1));
int expTime=(int)StringToInteger(StringSubstr(ln,p4+1));
// Basic filters
if(conf<60) continue;
if(expTime<(int)(now-20)) continue; // 20 sec grace period
// Quality score calculate karo
string qSig="WAIT", qDetail="";
int qScore=CalcPairQuality(pair, qSig, qDetail);
// Signal direction must match broadcast
if(qSig != sig) continue;
// Minimum quality threshold
if(qScore < 45) continue;
tmpNames[tmpCount] = pair;
tmpSigs[tmpCount] = sig;
tmpConfs[tmpCount] = conf;
tmpScores[tmpCount] = qScore;
tmpDetails[tmpCount] = qDetail;
tmpCount++;
}
FileClose(h);
// Sort by quality score (descending) - bubble sort
for(int i=0;i<tmpCount-1;i++){
for(int j=0;j<tmpCount-i-1;j++){
if(tmpScores[j]<tmpScores[j+1]){
// Swap
string ts=tmpNames[j]; tmpNames[j]=tmpNames[j+1]; tmpNames[j+1]=ts;
ts=tmpSigs[j]; tmpSigs[j]=tmpSigs[j+1]; tmpSigs[j+1]=ts;
ts=tmpDetails[j]; tmpDetails[j]=tmpDetails[j+1]; tmpDetails[j+1]=ts;
double td=tmpConfs[j]; tmpConfs[j]=tmpConfs[j+1]; tmpConfs[j+1]=td;
int ti=tmpScores[j]; tmpScores[j]=tmpScores[j+1]; tmpScores[j+1]=ti;
}
}
}
// Copy top 5 to global arrays (already sorted best first)
g_pairCount=MathMin(5,tmpCount);
for(int i=0;i<g_pairCount;i++){
g_pairNames[i] = tmpNames[i];
g_pairSigs[i] = tmpSigs[i];
// Store quality score in conf field for display (combined)
// Format: "score|broadcast_conf"
g_pairConfs[i] = tmpScores[i]; // Show quality score
}
// Boost logic: agar 2+ high-quality pairs same direction mein
string curPred=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
int sameDir=0;
double boostTotal=0;
for(int i=0;i<g_pairCount;i++){
if(g_pairSigs[i]==curPred && tmpScores[i]>=60){
sameDir++;
boostTotal+=tmpScores[i];
}
}
if(sameDir>=2 && !g_tradingStopped){
double boost=MathMin(12.0, boostTotal/50.0);
if(curPred=="CALL"){ g_calc_gProb+=boost; g_calc_rProb-=boost; }
else { g_calc_rProb+=boost; g_calc_gProb-=boost; }
g_calc_gProb=MathMax(8.0,MathMin(92.0,g_calc_gProb));
g_calc_rProb=100.0-g_calc_gProb;
if(StringFind(g_filterStatus,"BOOST")<0)
g_filterStatus="PAIR BOOST+"+DoubleToString(boost,0)+"%";
}
}
void ReadSPM(){
datetime cb=Time[0];if(cb==g_last_bar&&TimeCurrent()-g_spm_t<5)return;
double v1=iCustom(NULL,PERIOD_M1,SPM_FILE,0,0),v2=iCustom(NULL,PERIOD_M1,SPM_FILE,1,0);
if(v1!=EMPTY_VALUE&&v1!=0){double sm=0.7;g_rsc=g_rsc*(1.0-sm)+v1*sm;}
if(v2!=EMPTY_VALUE&&v2!=0){double sm=0.7;g_tfa=g_tfa*(1.0-sm)+v2*sm;}
g_last_bar=cb;g_spm_t=TimeCurrent();}
//+------------------------------------------------------------------+
// ONINIT
//+------------------------------------------------------------------+
int OnInit(){
InitNW();NuclearDeleteAll();
resCount=0;supCount=0;lastSRBar=0;g_hrn_price=0;g_hrn_brk_bars=0;g_hrn_scan_bar=0;
g_hrn_score=0;g_hrn_confirmed_break=false;g_nearest_res=0;g_nearest_sup=0;g_rj_cnt=0;g_pairCount=0;
g_marketMode="RANGE";g_prevMode="";g_last_freeze_bar=0;g_lastNotified="";
g_accuracy=ValidateHistoricalAccuracy();g_acc_correct=0;g_acc_total=0;g_acc_lastBar=0;
g_lastPredGreen=50.0;g_lastPredBar=0;g_lossStreak=0;g_tradingStopped=false;
g_strategyType="NONE";g_frozen_gProb=50;g_frozen_rProb=50;g_calc_gProb=50;g_calc_rProb=50;
g_commonCount=0;g_wickLineCount=0;g_tfa_detail="";g_htfLevelCount=0;g_mtfConfirmed=true;g_filterStatus="ALL CLEAR";
g_symbolKey="";g_brokerBias=0.0;
// BB variables init
g_bbSignal="--";g_bbColor=NEON_YELLOW;g_bbTouchPrice=0.0;g_bbSignalTime=0;g_bbSignalBars=0;g_bbDetail="";
// MTG/NCP init
g_mtgHype=50;g_mtgBetrayal=50;g_mtgRecovery=0;
g_mtgState="INIT";g_mtgReason="";g_mtgAction="";
g_mtgClr=CGR;g_mtg_lastBar=0;g_mtgPattern="";
g_mtgBullCount=0;g_mtgBearCount=0;g_trapScore=0;
g_smoothCallScore=50.0;g_smoothPutScore=50.0;
g_callWeight=1.0;g_putWeight=1.0;
g_totalTrades=0;g_callTrades=0;g_putTrades=0;
g_callWins=0;g_putWins=0;
g_ncpLastSignalTime=0;g_ncpLastSignalType="";
g_ncpLastEntryPrice=0.0;g_ncpSignalProcessed=true;
if(ENABLE_LEARNING) LoadBrainMemory();
g_ha30_open=0;g_ha30_close=0;g_ha30_high=0;g_ha30_low=0;g_ha30_bar=0;
g_bbLineCount=0;
LoadMLWeights();EventSetTimer(1);
Print("===========================================");
Print("AIBRAIN v46.2 - NCP v7.3 LEARNING+SMOOTH+TIMER");
Print("BB Color: YELLOW=no signal, GREEN=CALL, RED=PUT");
Print("Volume: Bar[1] vs Bar[2] - single candle ratio");
Print("30sec HA: Backtesting safe (no elapsed time)");
Print("Strategy: Cached values, no double-call");
Print("BB Pullback: ", ENABLE_BB_PULLBACK?"ON":"OFF", " BB(",BB_PERIOD,",",DoubleToString(BB_DEVIATION,1),")");
Print("===========================================");
return INIT_SUCCEEDED;}
//+------------------------------------------------------------------+
// ONDEINIT
//+------------------------------------------------------------------+
void OnDeinit(const int r){
EventKillTimer();Comment("");
// Remove all indicator objects including timer
for(int i=ObjectsTotal()-1;i>=0;i--){
string nm=ObjectName(i);
if(StringFind(nm,PFX)==0)ObjectDelete(nm);
}
}
//+------------------------------------------------------------------+
// ONTIMER
//+------------------------------------------------------------------+
void OnTimer(){
if(Bars<50)return;
static datetime last5min=0;
if(Time[0]/300!=last5min/300){DetectHiddenLevels();last5min=Time[0];}
ReadSPM();CalcHA();UpdateHRN();UpdateSR();
DetectCommonPoints();DetectWickRejections();
DrawCommonPoints();DrawWickRejectLines();DrawHiddenLevels();DrawNearestSR();
if(ENABLE_BB_PULLBACK) DetectBBPullback();
if(ENABLE_MTG) CalculateMTG();
int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
ScanSignals();FinalSignalEngine(brain,cp,mts);BroadcastSignal();
UpdateTimer(); // Timer update — har second
Draw();
}
//+------------------------------------------------------------------+
// ONCALCULATE
//+------------------------------------------------------------------+
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[]){
return(rates_total);}
//+------------------------------------------------------------------+

RAW Paste Data Copied

//+------------------------------------------------------------------+
//| AIBRAIN OTC v45.4 - OVERLAP + TIMER + SR + POPUP FIXED         |
//| Fixed: Other pairs no overlap, text size 11, timer screen pos  |
//| Fixed: SR lines stable (no shift), popup notification removed  |
//+------------------------------------------------------------------+
#property copyright "AIBRAIN ULTIMATE - KM RANA"
#property version   "46.2"
#property strict
#property indicator_chart_window

#define PFX  "AIB9_"
#define VER  "v46.2"
#define LB   18
#define MAX_LEVELS 5
#define MAX_REJ    50
#define LOOKBACK   50

input string SPM_FILE               = "KM RANA";
input int    HOLD_SEC               = 60;
input int    POS_X                  = 4;
input int    POS_Y                  = 20;
input int    DASH_W                 = 660;
input bool   SHOW_TIMER             = true;
input bool   SHOW_SR_LINES          = true;
input string ENTRY_MODE             = "TIME";
input int    FLAG_MIN_SEC           = 10;
input int    FLAG_MAX_SEC           = 35;
input int    TIME_MIN_SEC           = 10;
input int    TIME_MAX_SEC           = 35;
input int    MIN_REMAINING_SEC      = 15;
input double REVERSAL_PCT           = 30.0;
input double WICK_PCT               = 0.65;
input int    HRN_CONFIRM_BARS       = 2;
input bool   HA_ALIGN_FILTER        = false;
input bool   CONSENSUS_FILTER       = false;
input bool   ENABLE_NOTIFY          = true;
input bool   FAST_MODE              = false;
input int    BROKER_SPREAD_THRESHOLD= 6;
input double OTC_TRAP_WEIGHT        = 15.0;
input int    CROWD_EXTREME_PCT      = 70;
input bool   ENABLE_BROKER_KILLER   = true;
input bool   ENABLE_SESSION_FILTER  = true;
input bool   ENABLE_SPIKE_FILTER    = true;
input bool   ENABLE_LAST_SEC_BLOCK  = true;
input bool   ENABLE_RISK_CONTROL    = true;
input bool   ENABLE_ENTRY_ZONE      = true;
input bool   ML_ADAPTIVE            = true;
input bool   VOLUME_PROFILE_TRAP    = true;
input bool   MTF_CONFIRM            = false;
input bool   ENABLE_TELEGRAM        = false;
input string TELEGRAM_TOKEN         = "";
input string TELEGRAM_CHAT_ID       = "";
input string TRADE_MODE             = "NORMAL";
input string STRATEGY_MODE          = "TRAP_ONLY";
input int    STRATEGY_THRESHOLD     = 75;
input int    MAX_LOSS_STREAK        = 2;
input double MIN_CONFIDENCE         = 75.0;
input bool   ENABLE_RISK_LOCK       = true;
input double PATTERN_TOLERANCE_PIPS = 8.0;
input int    MIN_PATTERN_SEPARATION = 5;
input bool   SHOW_COMMON_POINTS     = true;
input double COMMON_POINT_TOL_PIPS  = 15.0;
input bool   SHOW_WICK_REJECT_LINES = true;
input int    WICK_MIN_TOUCHES       = 1;
input double WICK_ZONE_PIPS         = 15.0;
input int    WICK_EXPIRE_BARS       = 60;

// ============================================================
// BB PULLBACK SETTINGS
// ============================================================
input bool   ENABLE_BB_PULLBACK     = true;
input int    BB_PERIOD              = 20;
input double BB_DEVIATION           = 2.0;
input int    BB_SIGNAL_EXPIRE_BARS  = 5;

// ============================================================
// ============================================================
// NCP PRO v7.3 SETTINGS — OTC BROKER KILLER + LEARNING ENGINE
// ============================================================
input bool   ENABLE_MTG             = true;
input int    NCP_OpenNoiseSeconds   = 3;
input int    NCP_KillZoneSeconds    = 55;
input double NCP_MaxSpreadPips      = 4.0;
input int    NCP_ATRPeriod          = 14;
input double NCP_MinATRPips         = 0.4;   // Very low = more signals
input int    NCP_FastEMA            = 3;
input int    NCP_MidEMA             = 7;
input int    NCP_SlowEMA            = 15;
input bool   NCP_UseM5Confirm       = true;
input bool   NCP_UseVolume          = true;
input double NCP_RoundStepPips      = 10.0;
input double NCP_RoundTolPips       = 4.0;
input int    NCP_MinProbMedium      = 57;    // Low threshold = more signals
input int    NCP_MinProbStrong      = 63;
input int    NCP_MinProbExtreme     = 70;
input bool   NCP_UseRSINorm         = true;
input int    NCP_RSIPeriod          = 10;
input double NCP_RSIBase            = 50.0;
input double NCP_RSIM5Target        = 45.0;
input double NCP_RSIM15Target       = 40.0;
// Learning Engine
input bool   ENABLE_LEARNING        = true;
input string MEMORY_FILE_NAME       = "NCP_Brain_v7.csv";
input int    MIN_TRADES_TO_LEARN    = 15;
input double LEARNING_STEP          = 0.025;
// Trap Detection
input bool   ENABLE_TRAP_DETECTION  = true;
input int    TRAP_LOOKBACK          = 30;

#define NEON_GREEN      C'0,255,100'
#define NEON_RED        C'255,40,80'
#define NEON_YELLOW     C'255,220,0'
#define NEON_ORANGE     C'255,120,0'
#define NEON_CYAN       C'0,255,200'
#define NEON_PURPLE     C'200,0,255'
#define NEON_PINK       C'255,80,180'
#define NEON_BLUE       C'0,200,255'
#define NEON_LIME       C'80,255,80'
#define NEON_GOLD       C'255,180,0'
#define DARK_BLUE_NEON  C'0,100,255'
#define NEON_WHITE      C'220,230,255'
#define CGR             C'160,170,190'
#define BB_GREY         C'180,180,190'
#define BG_DARK1        C'6,8,16'
#define BG_DARK2        C'10,14,24'
#define BG_DARK3        C'14,20,32'
#define BG_DARK4        C'18,26,40'

struct HTFLevel{ double price; string timeframe; string type; datetime time; int strength; bool isRoundNumber; };

//+------------------------------------------------------------------+
// GLOBAL VARIABLES
//+------------------------------------------------------------------+
string g_haM1="",g_haM5="",g_haBoth="";
color g_haM1Color=clrGray,g_haM5Color=clrGray;
static double NW[36];
static double g_rsc=0,g_tfa=3;
static datetime g_spm_t=0,g_last_bar=0;
double ResLevels[MAX_LEVELS],SupLevels[MAX_LEVELS];
int resCount=0,supCount=0;
datetime lastSRBar=0;
static double g_nearest_res=0,g_nearest_sup=0;
static string g_brk_str="NO BRK";
static color g_brk_color=CGR;
struct RejLevel{double price;int touches;};
static RejLevel g_rj[MAX_REJ];
static int g_rj_cnt=0;

static double g_hrn_price=0;
static bool g_hrn_is_sup=true;
static int g_hrn_brk_bars=0;
static datetime g_hrn_scan_bar=0;
static string g_hrn_str="--";
static double g_hrn_score=0;
static bool g_hrn_confirmed_break=false;

static int g_otcCallPct=50,g_otcPutPct=50;
static string g_pairNames[8],g_pairSigs[8];
static double g_pairConfs[8];
static int g_pairCount=0;
static double g_frozen_gProb=50,g_frozen_rProb=50;
static string g_frozen_pAction="UNCERTAIN";
static color g_frozen_pColor=NEON_YELLOW;
static double g_calc_gProb=50,g_calc_rProb=50;
static string g_calc_pAction="UNCERTAIN";
static color g_calc_pColor=NEON_YELLOW;
static double g_gProb=50,g_rProb=50;
static string g_pAction="UNCERTAIN";
static color g_pColor=NEON_YELLOW;
static datetime g_last_freeze_bar=0;
static double g_accuracy=65.0;
static int g_acc_correct=0,g_acc_total=0;
static datetime g_acc_lastBar=0;
static double g_lastPredGreen=50.0;
static datetime g_lastPredBar=0;
static string g_finalSignal="WAIT";
static color g_finalColor=NEON_YELLOW;
static datetime g_signalTime=0;
static string g_lastNotified="";
static string g_marketMode="RANGE",g_prevMode="";
static int g_lossStreak=0;
static bool g_tradingStopped=false;
static string g_strategyType="NONE";
static string g_strategyReason="";
static double qmrA=0,qmrB=0,qmrC=0,qmrD=0;
static bool qmrActive=false;
static datetime qmrExpire=0;
#define MAX_COMMON_PTS 5
static double g_commonPrice[MAX_COMMON_PTS];
static datetime g_commonTime[MAX_COMMON_PTS];
static int g_commonCount=0;
static datetime g_commonExpire[MAX_COMMON_PTS];
static string g_commonType[MAX_COMMON_PTS];
static datetime g_lastCommonScan=0;
#define MAX_WICK_LINES 5
static double g_wickLinePrice[MAX_WICK_LINES];
static int g_wickLineTouches[MAX_WICK_LINES];
static datetime g_wickLineExpire[MAX_WICK_LINES];
static int g_wickLineCount=0;
static datetime g_lastWickScan=0;
static bool g_isSideways=false;
static string g_tfa_detail="";
static HTFLevel g_htfLevels[50];
static int g_htfLevelCount=0;
static bool g_mtfConfirmed=true;
static string g_filterStatus="ALL CLEAR";
static string g_adv1="WAIT KAR";
static string g_symbolKey="";
static double g_brokerBias=0.0;

// ============================================================
// BB PULLBACK GLOBAL VARIABLES - NEW
// ============================================================
static string g_bbSignal       = "--";        // "CALL", "PUT", "--"
static color  g_bbColor        = CGR;
static double g_bbTouchPrice   = 0.0;         // Jahan BB touch hua
static datetime g_bbSignalTime = 0;           // Signal kab aaya
static int    g_bbSignalBars   = 0;           // Kitne bars ho gaye
static string g_bbDetail       = "";          // Detail text

// 30-sec HA variables
static double g_ha30_open  = 0.0;
static double g_ha30_close = 0.0;
static double g_ha30_high  = 0.0;
static double g_ha30_low   = 0.0;
static datetime g_ha30_bar = 0;

// Max grey lines on chart
#define MAX_BB_LINES 8
static double g_bbLinePrice[MAX_BB_LINES];
static datetime g_bbLineExpire[MAX_BB_LINES];
static string g_bbLineType[MAX_BB_LINES];
static int g_bbLineCount=0;

// ============================================================
// NCP PRO GLOBALS
// ============================================================
static string   g_mtgState     = "INIT";
static string   g_mtgReason    = "";
static string   g_mtgAction    = "";
static color    g_mtgClr       = CGR;
static double   g_mtgHype      = 50.0;
static double   g_mtgBetrayal  = 50.0;
static string   g_mtgPattern   = "";
static int      g_mtgBullCount = 0;
static int      g_mtgBearCount = 0;
static double   g_mtgRecovery  = 0.0;
static datetime g_mtg_lastBar  = 0;
static double   g_trapScore    = 0;

// NCP Learning Engine globals
static double   g_callWeight      = 1.0;
static double   g_putWeight       = 1.0;
static int      g_totalTrades     = 0;
static int      g_callTrades      = 0;
static int      g_putTrades       = 0;
static int      g_callWins        = 0;
static int      g_putWins         = 0;
// Signal tracking for win/loss detection
static datetime g_ncpLastSignalTime = 0;
static string   g_ncpLastSignalType = "";
static double   g_ncpLastEntryPrice = 0.0;
static bool     g_ncpSignalProcessed = true;
// Score smoothing — gradual build, no sudden spikes
static double   g_smoothCallScore = 50.0;
static double   g_smoothPutScore  = 50.0;

//+------------------------------------------------------------------+
// 30-SECOND HA CANDLE - BACKTESTING SAFE VERSION
// Strategy: Current M1 candle ke current tick se live HA banao
// Backtesting mein bhi kaam karta hai kyunki Time[] arrays use karta hai
// elapsed time dependent NAHI hai - pure price-based hai
//+------------------------------------------------------------------+
void Calc30SecHA(){
   if(Bars < 5) return;
   
   // Current live candle (index 0) - live tick data
   double cur_open  = Open[0];
   double cur_high  = High[0];
   double cur_low   = Low[0];
   double cur_close = Close[0];
   
   // Prev fully closed candle (index 1) - confirmed data
   double prev_open  = Open[1];
   double prev_high  = High[1];
   double prev_low   = Low[1];
   double prev_close = Close[1];
   
   // HA for prev closed candle
   double haC_prev  = (prev_open + prev_high + prev_low + prev_close) / 4.0;
   double haC_prev2 = (Open[2] + High[2] + Low[2] + Close[2]) / 4.0;
   double haO_prev2 = (Open[3] + Close[3]) / 2.0;
   double haO_prev  = (haO_prev2 + haC_prev2) / 2.0;
   
   // HA for current live candle
   double haC_cur = (cur_open + cur_high + cur_low + cur_close) / 4.0;
   double haO_cur = (haO_prev + haC_prev) / 2.0;  // Standard HA open
   
   g_ha30_open  = haO_cur;
   g_ha30_close = haC_cur;
   g_ha30_high  = cur_high;
   g_ha30_low   = cur_low;
   g_ha30_bar   = Time[0];
}

bool Is30SecHABull(){ return (g_ha30_close > g_ha30_open); }
bool Is30SecHABear(){ return (g_ha30_close < g_ha30_open); }

//+------------------------------------------------------------------+
// BB PULLBACK DETECTION - FIXED
// Color logic:
//   CALL signal  → GREEN
//   PUT signal   → RED
//   No signal    → YELLOW (normal/wait state)
//+------------------------------------------------------------------+
void DetectBBPullback(){
   if(!ENABLE_BB_PULLBACK || Bars < BB_PERIOD + 5) return;
   
   Calc30SecHA();
   
   double bbUpper1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 1);
   double bbLower1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 1);
   double bbUpper0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 0);
   double bbLower0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 0);
   double bbMid0   = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_MAIN,  0);
   if(bbUpper1 <= 0 || bbLower1 <= 0) return;
   
   bool ha30Bull = Is30SecHABull();
   bool ha30Bear = Is30SecHABear();
   
   // ============================================================
   // ADX + RSI CONFIRMATION - NEW
   // ============================================================
   double adx     = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN,    1);
   double plusDI  = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI,  1);
   double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
   double rsi     = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
   
   bool adxBear   = (minusDI > plusDI);
   bool adxBull   = (plusDI  > minusDI);
   bool adxActive = (adx >= 15);
   bool adxStrong = (adx >= 20);
   
   bool rsiOverbought = (rsi >= 60);
   bool rsiOversold   = (rsi <= 40);
   bool rsiExtremeOB  = (rsi >= 70);
   bool rsiExtremeOS  = (rsi <= 30);
   
   // PUT confirmation score
   int putConfirm  = 0;
   if(ha30Bear)       putConfirm++;
   if(adxBear)        putConfirm++;
   if(rsiOverbought)  putConfirm++;
   if(rsiExtremeOB)   putConfirm++;
   
   // CALL confirmation score
   int callConfirm = 0;
   if(ha30Bull)       callConfirm++;
   if(adxBull)        callConfirm++;
   if(rsiOversold)    callConfirm++;
   if(rsiExtremeOS)   callConfirm++;
   
   string adxStr = "ADX:"+DoubleToString(adx,0)+(adxStrong?"*":"");
   string rsiStr = "RSI:"+DoubleToString(rsi,0);
   string diStr  = (adxBull?"DI^":adxBear?"DIv":"DI=");
   
   // Expire check
   if(g_bbSignal != "--" && g_bbSignalTime > 0){
      int barsElapsed = (int)((TimeCurrent() - g_bbSignalTime) / (Period() * 60));
      if(barsElapsed > BB_SIGNAL_EXPIRE_BARS){
         g_bbSignal = "--"; g_bbColor = NEON_YELLOW;
         g_bbDetail = ""; g_bbTouchPrice = 0.0;
      }
   }
   
   bool touchedUpper = (High[1] >= bbUpper1 * 0.9998);
   bool touchedLower = (Low[1]  <= bbLower1 * 1.0002);
   bool wickUpper    = (High[1] > bbUpper1 && Close[1] < bbUpper1);
   bool wickLower    = (Low[1]  < bbLower1 && Close[1] > bbLower1);
   
   string newSignal     = "--";
   double touchPriceNew = 0.0;
   string detailNew     = "";
   color  newColor      = NEON_YELLOW;
   
   // PUT: BB upper + min 2 confirmations
   if((touchedUpper || wickUpper) && putConfirm >= 2){
      newSignal     = "PUT";
      touchPriceNew = bbUpper1;
      string conf   = (putConfirm>=4)?"STRONG":(putConfirm>=3)?"GOOD":"WEAK";
      detailNew     = "BB UP|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr;
      newColor      = (putConfirm >= 3) ? NEON_RED : NEON_ORANGE;
   }
   // CALL: BB lower + min 2 confirmations
   else if((touchedLower || wickLower) && callConfirm >= 2){
      newSignal     = "CALL";
      touchPriceNew = bbLower1;
      string conf   = (callConfirm>=4)?"STRONG":(callConfirm>=3)?"GOOD":"WEAK";
      detailNew     = "BB LO|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr;
      newColor      = (callConfirm >= 3) ? NEON_GREEN : NEON_CYAN;
   }
   
   if(newSignal != "--"){
      bool isNew = (newSignal != g_bbSignal || touchPriceNew != g_bbTouchPrice);
      if(isNew){
         g_bbSignal     = newSignal;
         g_bbTouchPrice = touchPriceNew;
         g_bbSignalTime = TimeCurrent();
         g_bbDetail     = detailNew;
         g_bbColor      = newColor;
         AddBBLine(touchPriceNew, newSignal);
         Print("BB PULLBACK: ",newSignal," | ",detailNew," Conf:",(newSignal=="PUT"?putConfirm:callConfirm),"/4");
      }
   } else if(g_bbSignal == "--"){
      g_bbColor = NEON_YELLOW;
   }
   
   DrawBBLines(bbUpper0, bbLower0, bbMid0);
}

//+------------------------------------------------------------------+
// BB LINES DRAW ON CHART
//+------------------------------------------------------------------+
void DrawBBLines(double upper, double lower, double mid){
   if(!ENABLE_BB_PULLBACK) return;
   
   // Upper BB - grey dashed line
   string nmU = PFX+"BB_UPPER";
   SafeDel(nmU);
   if(upper > 0){
      ObjectCreate(0, nmU, OBJ_HLINE, 0, 0, upper);
      ObjectSetInteger(0, nmU, OBJPROP_COLOR,  BB_GREY);
      ObjectSetInteger(0, nmU, OBJPROP_WIDTH,  1);
      ObjectSetInteger(0, nmU, OBJPROP_STYLE,  STYLE_DASH);
      ObjectSetInteger(0, nmU, OBJPROP_BACK,   false);
   }
   
   // Lower BB - grey dashed line
   string nmL = PFX+"BB_LOWER";
   SafeDel(nmL);
   if(lower > 0){
      ObjectCreate(0, nmL, OBJ_HLINE, 0, 0, lower);
      ObjectSetInteger(0, nmL, OBJPROP_COLOR,  BB_GREY);
      ObjectSetInteger(0, nmL, OBJPROP_WIDTH,  1);
      ObjectSetInteger(0, nmL, OBJPROP_STYLE,  STYLE_DASH);
      ObjectSetInteger(0, nmL, OBJPROP_BACK,   false);
   }
   
   // Mid BB - lighter grey dot line
   string nmM = PFX+"BB_MID";
   SafeDel(nmM);
   if(mid > 0){
      ObjectCreate(0, nmM, OBJ_HLINE, 0, 0, mid);
      ObjectSetInteger(0, nmM, OBJPROP_COLOR,  C'100,100,110');
      ObjectSetInteger(0, nmM, OBJPROP_WIDTH,  1);
      ObjectSetInteger(0, nmM, OBJPROP_STYLE,  STYLE_DOT);
      ObjectSetInteger(0, nmM, OBJPROP_BACK,   false);
   }
   
   // Labels
   int dg = (int)MarketInfo(Symbol(), MODE_DIGITS);
   if(dg <= 0) dg = 5;
   
   string lblU = PFX+"BB_U_LBL";
   SafeDel(lblU);
   if(upper > 0 && Bars > 2){
      ObjectCreate(0, lblU, OBJ_TEXT, 0, Time[2], upper);
      ObjectSetText(lblU, "BB("+IntegerToString(BB_PERIOD)+")", 8, "Arial", BB_GREY);
      ObjectSetInteger(0, lblU, OBJPROP_BACK, false);
   }
}

//+------------------------------------------------------------------+
// ADD BB TOUCH LINE — sirf 1 line at a time (latest signal wali)
void AddBBLine(double price, string sigType){
   if(price <= 0) return;
   // Pehli sab purani BB touch lines delete karo
   for(int i = 0; i < MAX_BB_LINES; i++){
      SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i));
      SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i));
   }
   g_bbLineCount = 0;
   // Sirf naya ek line add karo
   g_bbLinePrice[0]  = price;
   g_bbLineExpire[0] = TimeCurrent() + 60 * BB_SIGNAL_EXPIRE_BARS;
   g_bbLineType[0]   = sigType;
   g_bbLineCount     = 1;
   DrawAllBBTouchLines();
}

void DrawAllBBTouchLines(){
   // Clean all slots
   for(int i = 0; i < MAX_BB_LINES; i++){
      SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i));
      SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i));
   }
   // Remove expired
   if(g_bbLineCount > 0 && TimeCurrent() > g_bbLineExpire[0]){
      g_bbLineCount = 0;
      return;
   }
   if(g_bbLineCount <= 0) return;
   int dg = (int)MarketInfo(Symbol(), MODE_DIGITS);
   if(dg <= 0) dg = 5;
   // Draw only the single active line
   string nm  = PFX+"BB_TOUCH_0";
   string lbl = PFX+"BB_TOUCH_LBL_0";
   ObjectCreate(0, nm, OBJ_HLINE, 0, 0, g_bbLinePrice[0]);
   ObjectSetInteger(0, nm, OBJPROP_COLOR, BB_GREY);
   ObjectSetInteger(0, nm, OBJPROP_WIDTH, 2);
   ObjectSetInteger(0, nm, OBJPROP_STYLE, STYLE_SOLID);
   ObjectSetInteger(0, nm, OBJPROP_BACK,  false);
   if(Bars > 3){
      string txt = (g_bbLineType[0]=="CALL") ? "BB^ CALL" : "BBv PUT";
      color  lc  = (g_bbLineType[0]=="CALL") ? NEON_GREEN : NEON_RED;
      ObjectCreate(0, lbl, OBJ_TEXT, 0, Time[3], g_bbLinePrice[0]);
      ObjectSetText(lbl, txt, 8, "Arial Bold", lc);
      ObjectSetInteger(0, lbl, OBJPROP_BACK, false);
   }
}

//+------------------------------------------------------------------+
// MTG AI - MOMENTUM TRAP GAUGE
// 1-minute OTC ke liye: 3-5 candle patterns detect karta hai
// States: SLEEPING → HYPE → SETUP → SCAM/RECOVERY
//
// Pattern Logic:
// 1. HYPE: 3+ bull candles streak, expanding body, high volume
// 2. SETUP: Current candle red banana shuru hua
// 3. SCAM: Fakeout + wick trap + body reversal confirm
// 4. RECOVERY: Price mid-zone tak wapas aaya = CALL signal
//+------------------------------------------------------------------+
// ============================================================
// NCP PRO — NEXT CANDLE PREDICTOR PRO
// RSI Multi-Timeframe Normalized + EMA Trend + Volume + Patterns
// Runs every tick, updates g_mtgState/g_mtgHype/g_mtgBetrayal
// ============================================================
// ============================================================
// NCP PRO v4.2 — OTC BROKER KILLER | TRAP REVERSAL
// Best of v4.1 + AIBRAIN integration
// Signals: CALL / PUT / PUT TRAP / CALL TRAP / WAIT
// ============================================================
// ============================================================
// NCP PRO v7.3 — BROKER KILLER + LEARNING ENGINE
// Signal smoothing: no sudden spikes, gradual build
// Learning: tracks wins/losses, adjusts weights carefully
// Trap: engulfing + wick patterns + crowd run
// ============================================================

// --- LEARNING ENGINE FUNCTIONS ---
void LoadBrainMemory(){
   if(!ENABLE_LEARNING) return;
   int h=FileOpen(MEMORY_FILE_NAME,FILE_READ|FILE_CSV|FILE_SHARE_READ);
   if(h!=INVALID_HANDLE){
      if(FileSize(h)>10){
         g_totalTrades=(int)FileReadNumber(h);
         g_callTrades =(int)FileReadNumber(h);
         g_putTrades  =(int)FileReadNumber(h);
         g_callWins   =(int)FileReadNumber(h);
         g_putWins    =(int)FileReadNumber(h);
         g_callWeight =FileReadNumber(h);
         g_putWeight  =FileReadNumber(h);
         // Guard against bad values
         if(g_callWeight<0.2||g_callWeight>1.8) g_callWeight=1.0;
         if(g_putWeight <0.2||g_putWeight >1.8) g_putWeight =1.0;
         Print("NCP Brain loaded: ",g_totalTrades," trades | CW:",DoubleToString(g_callWeight,3)," PW:",DoubleToString(g_putWeight,3));
      }
      FileClose(h);
   }
}
void SaveBrainMemory(){
   if(!ENABLE_LEARNING) return;
   int h=FileOpen(MEMORY_FILE_NAME,FILE_WRITE|FILE_CSV|FILE_SHARE_WRITE);
   if(h!=INVALID_HANDLE){
      FileWrite(h,g_totalTrades);FileWrite(h,g_callTrades);FileWrite(h,g_putTrades);
      FileWrite(h,g_callWins);FileWrite(h,g_putWins);
      FileWrite(h,g_callWeight);FileWrite(h,g_putWeight);
      FileClose(h);
   }
}
void UpdateBrain(string sig,bool win){
   if(!ENABLE_LEARNING) return;
   g_totalTrades++;
   if(sig=="CALL"){g_callTrades++;if(win)g_callWins++;}
   else if(sig=="PUT"){g_putTrades++;if(win)g_putWins++;}
   if(g_totalTrades < MIN_TRADES_TO_LEARN){ SaveBrainMemory(); return; }
   double adj=LEARNING_STEP;
   // Adaptive: winning = boost, losing = reduce (but carefully)
   if(sig=="CALL"){
      double wr=(g_callTrades>0)?(double)g_callWins/g_callTrades:0.5;
      double adaptive=adj*(wr-0.5)*2.0;
      if(win) g_callWeight=MathMin(1.8,g_callWeight+adj+adaptive);
      else    g_callWeight=MathMax(0.3,g_callWeight-adj*1.5+adaptive);
      // Noise guard: don't let weight collapse too fast
      if(g_callTrades<MIN_TRADES_TO_LEARN+5) g_callWeight=MathMax(0.6,g_callWeight);
   } else if(sig=="PUT"){
      double wr=(g_putTrades>0)?(double)g_putWins/g_putTrades:0.5;
      double adaptive=adj*(wr-0.5)*2.0;
      if(win) g_putWeight=MathMin(1.8,g_putWeight+adj+adaptive);
      else    g_putWeight=MathMax(0.3,g_putWeight-adj*1.5+adaptive);
      if(g_putTrades<MIN_TRADES_TO_LEARN+5) g_putWeight=MathMax(0.6,g_putWeight);
   }
   SaveBrainMemory();
}
void CheckPreviousResult(){
   if(g_ncpSignalProcessed||g_ncpLastSignalType==""||g_ncpLastSignalTime==0) return;
   // Check if enough time passed (at least 1 bar closed)
   if(Time[0]==g_ncpLastSignalTime) return;
   
   // Use bar that closed AFTER signal (bar index 1)
   double sigOpen =iOpen(NULL,PERIOD_M1,1);
   double sigClose=iClose(NULL,PERIOD_M1,1);
   
   // Win logic: check price movement vs entry
   bool win=false;
   if(g_ncpLastSignalType=="CALL")
      win=(sigClose>sigOpen); // Candle closed higher = WIN
   else if(g_ncpLastSignalType=="PUT")
      win=(sigClose<sigOpen); // Candle closed lower = WIN
   
   // IMPORTANT: Mark as processed BEFORE UpdateBrain
   g_ncpSignalProcessed=true;
   
   UpdateBrain(g_ncpLastSignalType,win);
   Print("NCP Result: ",g_ncpLastSignalType," ",win?"WIN":"LOSS"," | Trades:",g_totalTrades,
         " | CW:",DoubleToString(g_callWeight,3)," PW:",DoubleToString(g_putWeight,3));
}

// --- BROKER TRAP CALCULATOR (v7.3 FIXED) ---
// Uses recent bars (1-15) instead of old bars (3-30)
// Includes live candle (index 0) for real-time trap detection
double CalculateBrokerTrap(double callBias,double putBias){
   if(!ENABLE_TRAP_DETECTION||Bars<20) return 0;
   double trapScore=0;
   bool jpy=(StringFind(Symbol(),"JPY")>=0);
   double pip=jpy?0.01:0.0001;
   
   // === CHECK RECENT BARS (1-15) - FIXED: was 3-30 ===
   for(int i=1;i<=15&&i<Bars-1;i++){
      // Engulfing patterns
      bool bullEngulf=(Close[i]>Open[i])&&(Close[i-1]<Open[i-1])&&
                      (Close[i]>=Open[i-1])&&(Open[i]<=Close[i-1]);
      bool bearEngulf=(Close[i]<Open[i])&&(Close[i-1]>Open[i-1])&&
                      (Close[i]<=Open[i-1])&&(Open[i]>=Close[i-1]);
      
      // Star patterns (3 candle)
      if(i>=2){
         bool mornStar=(Close[i-2]<Open[i-2])&&
                      (MathAbs(Close[i-1]-Open[i-1])<pip*3)&&  // Fixed: was Point*5
                      (Close[i]>Open[i]);
         bool eveStar =(Close[i-2]>Open[i-2])&&
                      (MathAbs(Close[i-1]-Open[i-1])<pip*3)&&  // Fixed: was Point*5
                      (Close[i]<Open[i]);
         
         // Context: prior trend
         if(i>=3){
            if(bullEngulf&&Close[i-3]<Close[i-2]) trapScore+=3.5;
            if(bearEngulf&&Close[i-3]>Close[i-2]) trapScore+=3.5;
            if(mornStar&&Close[i-3]<Close[i-2])   trapScore+=3.0;
            if(eveStar&&Close[i-3]>Close[i-2])    trapScore+=3.0;
         }
      }
      
      // Large wick traps (rejection candles)
      double rng=High[i]-Low[i]; 
      if(rng<=0) continue;
      double uw=(High[i]-MathMax(Open[i],Close[i]))/rng;
      double lw=(MathMin(Open[i],Close[i])-Low[i])/rng;
      
      if(uw>0.55&&Close[i]<Open[i]) trapScore+=2.0;  // Upper wick rejection + bearish = trap
      if(lw>0.55&&Close[i]>Open[i]) trapScore+=2.0;  // Lower wick rejection + bullish = trap
   }
   
   // === CHECK LIVE CANDLE (index 0) - NEW: Real-time detection ===
   double rng0=High[0]-Low[0];
   if(rng0>0){
      double uw0=(High[0]-MathMax(Open[0],Close[0]))/rng0;
      double lw0=(MathMin(Open[0],Close[0])-Low[0])/rng0;
      
      // Live rejection happening NOW = high confidence trap
      if(uw0>0.65&&Close[0]<Open[0]) trapScore+=4.0;
      if(lw0>0.65&&Close[0]>Open[0]) trapScore+=4.0;
      
      // Live engulfing forming
      if(Close[0]>Open[0]&&Close[1]<Open[1]){  // Bullish engulfing forming
         if(Close[0]>Open[1]&&Open[0]<Close[1]) trapScore+=3.0;
      }
      if(Close[0]<Open[0]&&Close[1]>Open[1]){  // Bearish engulfing forming
         if(Close[0]<Open[1]&&Open[0]>Close[1]) trapScore+=3.0;
      }
   }
   
   // Bias multiplier - but cap it to prevent extreme scores
   double biasStr=MathMax(callBias,putBias)-50;
   double biasMul=1.0+biasStr/150.0;  // Fixed: was /100.0 (too aggressive)
   if(biasMul>1.5) biasMul=1.5;  // Cap at 1.5x
   if(biasMul<0.5) biasMul=0.5;  // Floor at 0.5x
   
   trapScore*=biasMul;
   return MathMin(100,trapScore);
}

// --- MAIN CALCULATE FUNCTION (v7.3 COMPLETE FIX) ---
void CalculateMTG(){
   if(!ENABLE_MTG||Bars<50){g_mtgState="OFF";g_mtgReason="";g_mtgClr=CGR;return;}
   bool jpy=(StringFind(Symbol(),"JPY")>=0);
   double pip=jpy?0.01:0.0001;

// Check previous result on new bar
   CheckPreviousResult();

// Time filter
   int sec=(int)(TimeCurrent()-Time[0]);
   if(sec<NCP_OpenNoiseSeconds){g_mtgState="...";g_mtgReason="Bar open";g_mtgClr=CGR;g_mtgHype=50;g_mtgBetrayal=50;return;}
   if(sec>=NCP_KillZoneSeconds){g_mtgState="END";g_mtgReason="Late";g_mtgClr=NEON_ORANGE;g_mtgHype=50;g_mtgBetrayal=50;return;}

// Spread filter
   double spPips=MarketInfo(Symbol(),MODE_SPREAD)*Point/pip;
   if(spPips>NCP_MaxSpreadPips){g_mtgState="SPREAD";g_mtgReason=DoubleToString(spPips,1)+"p";g_mtgClr=NEON_ORANGE;g_mtgHype=50;g_mtgBetrayal=50;return;}

// ATR filter
   double atr=iATR(Symbol(),PERIOD_M1,NCP_ATRPeriod,1);
   double atrPips=atr/pip;
   if(atrPips<NCP_MinATRPips){g_mtgState="FLAT";g_mtgReason="Low ATR";g_mtgClr=CGR;g_mtgHype=50;g_mtgBetrayal=50;return;}

// === INDICATORS ===
   double eF=iMA(NULL,0,NCP_FastEMA,0,MODE_EMA,PRICE_CLOSE,1);
   double eM=iMA(NULL,0,NCP_MidEMA, 0,MODE_EMA,PRICE_CLOSE,1);
   double eS=iMA(NULL,0,NCP_SlowEMA,0,MODE_EMA,PRICE_CLOSE,1);
   
   // FIXED: Proper trend detection (no double counting)
   bool upTrend=(eF>eM&&eM>eS);
   bool dnTrend=(eF<eM&&eM<eS);
   bool upBias=(eF>eS)&&!upTrend;  // FIXED: exclude if already upTrend
   bool dnBias=(eF<eS)&&!dnTrend;  // FIXED: exclude if already dnTrend
   
   bool h5Up=false,h5Dn=false;
   if(NCP_UseM5Confirm){
      double h5F=iMA(NULL,PERIOD_M5,NCP_FastEMA,0,MODE_EMA,PRICE_CLOSE,1);
      double h5M=iMA(NULL,PERIOD_M5,NCP_MidEMA, 0,MODE_EMA,PRICE_CLOSE,1);
      double h5S=iMA(NULL,PERIOD_M5,NCP_SlowEMA,0,MODE_EMA,PRICE_CLOSE,1);
      h5Up=(h5F>h5M&&h5M>h5S);
      h5Dn=(h5F<h5M&&h5M<h5S);
   }
   
   // FIXED: RSI Normalization - capped to prevent inflation
   double nM5=(NCP_RSIM5Target>0)?NCP_RSIBase/NCP_RSIM5Target:1.0;
   double nM15=(NCP_RSIM15Target>0)?NCP_RSIBase/NCP_RSIM15Target:1.0;
   if(nM5>1.3) nM5=1.3;   // FIXED: cap at 1.3
   if(nM15>1.5) nM15=1.5;  // FIXED: cap at 1.5
   
   double r1=iRSI(NULL,0,NCP_RSIPeriod,PRICE_CLOSE,1);
   double r5=iRSI(NULL,PERIOD_M5,NCP_RSIPeriod,PRICE_CLOSE,1);
   double r15=iRSI(NULL,PERIOD_M15,NCP_RSIPeriod,PRICE_CLOSE,1);
   double n5v=r5*nM5;
   double n15v=r15*nM15;
   
   int rBullCt=(r1>50?1:0)+(n5v>50?1:0)+(n15v>50?1:0);
   int rBearCt=(r1<50?1:0)+(n5v<50?1:0)+(n15v<50?1:0);
   bool rBull2=(rBullCt>=2);
   bool rBear2=(rBearCt>=2);
   
   double stK=iStochastic(Symbol(),PERIOD_M1,5,3,3,MODE_SMA,0,MODE_MAIN,1);
   bool stOS=(stK<25),stOB=(stK>75);
   
   double macdM=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_MAIN,1);
   double macdS=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_SIGNAL,1);
   double macdM2=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_MAIN,2);
   double macdS2=iMACD(NULL,0,8,17,5,PRICE_CLOSE,MODE_SIGNAL,2);
   bool macdBull=(macdM>macdS);
   bool macdBear=(macdM<macdS);
   bool macdCrossUp=(macdM>macdS&&macdM2<=macdS2);
   bool macdCrossDn=(macdM<macdS&&macdM2>=macdS2);

// === CANDLE ANALYSIS ===
   double body1=MathAbs(Close[1]-Open[1]);
   double rng1=High[1]-Low[1];
   if(rng1<=0){g_mtgState="WAIT";return;}
   
   double uwPct=(High[1]-MathMax(Open[1],Close[1]))/rng1;
   double lwPct=(MathMin(Open[1],Close[1])-Low[1])/rng1;
   double bPct=body1/rng1;
   
   bool bull1=(Close[1]>Open[1]);
   bool bear1=(Close[1]<Open[1]);
   bool sBull=(bull1&&bPct>=0.5&&body1>atr*0.3);
   bool sBear=(bear1&&bPct>=0.5&&body1>atr*0.3);
   bool rejUp=(uwPct>0.40&&bPct<0.50);
   bool rejDn=(lwPct>0.40&&bPct<0.50);
   bool doji=(bPct<0.20);
   
   double mom1=(Close[1]-Close[2])/pip;
   double mom3=(Close[1]-Close[4])/pip;
   bool bMom=(mom1>0.8&&mom3>1.5);
   bool brMom=(mom1<-0.8&&mom3<-1.5);
   
   double hh3=MathMax(High[2],MathMax(High[3],High[4]));
   double ll3=MathMin(Low[2], MathMin(Low[3], Low[4]));
   bool bkUp=(Close[1]>hh3&&body1>atr*0.25);
   bool bkDn=(Close[1]<ll3&&body1>atr*0.25);
   bool fkUp=(High[1]>hh3&&Close[1]<hh3);
   bool fkDn=(Low[1]<ll3&&Close[1]>ll3);
   
   int bullRun=0,bearRun=0;
   for(int i=1;i<=6&&i<Bars;i++){
      if(Close[i]>Open[i]){if(bearRun>0)break;bullRun++;}
      else if(Close[i]<Open[i]){if(bullRun>0)break;bearRun++;}
      else break;
   }
   
   double rndSt=NCP_RoundStepPips*pip;
   double rndTl=NCP_RoundTolPips*pip;
   double bs=MathFloor(Close[1]/rndSt)*rndSt;
   bool rrUp=false,rrDn=false;
   for(int k=-1;k<=1;k++){
      double lv=bs+k*rndSt;
      if(MathAbs(Close[1]-lv)<=rndTl){
         if(High[1]>lv&&Close[1]<lv-pip) rrUp=true;
         if(Low[1]<lv&&Close[1]>lv+pip) rrDn=true;
         break;
      }
   }
   
   double v1=(double)Volume[1],vAvg=0;
   for(int i=2;i<=11;i++) vAvg+=(double)Volume[i]; 
   vAvg/=10.0;
   bool hiVol=(NCP_UseVolume&&vAvg>0&&v1>vAvg*1.2);
   bool loVol=(NCP_UseVolume&&vAvg>0&&v1<vAvg*0.85);

// === SCORING ===
   double cS=50.0,pS=50.0;
   
   if(upTrend){cS+=15;pS-=8;}
   else if(dnTrend){pS+=15;cS-=8;}
   else if(upBias){cS+=7;}
   else if(dnBias){pS+=7;}
   
   if(NCP_UseM5Confirm){
      if(h5Up){cS+=9;pS-=5;}
      if(h5Dn){pS+=9;cS-=5;}
   }
   
   if(rBull2){cS+=10;pS-=5;}
   if(rBear2){pS+=10;cS-=5;}
   if(stOS){cS+=10;pS-=5;}
   if(stOB){pS+=10;cS-=5;}
   if(macdCrossUp){cS+=12;pS-=6;}
   else if(macdBull){cS+=5;}
   if(macdCrossDn){pS+=12;cS-=6;}
   else if(macdBear){pS+=5;}
   if(bMom){cS+=10;pS-=5;}
   if(brMom){pS+=10;cS-=5;}
   if(sBull&&!rejUp){cS+=13;pS-=7;}
   if(sBear&&!rejDn){pS+=13;cS-=7;}
   if(rejUp){pS+=12;cS-=6;}
   if(rejDn){cS+=12;pS-=6;}
   if(doji){cS-=3;pS-=3;}
   if(bkUp){cS+=9;pS-=4;}
   if(bkDn){pS+=9;cS-=4;}
   if(fkUp){pS+=11;cS-=5;}
   if(fkDn){cS+=11;pS-=5;}
   
   if(bullRun>=3){pS+=14;cS-=7;}
   else if(bearRun>=3){cS+=14;pS-=7;}
   if(bullRun>=4){pS+=6;}
   if(bearRun>=4){cS+=6;}
   if(bullRun>=5){pS+=4;}
   if(bearRun>=5){cS+=4;}
   
   if(rrUp){pS+=10;cS-=5;}
   if(rrDn){cS+=10;pS-=5;}
   
   if(NCP_UseVolume){
      if(hiVol){
         if(bull1) cS+=7;
         if(bear1) pS+=7;
      }
      if(loVol){cS-=2;pS-=2;}
   }

// === NEW: Live Candle Bonus (Close[0] analysis) ===
   double rng0=High[0]-Low[0];
   if(rng0>0){
      double uw0=(High[0]-MathMax(Open[0],Close[0]))/rng0;
      double lw0=(MathMin(Open[0],Close[0])-Low[0])/rng0;
      bool bull0=(Close[0]>Open[0]);
      bool bear0=(Close[0]<Open[0]);
      
      if(uw0>0.50&&!bull0){pS+=8;cS-=4;}
      if(lw0>0.50&&!bear0){cS+=8;pS-=4;}
      
      if(bull0&&bull1) cS+=5;
      if(bear0&&bear1) pS+=5;
   }

// Trap context (recent 30 bars)
   double tBull=0,tBear=0;
   for(int t=2;t<=30&&t<Bars;t++){
      double r=High[t]-Low[t];
      if(r<=0) continue;
      double uw=High[t]-MathMax(Open[t],Close[t]);
      double lw=MathMin(Open[t],Close[t])-Low[t];
      if(uw>r*0.55&&Close[t]<Open[t]) tBear+=1.2;
      if(lw>r*0.55&&Close[t]>Open[t]) tBull+=1.2;
   }
   if(tBull>tBear+2.0) cS+=MathMin(10.0,(tBull-tBear));
   if(tBear>tBull+2.0) pS+=MathMin(10.0,(tBear-tBull));

// Confluence booster
   int bC=0,brC=0;
   if(upTrend||upBias) bC++;
   if(dnTrend||dnBias) brC++;
   if(h5Up) bC++;
   if(h5Dn) brC++;
   if(rBull2) bC++;
   if(rBear2) brC++;
   if(stOS) bC++;
   if(stOB) brC++;
   if(macdBull||macdCrossUp) bC++;
   if(macdBear||macdCrossDn) brC++;
   if(bMom) bC++;
   if(brMom) brC++;
   if(sBull) bC++;
   if(sBear) brC++;
   if(rejDn) bC++;
   if(rejUp) brC++;
   if(bkUp||fkDn) bC++;
   if(bkDn||fkUp) brC++;
   if(rrDn) bC++;
   if(rrUp) brC++;
   if(hiVol&&bull1) bC++;
   if(hiVol&&bear1) brC++;
   if(bearRun>=3) bC++;
   if(bullRun>=3) brC++;
   
   if(bC>=5){cS+=4;}
   if(brC>=5){pS+=4;}
   if(bC>=7){cS+=3;}
   if(brC>=7){pS+=3;}
   if(bC>=9){cS+=2;}
   if(brC>=9){pS+=2;}

// Normalize raw score
   cS=MathMax(1.0,cS);
   pS=MathMax(1.0,pS);
   double tot=cS+pS;
   cS=(cS/tot)*100.0;
   pS=100.0-cS;

// === LEARNING WEIGHT (only after MIN_TRADES) ===
   if(ENABLE_LEARNING&&g_totalTrades>=MIN_TRADES_TO_LEARN){
      double wCap=MathMax(0.6,g_callWeight);
      double wPap=MathMax(0.6,g_putWeight);
      cS*=wCap; 
      pS*=wPap;
      tot=cS+pS; 
      if(tot>0){cS=(cS/tot)*100.0;pS=100.0-cS;}
   }

// === BROKER TRAP DETECTION ===
   g_trapScore=0;
   if(ENABLE_TRAP_DETECTION){
      g_trapScore=CalculateBrokerTrap(cS,pS);
      if(g_trapScore>70){
         if(cS>pS){pS+=18;cS-=10;}
         else{cS+=18;pS-=10;}
         tot=cS+pS;
         cS=(cS/tot)*100.0;
         pS=100.0-cS;
      }
   }

// === SCORE SMOOTHING — DISPLAY ONLY ===
   double smoothFactor=0.55;
   g_smoothCallScore = g_smoothCallScore*(1.0-smoothFactor) + cS*smoothFactor;
   g_smoothPutScore  = g_smoothPutScore*(1.0-smoothFactor) + pS*smoothFactor;
   
   double smoothTot=g_smoothCallScore+g_smoothPutScore;
   if(smoothTot>0){
      g_smoothCallScore=(g_smoothCallScore/smoothTot)*100.0;
      g_smoothPutScore=100.0-g_smoothCallScore;
   }

// Display uses SMOOTHED values
   g_mtgHype     = NormalizeDouble(g_smoothCallScore, 1);
   g_mtgBetrayal = NormalizeDouble(g_smoothPutScore, 1);
   
   // SIGNAL uses RAW values (FIXED: this was the main bug!)

// Strength based on RAW scores
   double edge=MathAbs(cS-pS);
   string str="WEAK";
   if(edge>=22) str="EXTREME";
   else if(edge>=15) str="STRONG";
   else if(edge>=8) str="MEDIUM";

// Save globals
   g_mtgPattern  = str;
   g_mtgBullCount = bC;
   g_mtgBearCount = brC;
   g_mtgRecovery = NormalizeDouble(atrPips,1);

string rsiStr="";
   if(NCP_UseRSINorm) 
      rsiStr="R1:"+DoubleToString(r1,0)+" N5:"+DoubleToString(n5v,0)+" T:"+DoubleToString(g_trapScore,0);

// FIXED: Lowered thresholds for more signals
   int minP=NCP_MinProbMedium;
   if(str=="STRONG")  minP=NCP_MinProbStrong-2;
   if(str=="EXTREME") minP=NCP_MinProbExtreme-3;

// === FINAL SIGNAL (on new bar only for tracking) ===
   if(Time[0]!=g_ncpLastSignalTime){
      g_ncpLastSignalTime=Time[0];
      g_ncpSignalProcessed=false;
   }

bool isTrap=(ENABLE_TRAP_DETECTION&&g_trapScore>70);
   
   if(cS>=minP&&cS>pS){
      g_mtgState  = isTrap?"PUT TRAP":"CALL";
      g_mtgReason = rsiStr;
      g_mtgAction = isTrap?"PUT "+DoubleToString(g_trapScore,0)+"% TRAP!":"CALL "+DoubleToString(cS,1)+"% ["+str+"]";
      g_mtgClr    = isTrap?NEON_PURPLE:(str=="EXTREME")?NEON_GREEN:(str=="STRONG")?NEON_LIME:NEON_CYAN;
      if(!g_ncpSignalProcessed){
         g_ncpLastSignalType=isTrap?"PUT":"CALL";
         g_ncpLastSignalTime=Time[0];
      }
   }
   else if(pS>=minP&&pS>cS){
      g_mtgState  = isTrap?"CALL TRAP":"PUT";
      g_mtgReason = rsiStr;
      g_mtgAction = isTrap?"CALL "+DoubleToString(g_trapScore,0)+"% TRAP!":"PUT "+DoubleToString(pS,1)+"% ["+str+"]";
      g_mtgClr    = isTrap?NEON_PURPLE:(str=="EXTREME")?NEON_RED:(str=="STRONG")?C'255,60,60':NEON_ORANGE;
      if(!g_ncpSignalProcessed){
         g_ncpLastSignalType=isTrap?"CALL":"PUT";
         g_ncpLastSignalTime=Time[0];
      }
   }
   else{
      g_mtgState  = "WAIT";
      g_mtgReason = rsiStr;
      string edgeDir=(cS>pS)?">C":">P";
      g_mtgAction = edgeDir+" "+DoubleToString(MathMax(cS,pS),0)+"%";
      g_mtgClr    = NEON_YELLOW;
      g_ncpSignalProcessed=true;
   }
}

//+------------------------------------------------------------------+
// HA CANDLE CALCULATION (M1 + M5)
//+------------------------------------------------------------------+
void CalcHA(){
   if(Bars<10) return;
   ArraySetAsSeries(Open,true); ArraySetAsSeries(High,true); ArraySetAsSeries(Low,true); ArraySetAsSeries(Close,true);
   static double haO1[500],haC1[500]; static datetime lb1=0;
   ArraySetAsSeries(haO1,true); ArraySetAsSeries(haC1,true);
   datetime c1=iTime(NULL,PERIOD_M1,0);
   if(c1!=lb1){ lb1=c1; int lim=MathMin(iBars(NULL,PERIOD_M1),500);
      for(int i=lim-1;i>=0;i--){ haC1[i]=(Open[i]+High[i]+Low[i]+Close[i])/4.0;
         if(i==lim-1) haO1[i]=(Open[i]+Close[i])/2.0; else haO1[i]=(haO1[i+1]+haC1[i+1])/2.0; }}
   double d1=MathAbs(haC1[1]-haO1[1]),r1=High[1]-Low[1];
   bool dz=(r1>0&&d1<r1*0.1),b1=(!dz&&haC1[1]>haO1[1]),be1=(!dz&&haC1[1]<haO1[1]);
   if(b1){g_haM1="HA BULLISH 1";g_haM1Color=clrLime;}
   else if(be1){g_haM1="HA BEARISH 1";g_haM1Color=clrRed;}
   else{g_haM1="HA DOJI 1";g_haM1Color=clrYellow;}
   if(iBars(NULL,PERIOD_M5)>=10){
      static double haO5[200],haC5[200]; static datetime lb5=0;
      ArraySetAsSeries(haO5,true); ArraySetAsSeries(haC5,true);
      datetime c5=iTime(NULL,PERIOD_M5,0);
      if(c5!=lb5){ lb5=c5; int lim=MathMin(iBars(NULL,PERIOD_M5),200);
         for(int i=lim-1;i>=0;i--){ double o=iOpen(NULL,PERIOD_M5,i),h=iHigh(NULL,PERIOD_M5,i),l=iLow(NULL,PERIOD_M5,i),c=iClose(NULL,PERIOD_M5,i);
            haC5[i]=(o+h+l+c)/4.0; if(i==lim-1) haO5[i]=(o+c)/2.0; else haO5[i]=(haO5[i+1]+haC5[i+1])/2.0; }}
      double d5=MathAbs(haC5[1]-haO5[1]),r5=iHigh(NULL,PERIOD_M5,1)-iLow(NULL,PERIOD_M5,1);
      bool dz5=(r5>0&&d5<r5*0.1),b5=(!dz5&&haC5[1]>haO5[1]),be5=(!dz5&&haC5[1]<haO5[1]);
      if(b5){g_haM5="HA BULLISH 5";g_haM5Color=clrLime;}
      else if(be5){g_haM5="HA BEARISH 5";g_haM5Color=clrRed;}
      else{g_haM5="HA DOJI 5";g_haM5Color=clrYellow;}
      if(b1&&b5)g_haBoth="BOTH BULL"; else if(be1&&be5)g_haBoth="BOTH BEAR"; else g_haBoth="MIXED";
   }else{g_haM5="5 --";g_haM5Color=clrGray;g_haBoth="HA --";}
}

//+------------------------------------------------------------------+
// HELPER FUNCTIONS
//+------------------------------------------------------------------+
bool IsLineNearby(double price,double pipTol=3.0){
   bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=pipTol*pip;
   for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i);
      if((int)ObjectGetInteger(0,nm,OBJPROP_TYPE)==OBJ_HLINE){
         double lp=ObjectGetDouble(0,nm,OBJPROP_PRICE); if(MathAbs(lp-price)<tol) return true; }}
   return false;
}
string GetCurrentSession(color &sC){
   int h=TimeHour(TimeGMT());
   if(h>=12&&h<16){sC=NEON_GOLD;return "LON+NY";}
   if(h>=7&&h<9){sC=NEON_CYAN;return "ASI+LON";}
   if(h>=7&&h<16){sC=NEON_GREEN;return "LONDON";}
   if(h>=12&&h<21){sC=NEON_BLUE;return "NEW YORK";}
   if(h>=0&&h<9){sC=NEON_ORANGE;return "ASIA";}
   sC=C'100,100,120'; return "SYDNEY";
}
bool IsSessionActive(){int h=TimeHour(TimeGMT());return(h>=7&&h<=21);}
bool IsBigCandle(int s){if(Bars<20)return false;double a=iATR(NULL,PERIOD_M1,14,0);return(a>0&&(High[s]-Low[s])>a*1.8);}
bool CheckMTFConfirmation(){
   if(!MTF_CONFIRM) return true;
   bool m1Bull=(Close[1]>Open[1]);
   bool m5Bull=false,m15Bull=false;
   if(iBars(NULL,PERIOD_M5)>=3) m5Bull=(iClose(NULL,PERIOD_M5,1)>iOpen(NULL,PERIOD_M5,1));
   if(iBars(NULL,PERIOD_M15)>=3) m15Bull=(iClose(NULL,PERIOD_M15,1)>iOpen(NULL,PERIOD_M15,1));
   int bullCount=0,bearCount=0;
   if(m1Bull) bullCount++; else bearCount++;
   if(m5Bull) bullCount++; else bearCount++;
   if(m15Bull) bullCount++; else bearCount++;
   g_mtfConfirmed=(bullCount>=2 || bearCount>=2);
   return g_mtfConfirmed;
}
double Tanh(double x){double e=MathExp(2.0*x);return(e-1.0)/(e+1.0);}
double CalcFractalDimension(int period){
   if(period<2)return 1.5;double sum=0.0;
   for(int i=1;i<period;i++){double r1=High[i]-Low[i],r2=High[i+1]-Low[i+1];if(r1<=0.0||r2<=0.0)continue;sum+=MathLog(r1/r2+0.001)*MathLog((double)i/(double)period);}
   double result=2.0-sum/period;if(result<1.0)result=1.0;if(result>2.0)result=2.0;return result;
}
double DetectBrokerTrap(int lookback){
   int bull=0,bear=0;for(int i=1;i<=lookback;i++){if(Close[i]>Open[i])bull++;else if(Close[i]<Open[i])bear++;}
   double crowd=(bull>bear)?(double)bull/lookback:(double)bear/lookback;
   double priceMove=MathAbs(Close[1]-Close[lookback])/(Close[lookback]+0.00001);
   if(crowd>0.7&&priceMove<0.002)return 0.9;if(crowd>0.6&&priceMove>0.001)return 0.5;return 0.3;
}
double QuickMedian(double &arr[],int size){
   double sorted[20];for(int i=0;i<size;i++)sorted[i]=arr[i];
   for(int i=0;i<size-1;i++)for(int j=i+1;j<size;j++)if(sorted[i]>sorted[j]){double tmp=sorted[i];sorted[i]=sorted[j];sorted[j]=tmp;}
   return(sorted[size/2]+sorted[(size-1)/2])/2.0;
}
double CalcAdvancedTFA(string &detail){
   if(Bars<30){detail="Bars low";return 3.0;}
   double score=0;string p="";
   double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);
   double adxSc=(adx>=25)?1.0:(adx>=20)?0.6:(adx>=15)?0.3:0.1;
   score+=adxSc;p+="ADX:"+((adxSc>=0.6)?"+":"-")+" ";
   double v1=iVolume(NULL,PERIOD_M1,1),vA=0;
   for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);
   vA=(vA>0)?vA/5.0:1;double vr=v1/vA;
   double volSc=(vr>=2.0)?1.0:(vr>=1.5)?0.7:(vr>=1.1)?0.4:0.1;
   score+=volSc;p+="VOL:"+((volSc>=0.5)?"+":"-")+" ";
   double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
   double rsiSc=0.2;if(rsi>=60||rsi<=40)rsiSc=1.0;else if(rsi>=55||rsi<=45)rsiSc=0.6;
   score+=rsiSc;p+="RSI:"+((rsiSc>=0.6)?"+":"-")+" ";
   double atr=iATR(NULL,PERIOD_M1,14,1),cs=High[1]-Low[1],atrSc=0.2;
   if(atr>0){double r=cs/atr;if(r>=0.7&&r<=1.5)atrSc=1.0;else if(r>=0.5&&r<=2.0)atrSc=0.6;else atrSc=0.3;}
   score+=atrSc;p+="ATR:"+((atrSc>=0.6)?"+":"-")+" ";
   double body=MathAbs(Close[1]-Open[1]),range=High[1]-Low[1],bdySc=0.2;
   if(range>0){double br=body/range;if(br>=0.6)bdySc=1.0;else if(br>=0.4)bdySc=0.6;else if(br>=0.2)bdySc=0.3;}
   score+=bdySc;p+="BODY:"+((bdySc>=0.6)?"+":"-")+" ";
   double sesSc=IsSessionActive()?1.0:0.4;
   score+=sesSc;p+="SES:"+((sesSc>=0.7)?"+":"-");
   double finalScore=MathMin(6.0,score);int rounded=(int)MathRound(finalScore);
   string dir="MIX";
   if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")dir="STRONG UP";
   else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")dir="STRONG DOWN";
   else if(g_haM1=="HA BULLISH 1")dir="UP";
   else if(g_haM1=="HA BEARISH 1")dir="DOWN";
   detail=p+" | "+IntegerToString(rounded)+"/6 "+dir;
   g_tfa_detail=detail;return finalScore;
}
double CalcAdvancedMicroAI(){
   if(Bars<20)return 50.0;double score=50.0;
   for(int i=1;i<=5;i++){double r=High[i]-Low[i];if(r<=0)continue;double uw=(High[i]-MathMax(Open[i],Close[i]))/r,lw=(MathMin(Open[i],Close[i])-Low[i])/r,w=(6.0-i)/5.0;if(uw>0.60)score-=w*15;if(lw>0.60)score+=w*15;}
   double pos5=0;for(int i=1;i<=5;i++){double r=High[i]-Low[i];if(r<=0)continue;pos5+=(Close[i]-Low[i])/r;}score+=(pos5/5.0-0.5)*20.0;
   int gc=0,rc=0;for(int i=1;i<=8;i++){if(Close[i]>Open[i])gc++;else if(Close[i]<Open[i])rc++;}score+=(gc-rc)*2.5;
   double vl1=(double)iVolume(NULL,PERIOD_M1,1),vA=0;for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);vA/=5.0;
   if(vA>0){double vr=vl1/vA;if(vr>1.5&&Close[1]>Open[1])score+=8;if(vr>1.5&&Close[1]<Open[1])score-=8;}
   double r1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),r5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
   if(r1<35)score+=10;if(r1>65)score-=10;if(r1>r5&&Close[1]<Close[5])score+=6;if(r1<r5&&Close[1]>Close[5])score-=6;
   return MathMax(5.0,MathMin(95.0,score));
}
double VolumeTrapScore();
int CalcAdvancedMicroTrap(){
   if(Bars<20)return 0;int score=0;double r=High[1]-Low[1];
   if(r>0){double uw=(High[1]-MathMax(Open[1],Close[1]))/r,lw=(MathMin(Open[1],Close[1])-Low[1])/r;if(uw>0.65)score+=30;else if(uw>0.50)score+=15;if(lw>0.65)score+=20;else if(lw>0.50)score+=10;}
   double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
   if(v2>0&&v1/v2>2.0)score+=25;else if(v2>0&&v1/v2>1.5)score+=12;
   double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi>78||rsi<22)score+=20;else if(rsi>72||rsi<28)score+=10;
   if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))score+=25;
   bool aG=(Close[1]>Open[1]&&Close[2]>Open[2]&&Close[3]>Open[3]),aR=(Close[1]<Open[1]&&Close[2]<Open[2]&&Close[3]<Open[3]);
   if(aG||aR)score+=15;
   double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);if(sp>BROKER_SPREAD_THRESHOLD*1.5)score+=10;
   score+=(int)VolumeTrapScore();return MathMin(100,score);
}
double CalcAdvancedFractal(){
   if(Bars<15)return 0;double score=0;
   for(int i=2;i<=8&&i+2<Bars;i++){
      if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){double d=(High[i]-Close[0])/Point;if(d<50&&d>-10)score+=35;}
      if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){double d=(Close[0]-Low[i])/Point;if(d<50&&d>-10)score+=25;}}
   int dj=0;for(int i=1;i<=6;i++){double b=MathAbs(Close[i]-Open[i]),rg=High[i]-Low[i];if(rg>0&&b<rg*0.20)dj++;}
   if(dj>=3)score+=25;
   double r1=High[1]-Low[1];if(r1>0){double uw1=(High[1]-MathMax(Open[1],Close[1]))/r1,lw1=(MathMin(Open[1],Close[1])-Low[1])/r1;if(uw1>0.70||lw1>0.70)score+=20;}
   return MathMin(100,score);
}
string CalcAdvancedMarketBias(color &bC,double brain,double rsc){
   if(Bars<30){bC=NEON_YELLOW;return "CALCULATING";}
   double score=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
   double pc=Close[0]-Close[10];
   if(pc>5*pip)score+=4;else if(pc>2*pip)score+=2;else if(pc<-5*pip)score-=4;else if(pc<-2*pip)score-=2;
   double hh1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hh2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
   double ll1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],ll2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
   if(hh1>hh2&&ll1>ll2)score+=4;else if(hh1<hh2&&ll1<ll2)score-=4;else if(hh1>hh2)score+=2;else if(hh1<hh2)score-=2;
   double ema20=0,ema20p=0;for(int i=0;i<20;i++)ema20+=Close[i];ema20/=20;
   for(int i=1;i<=20&&i<Bars;i++)ema20p+=Close[i];ema20p/=20;
   if(ema20>ema20p)score+=3;else if(ema20<ema20p)score-=3;
   double ema50=0;for(int i=0;i<50&&i<Bars;i++)ema50+=Close[i];ema50/=MathMin(50,Bars);
   if(ema20>ema50)score+=3;else score-=3;
   int gC=0,rC=0;for(int i=1;i<=10;i++){if(Close[i]>Open[i])gC++;else if(Close[i]<Open[i])rC++;}
   if(gC>=7)score+=3;else if(rC>=7)score-=3;else if(gC>=5)score+=1;else if(rC>=5)score-=1;
   bool m1B=(g_haM1=="HA BULLISH 1"),m1Be=(g_haM1=="HA BEARISH 1"),m5B=(g_haM5=="HA BULLISH 5"),m5Be=(g_haM5=="HA BEARISH 5");
   if(m1B&&m5B)score+=4;else if(m1Be&&m5Be)score-=4;else if(m1B)score+=2;else if(m1Be)score-=2;
   double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1),pDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_PLUSDI,1),mDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MINUSDI,1);
   if(adx>20){if(pDI>mDI+5)score+=4;else if(mDI>pDI+5)score-=4;}
   if(brain>3)score-=2;else if(brain<-3)score+=2;
   if(Close[1]>Open[1])score+=1;else if(Close[1]<Open[1])score-=1;
   if(rsc>2)score+=1;else if(rsc<-2)score-=1;
   if(score>=12){bC=NEON_GREEN;return "STRONG BULL";}if(score>=7){bC=NEON_GREEN;return "BULLISH";}if(score>=3){bC=NEON_CYAN;return "LIGHT BULL";}
   if(score<=-12){bC=NEON_RED;return "STRONG BEAR";}if(score<=-7){bC=NEON_RED;return "BEARISH";}if(score<=-3){bC=NEON_ORANGE;return "LIGHT BEAR";}
   bC=NEON_YELLOW;return "NEUTRAL";
}
void CalcAdvancedPrediction(double &gP,double &rP,string &reason,color &pC){
   if(Bars<50){gP=50;rP=50;reason="Bars low";pC=NEON_YELLOW;return;}
   bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
   double green=0,red=0;
   double body1=MathAbs(Close[1]-Open[1]),range1=High[1]-Low[1];
   if(range1>0){double uw=High[1]-MathMax(Open[1],Close[1]),lw=MathMin(Open[1],Close[1])-Low[1];
      if(uw>range1*0.60&&Close[1]>Open[1])red+=22;else if(lw>range1*0.60&&Close[1]<Open[1])green+=22;
      else if((uw+lw)/range1>0.55){if(uw>lw)red+=12;else green+=12;}}
   double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),cci=iCCI(NULL,PERIOD_M1,14,PRICE_TYPICAL,1),stochK=iStochastic(NULL,PERIOD_M1,5,3,3,MODE_SMA,0,MODE_MAIN,1);
   int os=0,ob=0;
   if(rsi<30)os++;else if(rsi>70)ob++;if(cci<-120)os++;else if(cci>120)ob++;if(stochK<20)os++;else if(stochK>80)ob++;
   if(os>=3)green+=18;else if(os>=2)green+=12;else if(ob>=3)red+=18;else if(ob>=2)red+=12;
   double rsiPrev=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
   double low1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],low2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
   double high1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],high2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
   if(low1<low2&&rsi>rsiPrev&&rsi<45)green+=15;if(high1>high2&&rsi<rsiPrev&&rsi>55)red+=15;
   double v1=iVolume(NULL,PERIOD_M1,1),vAvg=0;for(int i=2;i<=10;i++)vAvg+=iVolume(NULL,PERIOD_M1,i);vAvg=(vAvg>0)?vAvg/9.0:1.0;
   double vol_ratio=(vAvg>0)?v1/vAvg:1.0;
   if(vol_ratio>2.0){if(Close[1]>Open[1])red+=20;else green+=20;}else if(vol_ratio>1.5){if(Close[1]>Open[1])red+=12;else green+=12;}else if(vol_ratio>1.2){if(Close[1]>Open[1])green+=5;else red+=5;}
   double m1_haC1=(Open[1]+High[1]+Low[1]+Close[1])/4.0,m1_haC2=(Open[2]+High[2]+Low[2]+Close[2])/4.0;
   double m1_haO2=(Open[3]+Close[3])/2.0,m1_haO1=(m1_haO2+m1_haC2)/2.0;
   bool haBull1=(m1_haC1>m1_haO1);
   double haStr1=MathAbs(m1_haC1-m1_haO1)/(High[1]-Low[1]+0.00001);
   bool haBull5=false;double haStr5=0;
   if(iBars(NULL,PERIOD_M5)>=5){
      double o1=iOpen(NULL,PERIOD_M5,1),h1=iHigh(NULL,PERIOD_M5,1),l1=iLow(NULL,PERIOD_M5,1),c1=iClose(NULL,PERIOD_M5,1);
      double o2=iOpen(NULL,PERIOD_M5,2),h2=iHigh(NULL,PERIOD_M5,2),l2=iLow(NULL,PERIOD_M5,2),c2=iClose(NULL,PERIOD_M5,2);
      double o3=iOpen(NULL,PERIOD_M5,3),c3=iClose(NULL,PERIOD_M5,3);
      double haC1_5=(o1+h1+l1+c1)/4.0,haC2_5=(o2+h2+l2+c2)/4.0,haO2_5=(o3+c3)/2.0,haO1_5=(haO2_5+haC2_5)/2.0;
      haBull5=(haC1_5>haO1_5);haStr5=MathAbs(haC1_5-haO1_5)/(h1-l1+0.00001);}
   if(haBull1&&haBull5)green+=15;else if(!haBull1&&!haBull5)red+=15;
   else if(haBull1&&haStr1>0.5)green+=8;else if(!haBull1&&haStr1>0.5)red+=8;
   double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1),plusDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_PLUSDI,1),minusDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MINUSDI,1);
   double diDiff=plusDI-minusDI;
   if(adx>25){if(diDiff>8)green+=12;else if(diDiff>4)green+=8;else if(diDiff<-8)red+=12;else if(diDiff<-4)red+=8;}
   else if(adx>15){if(plusDI>minusDI)green+=4;else red+=4;}
   else{if(Close[1]>Open[1])red+=3;else green+=3;}
   double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,20,2)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,20,2)];
   double dR=(res-Close[0])/pip,dS=(Close[0]-sup)/pip;
   if(dR<8&&dR>=0)red+=12;else if(dR<15&&dR>=0)red+=6;
   if(dS<8&&dS>=0)green+=12;else if(dS<15&&dS>=0)green+=6;
   if(g_hrn_price>0){double dH=MathAbs(Close[0]-g_hrn_price)/pip;if(dH<5){if(Close[0]>g_hrn_price)red+=8;else green+=8;}}
   double macdMain=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_MAIN,1),macdSig=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
   double macdPrev=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_MAIN,2),macdSigPrev=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_SIGNAL,2);
   if(macdMain>macdSig&&macdPrev<=macdSigPrev)green+=10;else if(macdMain<macdSig&&macdPrev>=macdSigPrev)red+=10;
   else if(macdMain>macdSig)green+=5;else if(macdMain<macdSig)red+=5;
   if(g_otcCallPct>=75&&!haBull1)red+=15;else if(g_otcPutPct>=75&&haBull1)green+=15;
   else if(g_otcCallPct>=65&&!haBull1)red+=8;else if(g_otcPutPct>=65&&haBull1)green+=8;
   // BB Pullback bonus
   if(ENABLE_BB_PULLBACK&&g_bbSignal=="CALL")green+=12;
   else if(ENABLE_BB_PULLBACK&&g_bbSignal=="PUT")red+=12;
   double diff=MathMax(-100.0,MathMin(100.0,green-red));
   gP=MathMax(8.0,MathMin(92.0,50.0+diff*0.65));rP=100.0-gP;
   double dom=MathMax(gP,rP);
   if(dom>=82){reason=(gP>rP)?"STRONG GREEN":"STRONG RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
   else if(dom>=72){reason=(gP>rP)?"GREEN":"RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
   else if(dom>=60){reason=(gP>rP)?"WEAK GREEN":"WEAK RED";pC=(gP>rP)?NEON_CYAN:NEON_ORANGE;}
   else{reason="WAIT";pC=NEON_YELLOW;}
}
string DetectMyStrategy(){
   int cc=g_otcCallPct,cp=g_otcPutPct,thr=STRATEGY_THRESHOLD;
   if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TRAP_ONLY"){
      if(cc>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TRAP";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA RED";return "PUT";}
      if(cp>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TRAP";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA GREEN";return "CALL";}}
   if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TREND_ONLY"){
      if(cc>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TREND";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA GREEN";return "CALL";}
      if(cp>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TREND";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA RED";return "PUT";}}
   g_strategyType="NONE";g_strategyReason="Wait "+IntegerToString(thr)+"% + HA";return "WAIT";
}
void CalcOTCCrowd(){
   int cS=0,pS=0;int weights[15];
   for(int w=0;w<15;w++)weights[w]=15-w*2;
   for(int w=0;w<15;w++)if(weights[w]<1)weights[w]=1;
   for(int i=1;i<=15&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
      double uw=(High[i]-MathMax(Open[i],Close[i]))/rg,lw=(MathMin(Open[i],Close[i])-Low[i])/rg;int wgt=weights[i-1];
      if(uw>0.70&&Close[i]<Open[i])cS+=4*wgt;if(lw>0.70&&Close[i]>Open[i])pS+=4*wgt;
      if(uw>0.55&&Close[i]<Open[i])cS+=2*wgt;if(lw>0.55&&Close[i]>Open[i])pS+=2*wgt;
      if(Close[i]>Open[i])cS+=1*wgt;else if(Close[i]<Open[i])pS+=1*wgt;}
   int tot=cS+pS;if(tot==0){g_otcCallPct=50;g_otcPutPct=50;}
   else{int rC=(int)(cS*100.0/tot),rP=100-rC;
      if(rC>=rP){g_otcCallPct=MathMax(50,rC);g_otcPutPct=100-g_otcCallPct;}
      else{g_otcPutPct=MathMax(50,rP);g_otcCallPct=100-g_otcPutPct;}}
}
double BrainSc(int &cp){
   double s=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
   double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,LB,1)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,LB,1)];
   double bH=MathMax(Open[1],Close[1]),bL=MathMin(Open[1],Close[1]);
   if(High[1]>res&&bL<res)s-=4;if(Low[1]<sup&&bH>sup)s+=4;if(High[0]>res)s-=2;if(Low[0]<sup)s+=2;
   double atr=iATR(NULL,PERIOD_M1,14,1);
   if(atr!=0){double cn=(High[1]-Low[1])/atr,v1=(double)iVolume(NULL,PERIOD_M1,1),va=0;
      for(int i=2;i<=10;i++)va+=iVolume(NULL,PERIOD_M1,i);va/=9.0;
      double vr=va>0?v1/va:1;if(cn>1.2&&vr>1.5){if(Close[1]>Open[1])s-=3;else s+=3;}}
   int c=0;for(int i=1;i<=30;i++)if(Close[i]>Open[i])c++;
   cp=(int)(c*100.0/30.0);if(cp>=70)s-=5;if(cp<=30)s+=5;s*=1.5;
   int dj=0;for(int i=1;i<=8;i++){double bd=MathAbs(Close[i]-Open[i]),rg=High[i]-Low[i];if(rg<=0)continue;
      if(bd<rg*0.2)dj++;double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];
      if(uw>bd*3)s+=2;if(lw>bd*3)s-=2;}if(dj>=4)s*=1.5;
   int bu=0,be=0;for(int i=1;i<=8;i++){if(Close[i]>Open[i]){bu++;be=0;}else{be++;bu=0;}if(bu>=5)s-=3;if(be>=5)s+=3;}
   int h=TimeHour(TimeCurrent());double mul=1.0;
   if((h>=0&&h<=2)||(h>=8&&h<=11)||(h>=14&&h<=17))mul=1.20;if(h>=3&&h<=7)mul=0.90;
   return s*mul;
}
double MicroWick(){double r=High[1]-Low[1];if(r<=0)return 0;return((High[1]-MathMax(Open[1],Close[1]))+(MathMin(Open[1],Close[1])-Low[1]))/r;}
double VolumeTrapScore(){
   if(!VOLUME_PROFILE_TRAP||Bars<50)return 0;
   double cur=Close[0],hi=High[iHighest(NULL,0,MODE_HIGH,50,1)],lo=Low[iLowest(NULL,0,MODE_LOW,50,1)];
   double rg=hi-lo;if(rg<=0)return 0;int zn=5;double zs=rg/zn;double vz[5]={0,0,0,0,0};int zc[5]={0,0,0,0,0};
   for(int i=1;i<=50;i++){double p=Close[i];int z=(int)((p-lo)/zs);if(z<0)z=0;if(z>=zn)z=zn-1;vz[z]+=Volume[i];zc[z]++;}
   for(int z=0;z<zn;z++)if(zc[z]>0)vz[z]/=zc[z];
   int cz=(int)((cur-lo)/zs);if(cz<0)cz=0;if(cz>=zn)cz=zn-1;
   double vr=(double)Volume[1]/(vz[cz]+0.001);double wr=MicroWick();
   if(vr>2.0&&wr>0.65)return 25;if(vr>1.8&&wr>0.55)return 15;return 0;
}
double UltimateTrapScore(){double wr=MicroWick(),v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
   double avg=v2>0?v2:1.0,vr=v1/avg,rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),sc=0.0;
   if(wr>0.65)sc+=40;if(vr>2.0)sc+=30;if(rsi>75||rsi<25)sc+=20;
   if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))sc+=25;
   sc+=VolumeTrapScore();return MathMin(100.0,sc);}
bool IsBrokerForce(double dummy=0){
   int sd=0;for(int i=1;i<=3;i++){if(Close[i]>Open[i])sd++;else sd--;}
   double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
   double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
   return(MathAbs(sd)==3&&v1>v2*2.0&&sp>BROKER_SPREAD_THRESHOLD);}
double NeuralBiasFast(){double r=NeuralBias(0)*0.3+NeuralBias(1)*0.7;if(r>96)r=96;if(r<4)r=4;return r;}
double NeuralBias(int s){
   double f[8];f[0]=fDoji(s)/100.0;f[1]=fWick(s)/100.0;f[2]=fVol()/100.0;f[3]=fMom(s)/100.0;
   f[4]=fSpread()/100.0;f[5]=fMem(s)/100.0;f[6]=fTick(s)/100.0;f[7]=fFrac(s)/100.0;
   double h[4]={0,0,0,0};for(int i=0;i<4;i++){for(int j=0;j<8;j++)h[i]+=f[j]*NW[j*4+i];h[i]=MathMax(0,h[i]-0.08);}
   double o=0;for(int i=0;i<4;i++)o+=h[i]*NW[32+i];double r=50.0+o*22.0;return r>96?96:r<4?4:r;}
double fDoji(int s){int n=0;for(int i=s;i<s+5&&i<Bars;i++){double b=MathAbs(Open[i]-Close[i]),r=High[i]-Low[i];if(r>0&&b<r*0.25)n++;}return n*20.0;}
double fWick(int s){double r=High[s]-Low[s];if(r==0)return 0;double u=(High[s]-MathMax(Open[s],Close[s]))/r,l=(MathMin(Open[s],Close[s])-Low[s])/r;return(u>0.65||l>0.65)?95:(u>0.5||l>0.5)?70:0;}
double fVol(){if(Bars<11)return 0;double a=0;for(int i=1;i<=10;i++)a+=iVolume(NULL,PERIOD_M1,i);a/=10.0;if(a==0)return 0;double r=(double)iVolume(NULL,PERIOD_M1,0)/a;return r>3?95:r>2?75:r>1.5?50:0;}
double fMom(int s){if(s+3>=Bars)return 0;return((Close[s]>Open[s]&&Close[s+1]<Open[s+1])||(Close[s]<Open[s]&&Close[s+1]>Open[s+1]))?88:0;}
double fSpread(){double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);return sp>8?90:sp>5?70:sp>3?40:0;}
double fMem(int s){if(s+8>=Bars)return 0;int r=0;for(int i=s;i<s+8&&i+2<Bars;i+=2){bool vB=(Low[i]>Low[i+1]&&Low[i+2]>Low[i+1]&&Close[i+2]>Open[i+2]);bool aT=(High[i]<High[i+1]&&High[i+2]<High[i+1]&&Close[i+2]<Open[i+2]);if(vB||aT)r++;}return(double)r*12.5;}
double fTick(int s){if(s+5>=Bars)return 0;double vN=(double)iVolume(NULL,PERIOD_M1,s),vP=(double)iVolume(NULL,PERIOD_M1,s+1);if(vP==0)return 0;double vR=vN/vP,pc=MathAbs(Close[s]-Close[s+1])/Close[s+1]*100;if(vR>2.0&&pc<0.1)return 85;if(vR>1.5&&pc<0.05)return 60;return 0;}
double fFrac(int s){if(s+4>=Bars||s<2)return 0;bool b=(Low[s]<Low[s-1]&&Low[s]<Low[s-2]&&Low[s]<Low[s+1]&&Low[s]<Low[s+2]);bool t=(High[s]>High[s-1]&&High[s]>High[s-2]&&High[s]>High[s+1]&&High[s]>High[s+2]);return(b||t)?90:0;}
void CalcPrediction(double brain,double nb,int cp,double mai,int mts,double rsc,bool bf,double mw){
   string ms=DetectMyStrategy();bool sA=(ms!="WAIT");
   if(sA&&g_strategyType=="TRAP"){
      if(ms=="PUT"){g_gProb=12.0;g_rProb=88.0;g_pAction="PUT TRAP!";g_pColor=NEON_PURPLE;g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}
      if(ms=="CALL"){g_gProb=88.0;g_rProb=12.0;g_pAction="CALL TRAP!";g_pColor=NEON_PURPLE;g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}}
   double tS=UltimateTrapScore();bool bF2=IsBrokerForce();
   if(TRADE_MODE=="HUNT"){if(tS<85){g_gProb=50;g_rProb=50;g_pAction="HUNT: WAIT";g_pColor=NEON_YELLOW;g_calc_gProb=50;g_calc_rProb=50;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}}
   if(ENABLE_BROKER_KILLER&&(tS>=85||(tS>=75&&bF2))&&g_marketMode!="TREND"){g_gProb=15;g_rProb=85;g_pAction="TRAP DETECTED";g_pColor=NEON_PURPLE;g_calc_gProb=15;g_calc_rProb=85;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}
   double gS=0,rS=0,ab=MathMax(0.70,MathMin(1.30,g_accuracy/65.0));
   if(IsSidewaysMarket()){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
      bool nR=(g_nearest_res>0&&(g_nearest_res-Close[0])<8*pip),nS=(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<8*pip);
      if(!nR&&!nS){g_gProb=50;g_rProb=50;g_pAction="SIDEWAYS";g_pColor=NEON_YELLOW;g_calc_gProb=50;g_calc_rProb=50;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;return;}
      if(nR)rS+=20;if(nS)gS+=20;}
   if(sA&&g_strategyType=="TREND"){double sw=50.0;if(ms=="CALL"){gS+=sw*ab;g_pAction="TREND: CALL!";g_pColor=NEON_GREEN;}else if(ms=="PUT"){rS+=sw*ab;g_pAction="TREND: PUT!";g_pColor=NEON_RED;}}
   if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")gS+=60;
   else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")rS+=60;
   else if(g_haM1=="HA BULLISH 1")gS+=30;else if(g_haM1=="HA BEARISH 1")rS+=30;
   if(HA_ALIGN_FILTER&&g_haBoth=="MIXED"){gS*=0.5;rS*=0.5;}
   gS+=(nb-50)/50.0*22*ab;rS-=(nb-50)/50.0*22*ab;
   double bn=MathMax(-1.0,MathMin(1.0,brain/10.0));gS+=bn*15*ab;rS-=bn*15*ab;
   bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
   if(g_nearest_res>0&&(g_nearest_res-Close[0])<10*pip)rS+=12;
   if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<10*pip)gS+=12;
   double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi1>70)rS+=6;if(rsi1<30)gS+=6;
   double sn=MathMax(-1.0,MathMin(1.0,rsc/3.0));gS+=sn*8*ab;rS-=sn*8*ab;
   double wRS=GetWickRejectSignal();gS+=(wRS>0?wRS:0);rS+=(wRS<0?MathAbs(wRS):0);
   double cPS=GetCommonPointSignal();gS+=(cPS>0?cPS:0);rS+=(cPS<0?MathAbs(cPS):0);
   // BB Pullback signal contribution
   if(ENABLE_BB_PULLBACK){if(g_bbSignal=="CALL")gS+=18*ab;else if(g_bbSignal=="PUT")rS+=18*ab;}
   int rd=DetectRSIDivergence();if(rd==1)gS+=20;if(rd==-1)rS+=20;
   int cp2=DetectClassicPatterns();if(cp2==1)gS+=12;if(cp2==-1)rS+=12;
   int qm=DetectQMR();if(qm==1)gS+=25;if(qm==-1)rS+=25;
   int sk=StreakReversalSignal();if(sk==1)gS+=18;if(sk==-1)rS+=18;
   double adxV=GetADXStrength();int adxD=GetADXDirection();if(adxV>25){if(adxD==1)gS+=12;if(adxD==-1)rS+=12;}if(adxV<15){gS*=0.7;rS*=0.7;}
   int vs=SmartVolumeSignal();if(vs==1)gS+=12;if(vs==-1)rS+=12;
   if(!IsVolatilityGood()){gS*=0.5;rS*=0.5;}
   double diff=MathMax(-100.0,MathMin(100.0,gS-rS));
   g_gProb=MathMax(8.0,MathMin(92.0,50.0+(diff/1.8)));g_rProb=100.0-g_gProb;
   if(sA&&g_strategyType=="TREND"){
      if(ms=="CALL"){g_gProb=MathMax(g_gProb,85.0);g_rProb=100.0-g_gProb;}
      if(ms=="PUT"){g_rProb=MathMax(g_rProb,85.0);g_gProb=100.0-g_rProb;}
      g_gProb=MathMin(92.0,MathMax(8.0,g_gProb));g_rProb=100.0-g_gProb;}
   double dom=MathMax(g_gProb,g_rProb);
   if(dom>=82){if(g_gProb>g_rProb){if(!sA){g_pAction="GREEN";g_pColor=NEON_GREEN;}}else{if(!sA){g_pAction="RED";g_pColor=NEON_RED;}}}
   else if(dom>=75){if(g_gProb>g_rProb){if(!sA){g_pAction="GREEN";g_pColor=NEON_CYAN;}}else{if(!sA){g_pAction="RED";g_pColor=NEON_ORANGE;}}}
   else{if(!sA){g_pAction="WAIT";g_pColor=NEON_YELLOW;}}
   g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;
}
void DetectCommonPoints(){
   if(!SHOW_COMMON_POINTS){g_commonCount=0;return;}
   if(Time[0]==g_lastCommonScan)return;g_lastCommonScan=Time[0];g_commonCount=0;
   datetime nowBar=Time[0];int periodSec=PeriodSeconds(PERIOD_M1);
   double m5h=iHigh(NULL,PERIOD_M5,iHighest(NULL,PERIOD_M5,MODE_HIGH,10,1));
   double m5l=iLow(NULL,PERIOD_M5,iLowest(NULL,PERIOD_M5,MODE_LOW,10,1));
   if(m5l>0&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=m5l;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="CALL";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
   if(g_hrn_price>0&&g_hrn_is_sup&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=g_hrn_price;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="CALL";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
   if(m5h>0&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=m5h;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="PUT";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
   if(g_hrn_price>0&&!g_hrn_is_sup&&g_commonCount<MAX_COMMON_PTS){g_commonPrice[g_commonCount]=g_hrn_price;g_commonTime[g_commonCount]=nowBar;g_commonType[g_commonCount]="PUT";g_commonExpire[g_commonCount]=nowBar+periodSec*120;g_commonCount++;}
   for(int i=g_commonCount-1;i>=0;i--)if(TimeCurrent()>g_commonExpire[i]){for(int j=i;j<g_commonCount-1;j++){g_commonPrice[j]=g_commonPrice[j+1];g_commonTime[j]=g_commonTime[j+1];g_commonType[j]=g_commonType[j+1];g_commonExpire[j]=g_commonExpire[j+1];}g_commonCount--;}
}
void DrawCommonPoints(){
   for(int i=0;i<MAX_COMMON_PTS;i++){SafeDel(PFX+"COMMON_"+IntegerToString(i));SafeDel(PFX+"COMMON_L_"+IntegerToString(i));SafeDel(PFX+"COMMON_HL_"+IntegerToString(i));}
   if(!SHOW_COMMON_POINTS||g_commonCount==0)return;
   for(int i=0;i<g_commonCount;i++){if(TimeCurrent()>g_commonExpire[i])continue;if(IsLineNearby(g_commonPrice[i],8.0))continue;
      string id=PFX+"COMMON_"+IntegerToString(i),idL=PFX+"COMMON_L_"+IntegerToString(i),idH=PFX+"COMMON_HL_"+IntegerToString(i);color zc=DARK_BLUE_NEON;
      ObjectCreate(0,idH,OBJ_HLINE,0,0,g_commonPrice[i]);ObjectSetInteger(0,idH,OBJPROP_COLOR,zc);ObjectSetInteger(0,idH,OBJPROP_WIDTH,3);ObjectSetInteger(0,idH,OBJPROP_STYLE,STYLE_SOLID);ObjectSetInteger(0,idH,OBJPROP_BACK,false);
      ObjectCreate(0,id,OBJ_TEXT,0,Time[0],g_commonPrice[i]);ObjectSetText(id,"*",16,"Arial",zc);ObjectSetInteger(0,id,OBJPROP_BACK,false);
      string lbl=(g_commonType[i]=="CALL")?"^ CALL ZONE":"v PUT ZONE";
      ObjectCreate(0,idL,OBJ_TEXT,0,Time[0]+PeriodSeconds(PERIOD_M1)*3,g_commonPrice[i]);ObjectSetText(idL,lbl,10,"Arial Bold",zc);ObjectSetInteger(0,idL,OBJPROP_BACK,false);}
}
void DetectWickRejections(){
   g_isSideways=IsSidewaysMarket();if(!SHOW_WICK_REJECT_LINES){g_wickLineCount=0;return;}
   if(Time[0]==g_lastWickScan)return;g_lastWickScan=Time[0];
   bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double zone=WICK_ZONE_PIPS*pip*2;double cur=Close[0];
   g_wickLineCount=0;datetime now=Time[0],expT=now+PeriodSeconds(PERIOD_M1)*WICK_EXPIRE_BARS*2;
   for(int i=1;i<=40&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
      double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];double rl=0;bool fd=false;
      if(uw>rg*0.30){rl=High[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
      if(lw>rg*0.30){rl=Low[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
      if(!fd)continue;bool ex=false;
      for(int j=0;j<g_wickLineCount;j++)if(MathAbs(g_wickLinePrice[j]-rl)<zone){g_wickLineTouches[j]++;ex=true;break;}
      if(!ex&&g_wickLineCount<MAX_WICK_LINES){g_wickLinePrice[g_wickLineCount]=rl;g_wickLineTouches[g_wickLineCount]=1;g_wickLineExpire[g_wickLineCount]=expT;g_wickLineCount++;}}
   for(int i=g_wickLineCount-1;i>=0;i--)if(TimeCurrent()>g_wickLineExpire[i]){for(int j=i;j<g_wickLineCount-1;j++){g_wickLinePrice[j]=g_wickLinePrice[j+1];g_wickLineTouches[j]=g_wickLineTouches[j+1];g_wickLineExpire[j]=g_wickLineExpire[j+1];}g_wickLineCount--;}
}
void DrawWickRejectLines(){
   for(int i=0;i<MAX_WICK_LINES;i++){SafeDel(PFX+"WICK_"+IntegerToString(i));SafeDel(PFX+"WICK_L_"+IntegerToString(i));}
   if(!SHOW_WICK_REJECT_LINES||!g_isSideways)return;
   bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
   for(int i=0;i<g_wickLineCount;i++){if(TimeCurrent()>g_wickLineExpire[i])continue;if(MathAbs(cur-g_wickLinePrice[i])/pip>20.0)continue;if(IsLineNearby(g_wickLinePrice[i],5.0))continue;
      string id=PFX+"WICK_"+IntegerToString(i),idL=PFX+"WICK_L_"+IntegerToString(i);color lc=C'0,180,255';
      ObjectCreate(0,id,OBJ_HLINE,0,0,g_wickLinePrice[i]);ObjectSetInteger(0,id,OBJPROP_COLOR,lc);ObjectSetInteger(0,id,OBJPROP_WIDTH,2);ObjectSetInteger(0,id,OBJPROP_STYLE,STYLE_DOT);ObjectSetInteger(0,id,OBJPROP_BACK,false);
      string lbl="W"+IntegerToString(g_wickLineTouches[i])+"x";
      ObjectCreate(0,idL,OBJ_TEXT,0,Time[0]+PeriodSeconds(PERIOD_M1)*2,g_wickLinePrice[i]);ObjectSetText(idL,lbl,9,"Arial Bold",lc);ObjectSetInteger(0,idL,OBJPROP_BACK,false);}
}
double GetWickRejectSignal(){if(!g_isSideways||g_wickLineCount==0)return 0;double sc=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
   for(int i=0;i<g_wickLineCount;i++){double d=MathAbs(Close[0]-g_wickLinePrice[i])/pip;bool iS=(g_wickLinePrice[i]<Close[0]);
      if(d<5){if(iS)sc+=15*g_wickLineTouches[i];else sc-=15*g_wickLineTouches[i];}else if(d<10){if(iS)sc+=8*g_wickLineTouches[i];else sc-=8*g_wickLineTouches[i];}}return MathMax(-40,MathMin(40,sc));}
double GetCommonPointSignal(){if(g_commonCount==0)return 0;double sc=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
   for(int i=0;i<g_commonCount;i++){if(TimeCurrent()>g_commonExpire[i])continue;double d=MathAbs(Close[0]-g_commonPrice[i])/pip;if(d<8){if(g_commonType[i]=="CALL")sc+=25;else sc-=25;}}return MathMax(-30,MathMin(30,sc));}
void DetectHiddenLevels(){g_htfLevelCount=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double curP=Close[0];
   double rU=MathCeil(curP/(10*pip))*(10*pip),rD=MathFloor(curP/(10*pip))*(10*pip);
   if(MathAbs(curP-rU)/pip<=15)AddLevel(rU,"ROUND","RESISTANCE",TimeCurrent(),8,true);
   if(MathAbs(curP-rD)/pip<=15)AddLevel(rD,"ROUND","SUPPORT",TimeCurrent(),8,true);
   DetectHTFLevels(PERIOD_M5,"M5",3,pip);DetectHTFLevels(PERIOD_M15,"M15",5,pip);DetectHTFLevels(PERIOD_M30,"M30",7,pip);DetectHTFLevels(PERIOD_H1,"H1",9,pip);
   SortLevelsByStrength();}
void DetectHTFLevels(ENUM_TIMEFRAMES tf,string tfN,int bS,double pip){
   int bars=MathMin(50,iBars(NULL,tf));if(bars<10)return;double curP=Close[0];
   for(int i=2;i<bars-2;i++){
      if(IsSwingHigh(tf,i,2)){double d=MathAbs(curP-iHigh(NULL,tf,i))/pip;if(d<=20)AddLevel(iHigh(NULL,tf,i),tfN,"RESISTANCE",iTime(NULL,tf,i),bS+(20-(int)d)/2,false);}
      if(IsSwingLow(tf,i,2)){double d=MathAbs(curP-iLow(NULL,tf,i))/pip;if(d<=20)AddLevel(iLow(NULL,tf,i),tfN,"SUPPORT",iTime(NULL,tf,i),bS+(20-(int)d)/2,false);}}}
bool IsSwingHigh(ENUM_TIMEFRAMES tf,int p,int lb){
   double h=iHigh(NULL,tf,p);
   for(int i=1;i<=lb;i++){if(p-i<0||p+i>=iBars(NULL,tf))return false;if(iHigh(NULL,tf,p-i)>=h||iHigh(NULL,tf,p+i)>=h)return false;}
   return true;}
bool IsSwingLow(ENUM_TIMEFRAMES tf,int p,int lb){
   double l=iLow(NULL,tf,p);
   for(int i=1;i<=lb;i++){if(p-i<0||p+i>=iBars(NULL,tf))return false;if(iLow(NULL,tf,p-i)<=l||iLow(NULL,tf,p+i)<=l)return false;}
   return true;}
void AddLevel(double price,string tf,string type,datetime time,int strength,bool isRound){
   if(g_htfLevelCount>=50)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
   for(int i=0;i<g_htfLevelCount;i++)if(MathAbs(g_htfLevels[i].price-price)/pip<5)return;
   g_htfLevels[g_htfLevelCount].price=price;g_htfLevels[g_htfLevelCount].timeframe=tf;g_htfLevels[g_htfLevelCount].type=type;g_htfLevels[g_htfLevelCount].time=time;g_htfLevels[g_htfLevelCount].strength=strength;g_htfLevels[g_htfLevelCount].isRoundNumber=isRound;g_htfLevelCount++;}
void SortLevelsByStrength(){
   for(int i=0;i<g_htfLevelCount-1;i++)for(int j=0;j<g_htfLevelCount-i-1;j++)if(g_htfLevels[j].strength<g_htfLevels[j+1].strength){HTFLevel tmp=g_htfLevels[j];g_htfLevels[j]=g_htfLevels[j+1];g_htfLevels[j+1]=tmp;}}
void DrawHiddenLevels(){
   for(int i=0;i<50;i++){SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i));SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i)+"_LBL");}
   int dc=MathMin(10,g_htfLevelCount);int drawn=0;
   for(int i=0;i<dc&&drawn<5;i++){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;if(MathAbs(Close[0]-g_htfLevels[i].price)/pip>30)continue;if(IsLineNearby(g_htfLevels[i].price,5.0))continue;
      string nm=PFX+"HTF_LEVEL_"+IntegerToString(drawn);color lc=g_htfLevels[i].isRoundNumber?NEON_PURPLE:(StringFind(g_htfLevels[i].type,"SUPPORT")>=0?NEON_GREEN:NEON_RED);
      ObjectCreate(0,nm,OBJ_HLINE,0,0,g_htfLevels[i].price);ObjectSetInteger(0,nm,OBJPROP_COLOR,lc);ObjectSetInteger(0,nm,OBJPROP_WIDTH,1);ObjectSetInteger(0,nm,OBJPROP_STYLE,STYLE_DOT);ObjectSetInteger(0,nm,OBJPROP_BACK,false);
      string ln=nm+"_LBL";ObjectCreate(0,ln,OBJ_TEXT,0,Time[0],g_htfLevels[i].price);ObjectSetText(ln,StringFormat("%s %s S:%d",g_htfLevels[i].timeframe,g_htfLevels[i].type,g_htfLevels[i].strength),9,"Arial",lc);drawn++;}}
string DetectSuddenReversal(){if(Close[1]<Open[1]&&Close[0]>Open[0]){if(iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,0)<30)return "BULL REVERSAL";}if(Close[1]>Open[1]&&Close[0]<Open[0]){if(iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,0)>70)return "BEAR REVERSAL";}return "";}
void SafeDel(string id){if(ObjectFind(0,id)>=0)ObjectDelete(0,id);}
void DrawHLine(string id,double price,color clr,int width,int style){if(price<=0)return;SafeDel(id);ObjectCreate(0,id,OBJ_HLINE,0,0,price);ObjectSetInteger(0,id,OBJPROP_COLOR,clr);ObjectSetInteger(0,id,OBJPROP_WIDTH,width);ObjectSetInteger(0,id,OBJPROP_STYLE,style);ObjectSetInteger(0,id,OBJPROP_BACK,false);}
void HideSPM(){
   for(int i=ObjectsTotal()-1;i>=0;i--){
      string nm=ObjectName(i);
      if(StringFind(nm,PFX)==0) continue;  // Our objects - skip
      if(StringFind(nm,PFX+"candle_timer")>=0) continue;  // Timer - keep
      int tp=(int)ObjectGetInteger(0,nm,OBJPROP_TYPE);
      if(tp==OBJ_LABEL||tp==OBJ_RECTANGLE_LABEL||tp==OBJ_TEXT) ObjectDelete(0,nm);
   }
}
void NuclearDeleteAll(){
   for(int i=ObjectsTotal()-1;i>=0;i--){
      string nm=ObjectName(i);
      if(StringFind(nm,PFX+"candle_timer")>=0) continue; // Keep timer
      int tp=(int)ObjectGetInteger(0,nm,OBJPROP_TYPE);
      if(tp==OBJ_HLINE||tp==OBJ_LABEL||tp==OBJ_RECTANGLE_LABEL||tp==OBJ_TEXT)
         ObjectDelete(0,nm);
   }
}
void DelDashboard(){
   for(int i=ObjectsTotal()-1;i>=0;i--){
      string nm=ObjectName(i);
      if(StringFind(nm,PFX)!=0)       continue;
      if(StringFind(nm,"HRN_LINE")>=0) continue;
      if(StringFind(nm,"HRN_LBL")>=0)  continue;
      if(StringFind(nm,"candle_timer")>=0) continue;
      if(StringFind(nm,"HTF_LEVEL")>=0) continue;
      if(StringFind(nm,"COMMON_")>=0)  continue;
      if(StringFind(nm,"WICK_")>=0)    continue;
      if(StringFind(nm,"BB_")>=0)      continue;
      ObjectDelete(nm);
   }
}
void LoadMLWeights(){
   if(!ML_ADAPTIVE)return;g_symbolKey=Symbol();string fn="ML_weights_"+g_symbolKey+".dat";
   int h=FileOpen(fn,FILE_READ|FILE_TXT);if(h!=INVALID_HANDLE){string d=FileReadString(h);FileClose(h);g_brokerBias=StringToDouble(d);if(g_brokerBias<-0.5)g_brokerBias=-0.5;if(g_brokerBias>0.5)g_brokerBias=0.5;}else g_brokerBias=0.0;}
void SaveMLWeights(){
   if(!ML_ADAPTIVE)return;string fn="ML_weights_"+g_symbolKey+".dat";
   int h=FileOpen(fn,FILE_WRITE|FILE_TXT);if(h!=INVALID_HANDLE){FileWriteString(h,DoubleToString(g_brokerBias,6));FileClose(h);}}
void UpdateMLWeights(bool win){
   if(!ML_ADAPTIVE)return;double lr=0.02;if(win)g_brokerBias+=lr*(g_frozen_gProb/100.0);else g_brokerBias-=lr*(g_frozen_rProb/100.0);
   if(g_brokerBias>0.5)g_brokerBias=0.5;if(g_brokerBias<-0.5)g_brokerBias=-0.5;SaveMLWeights();}
void UpdateAccuracy(){if(Bars<5||Time[0]==g_acc_lastBar)return;g_acc_lastBar=Time[0];
   if(g_lastPredBar==Time[1]&&MathAbs(g_lastPredGreen-50.0)>10.0){bool aG=(Close[1]>Open[1]),pG=(g_lastPredGreen>50.0),win=(aG==pG);
      if(win){g_acc_correct++;g_lossStreak=0;}else g_lossStreak++;g_acc_total++;
      if(g_acc_total>0)g_accuracy=MathMax(40.0,MathMin(90.0,(double)g_acc_correct/g_acc_total*100.0));
      if(ML_ADAPTIVE&&g_lastPredGreen>50.0&&g_lastPredGreen<100.0)UpdateMLWeights(win);}
   g_lastPredGreen=g_frozen_gProb;g_lastPredBar=Time[0];}
double ValidateHistoricalAccuracy(){if(Bars<55)return 65.0;int cr=0,tt=0;for(int i=10;i<=50&&i+1<Bars;i++){int gc=0;for(int j=i+1;j<=i+5&&j<Bars;j++)if(Close[j]>Open[j])gc++;double pG=(gc>2)?65.0:35.0;bool aG=(Close[i]>Open[i]);if((pG>55&&aG)||(pG<45&&!aG))cr++;tt++;}return tt>0?(double)cr/tt*100.0:65.0;}
void UpdateWeights(){double lr=0.01;if(g_lastPredBar==Time[1]){bool c=((Close[1]>Open[1])==(g_lastPredGreen>50));if(c){NW[32]+=lr;NW[33]-=lr;}else{NW[32]-=lr;NW[33]+=lr;}NW[32]=MathMax(0.5,MathMin(2.0,NW[32]));NW[33]=MathMin(-0.5,MathMax(-2.0,NW[33]));}}
string DetectMarketMode(double brain,double rsc,int cp,double nb){double atr=iATR(NULL,PERIOD_M1,14,1),avgR=(High[1]-Low[1]+High[2]-Low[2]+High[3]-Low[3])/3.0;bool hV=(avgR>0&&atr/avgR>1.3);if(MathAbs(brain)>=3.5&&MathAbs(rsc)>=1.5&&hV)return "TREND";if(cp>=70||cp<=30)return "REVERSAL";if(nb>=70||nb<=30)return "TREND";return "RANGE";}
bool IsSidewaysMarket(){if(Bars<30)return false;double adx=GetADXStrength();if(adx<25)return true;double h20=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,20,1)],l20=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,20,1)];double r20=h20-l20;double atr=iATR(NULL,PERIOD_M1,14,1);if(atr>0&&r20<atr*8)return true;return false;}
bool IsVolatilityGood(){if(Bars<100)return true;double dh=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,60,0)],dl=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,60,0)];double tr=dh-dl;double ac=0;for(int i=1;i<=20;i++)ac+=(High[i]-Low[i]);ac/=20.0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double mr=jpy?0.30:0.0030;if(tr<mr)return false;if(ac>0&&(High[0]-Low[0])<ac*0.3)return false;return true;}
int DetectRSIDivergence(){if(Bars<30)return 0;double rN=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),rP=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,8);double lN=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],lPv=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];if(lN<lPv&&rN>rP&&rN<40)return 1;double hN=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hPv=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];if(hN>hPv&&rN<rP&&rN>60)return -1;return 0;}
int StreakReversalSignal(){if(Bars<15)return 0;int g=0,r=0;for(int i=1;i<Bars;i++){if(Close[i]>Open[i]){if(r>0)break;g++;}else if(Close[i]<Open[i]){if(g>0)break;r++;}else break;}if(g>=4)return -1;if(r>=4)return 1;return 0;}
double GetADXStrength(){if(Bars<20)return 0;return iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);}
int GetADXDirection(){if(Bars<20)return 0;double p=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_PLUSDI,1),m=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MINUSDI,1);if(p>m+5)return 1;if(m>p+5)return -1;return 0;}
int SmartVolumeSignal(){if(Bars<15)return 0;double v1=(double)iVolume(NULL,PERIOD_M1,1),avg=0;for(int i=2;i<=10;i++)avg+=iVolume(NULL,PERIOD_M1,i);avg/=9.0;if(avg==0)return 0;double vr=v1/avg;if(vr<1.8)return 0;bool g=(Close[1]>Open[1]);if(vr>2.5&&g)return 1;if(vr>2.5&&!g)return -1;if(vr>3.0&&g&&High[1]-Close[1]>Close[1]-Low[1])return -1;if(vr>3.0&&!g&&Close[1]-Low[1]>High[1]-Close[1])return 1;return 0;}
int DetectClassicPatterns(){if(Bars<30)return 0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double tol=PATTERN_TOLERANCE_PIPS*pip;double sh[2],sl[2];int shB[2],slB[2];int shC=0,slC=0;
   for(int i=2;i<25&&(shC<2||slC<2);i++){if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){if(shC<2){sh[shC]=High[i];shB[shC]=i;shC++;}}if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){if(slC<2){sl[slC]=Low[i];slB[slC]=i;slC++;}}}
   if(shC>=2){int bd=MathAbs(shB[0]-shB[1]);if(bd>=MIN_PATTERN_SEPARATION&&MathAbs(sh[0]-sh[1])<=tol){int bn=MathMin(shB[0],shB[1]),bx=MathMax(shB[0],shB[1]);double vl=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,bx-bn+1,bn)];if(Close[0]<vl)return -1;}}
   if(slC>=2){int bd=MathAbs(slB[0]-slB[1]);if(bd>=MIN_PATTERN_SEPARATION&&MathAbs(sl[0]-sl[1])<=tol){int bn=MathMin(slB[0],slB[1]),bx=MathMax(slB[0],slB[1]);double ph=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,bx-bn+1,bn)];if(Close[0]>ph)return 1;}}return 0;}
int DetectQMR(){if(Bars<40)return 0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double sH[10],sL[10];int sHB[10],sLB[10];int hC=0,lC=0;
   for(int i=3;i<40&&hC<10;i++)if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){sH[hC]=High[i];sHB[hC]=i;hC++;}
   for(int i=3;i<40&&lC<10;i++)if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){sL[lC]=Low[i];sLB[lC]=i;lC++;}
   if(hC<2||lC<2)return 0;
   for(int iA=0;iA<hC;iA++)for(int iC2=0;iC2<hC;iC2++){if(iA==iC2||sHB[iA]<=sHB[iC2]||sH[iC2]>=sH[iA]-10*pip)continue;
      for(int iB=0;iB<lC;iB++){if(sHB[iA]<=sLB[iB]||sLB[iB]<=sHB[iC2])continue;
         for(int iD=0;iD<lC;iD++){if(iB==iD||sHB[iC2]<=sLB[iD]||sL[iD]>=sL[iB])continue;
            bool m3=false;if(Bars>=8){double o1=Open[3],c1=Close[3],o2=Open[0],c2=Close[0];double b1=MathAbs(c1-o1);if(c2>o2&&c1<o1&&MathAbs(c2-o2)>b1*0.5)m3=true;}
            bool m5=false;if(iBars(NULL,PERIOD_M5)>=3){double o1=iOpen(NULL,PERIOD_M5,2),c1=iClose(NULL,PERIOD_M5,2),o2=iOpen(NULL,PERIOD_M5,1),c2=iClose(NULL,PERIOD_M5,1);double b1=MathAbs(c1-o1);if(c2>o2&&c1<o1&&MathAbs(c2-o2)>b1*0.5)m5=true;}
            if((m3||m5)&&Close[0]>sL[iD]&&Close[0]<sH[iC2]){qmrA=sH[iA];qmrB=sL[iB];qmrC=sH[iC2];qmrD=sL[iD];qmrActive=true;qmrExpire=TimeCurrent()+900;return 1;}}}}
   for(int iA=0;iA<lC;iA++)for(int iC2=0;iC2<lC;iC2++){if(iA==iC2||sLB[iA]<=sLB[iC2]||sL[iC2]<=sL[iA]+10*pip)continue;
      for(int iB=0;iB<hC;iB++){if(sLB[iA]<=sHB[iB]||sHB[iB]<=sLB[iC2])continue;
         for(int iD=0;iD<hC;iD++){if(iB==iD||sLB[iC2]<=sHB[iD]||sH[iD]>=sH[iB])continue;
            bool m3=false;if(Bars>=8){double o1=Open[3],c1=Close[3],o2=Open[0],c2=Close[0];double b1=MathAbs(c1-o1);if(c2<o2&&c1>o1&&MathAbs(c2-o2)>b1*0.5)m3=true;}
            bool m5=false;if(iBars(NULL,PERIOD_M5)>=3){double o1=iOpen(NULL,PERIOD_M5,2),c1=iClose(NULL,PERIOD_M5,2),o2=iOpen(NULL,PERIOD_M5,1),c2=iClose(NULL,PERIOD_M5,1);double b1=MathAbs(c1-o1);if(c2<o2&&c1>o1&&MathAbs(c2-o2)>b1*0.5)m5=true;}
            if((m3||m5)&&Close[0]<sH[iD]&&Close[0]>sL[iC2]){qmrA=sL[iA];qmrB=sH[iB];qmrC=sL[iC2];qmrD=sH[iD];qmrActive=true;qmrExpire=TimeCurrent()+900;return -1;}}}}
   return 0;}
void AddRNLevel(double &arr[],int &cnt,double lv){if(cnt>=100)return;for(int i=0;i<cnt;i++)if(MathAbs(arr[i]-lv)<0.000001)return;arr[cnt]=lv;cnt++;}
double ScoreRoundNumber(double level,double pip){
   double score=0,tol=3*pip;int touches=0,ru=0,rd=0;
   for(int i=1;i<=LOOKBACK&&i<Bars;i++){double h=High[i],l=Low[i],c=Close[i],o=Open[i];
      if(h>=level-tol&&l<=level+tol){touches++;
         if(l<=level+tol&&c>level+tol){ru++;double bdy=MathMin(o,c),lw=bdy-l,rng=h-l;if(rng>0&&lw>rng*0.5)score+=5;}
         if(h>=level-tol&&c<level-tol){rd++;double bdyH=MathMax(o,c),uw=h-bdyH,rng=h-l;if(rng>0&&uw>rng*0.5)score+=5;}}}
   score+=touches*3;score+=ru*8+rd*8;
   if(touches>=4)score+=15;else if(touches>=3)score+=10;else if(touches>=2)score+=5;
   return score;}
double FindBestHiddenRoundNumber(double curPrice){
   bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;int dg=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg<=0)dg=5;
   double levels[];int levelCount=0;ArrayResize(levels,100);
   double b100=MathFloor(curPrice/(100*pip))*(100*pip);for(int i=-1;i<=2;i++)AddRNLevel(levels,levelCount,b100+i*100*pip);
   double b50=MathFloor(curPrice/(50*pip))*(50*pip);for(int i=-2;i<=3;i++)AddRNLevel(levels,levelCount,b50+i*50*pip);
   double b25=MathFloor(curPrice/(25*pip))*(25*pip);for(int i=-3;i<=4;i++)AddRNLevel(levels,levelCount,b25+i*25*pip);
   double b10=MathFloor(curPrice/(10*pip))*(10*pip);for(int i=-5;i<=6;i++)AddRNLevel(levels,levelCount,b10+i*10*pip);
   double b5=MathFloor(curPrice/(5*pip))*(5*pip);for(int i=-4;i<=5;i++)AddRNLevel(levels,levelCount,b5+i*5*pip);
   double bestLevel=0,bestScore=-1;
   for(int i=0;i<levelCount;i++){double lv=levels[i],dist=MathAbs(curPrice-lv)/pip;if(dist>60)continue;double dp=(dist>40)?20:(dist>30)?10:(dist>20)?5:0;double sc=ScoreRoundNumber(lv,pip)-dp;if(sc<5)continue;if(sc>bestScore){bestScore=sc;bestLevel=lv;}}
   if(bestLevel==0){double n100=MathRound(curPrice/(100*pip))*(100*pip),n50=MathRound(curPrice/(50*pip))*(50*pip),n25=MathRound(curPrice/(25*pip))*(25*pip),n10=MathRound(curPrice/(10*pip))*(10*pip),n5=MathRound(curPrice/(5*pip))*(5*pip);
      double d100=MathAbs(curPrice-n100),d50=MathAbs(curPrice-n50),d25=MathAbs(curPrice-n25),d10=MathAbs(curPrice-n10);
      if(d100<30*pip)bestLevel=n100;else if(d50<20*pip)bestLevel=n50;else if(d25<15*pip)bestLevel=n25;else if(d10<10*pip)bestLevel=n10;else bestLevel=n5;}
   g_hrn_score=bestScore;return NormalizeDouble(bestLevel,dg);}
void ScanHRNLevels(){g_rj_cnt=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
   for(int i=1;i<=LOOKBACK&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];
      if(uw>rg*0.35){double lv=High[i];if(MathAbs(lv-cur)<=40*pip){bool f=false;for(int k=0;k<g_rj_cnt;k++)if(MathAbs(g_rj[k].price-lv)<8*pip){g_rj[k].touches++;f=true;break;}if(!f&&g_rj_cnt<MAX_REJ){g_rj[g_rj_cnt].price=lv;g_rj[g_rj_cnt].touches=1;g_rj_cnt++;}}}
      if(lw>rg*0.35){double lv=Low[i];if(MathAbs(lv-cur)<=40*pip){bool f=false;for(int k=0;k<g_rj_cnt;k++)if(MathAbs(g_rj[k].price-lv)<8*pip){g_rj[k].touches++;f=true;break;}if(!f&&g_rj_cnt<MAX_REJ){g_rj[g_rj_cnt].price=lv;g_rj[g_rj_cnt].touches=1;g_rj_cnt++;}}}}
   for(int i=0;i<g_rj_cnt-1;i++)for(int j=0;j<g_rj_cnt-i-1;j++)if(g_rj[j].touches<g_rj[j+1].touches){RejLevel tmp=g_rj[j];g_rj[j]=g_rj[j+1];g_rj[j+1]=tmp;}}
void UpdateHRN(){
   if(Bars<LOOKBACK+10)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;int dg=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg<=0)dg=5;
   if(Time[0]!=g_hrn_scan_bar){double nH=FindBestHiddenRoundNumber(Close[0]);if(g_hrn_price==0||MathAbs(nH-g_hrn_price)>2*pip){g_hrn_price=nH;g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}g_hrn_scan_bar=Time[0];}
   double tol=1*pip;
   if(g_hrn_is_sup){if(Bars>=3){bool c1b=(Close[1]<g_hrn_price-tol),c2b=(Close[2]<g_hrn_price-tol);if(c1b&&c2b){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}else if(c1b)g_hrn_brk_bars=1;else g_hrn_brk_bars=0;}}
   else{if(Bars>=3){bool c1a=(Close[1]>g_hrn_price+tol),c2a=(Close[2]>g_hrn_price+tol);if(c1a&&c2a){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}else if(c1a)g_hrn_brk_bars=1;else g_hrn_brk_bars=0;}}
   if(g_hrn_brk_bars>=HRN_CONFIRM_BARS){double nH=FindBestHiddenRoundNumber(Close[0]);if(MathAbs(nH-g_hrn_price)>3*pip){g_hrn_price=nH;g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}else{g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}}
   g_hrn_str=DoubleToString(NormalizeDouble(g_hrn_price,dg),dg);
   color hrnColor=g_hrn_is_sup?NEON_GREEN:NEON_RED;if(g_hrn_brk_bars==1)hrnColor=NEON_YELLOW;
   DrawHLine(PFX+"HRN_LINE",g_hrn_price,hrnColor,3,STYLE_SOLID);
   string ln=PFX+"HRN_LBL";SafeDel(ln);string typeStr=g_hrn_is_sup?"SUP":"RES";string confStr=(g_hrn_brk_bars==1)?" [1/2]":(g_hrn_confirmed_break?" [SHIFTING]":"");
   ObjectCreate(0,ln,OBJ_TEXT,0,Time[0]+Period()*60*2,g_hrn_price);ObjectSetText(ln,"HRN "+typeStr+" "+g_hrn_str+confStr,10,"Arial Bold",hrnColor);ObjectSetInteger(0,ln,OBJPROP_BACK,false);}
void AddRes(double lv){if(lv<=0)return;for(int i=0;i<resCount;i++)if(MathAbs(ResLevels[i]-lv)<10*Point)return;if(resCount>=MAX_LEVELS){for(int i=0;i<MAX_LEVELS-1;i++)ResLevels[i]=ResLevels[i+1];resCount=MAX_LEVELS-1;}ResLevels[resCount++]=lv;}
void AddSup(double lv){if(lv<=0)return;for(int i=0;i<supCount;i++)if(MathAbs(SupLevels[i]-lv)<10*Point)return;if(supCount>=MAX_LEVELS){for(int i=0;i<MAX_LEVELS-1;i++)SupLevels[i]=SupLevels[i+1];supCount=MAX_LEVELS-1;}SupLevels[supCount++]=lv;}
void DrawNearestSR(){
   // Remove ALL old SR lines from chart — NO shifting lines
   for(int i=0;i<20;i++){SafeDel(PFX+"RES_"+IntegerToString(i));SafeDel(PFX+"SUP_"+IntegerToString(i));}
   SafeDel(PFX+"NEAREST_RES");
   SafeDel(PFX+"NEAREST_SUP");
   // Only calculate values for dashboard — NO chart lines drawn
   double cur=Close[0]; g_nearest_res=0; g_nearest_sup=0;
   double mR=999999, mS=999999;
   for(int i=0;i<resCount;i++)
      if(ResLevels[i]>cur && (ResLevels[i]-cur)<mR){ mR=ResLevels[i]-cur; g_nearest_res=ResLevels[i]; }
   for(int i=0;i<supCount;i++)
      if(SupLevels[i]<cur && (cur-SupLevels[i])<mS){ mS=cur-SupLevels[i]; g_nearest_sup=SupLevels[i]; }
   // Values used only in dashboard S/R cube — chart pe koi line nahi
}
void CheckBRK(){double pC=Close[1],pO=Open[1];g_brk_str="NO BRK";g_brk_color=CGR;if(g_nearest_res>0&&pC>g_nearest_res&&pO<=g_nearest_res){g_brk_str="BRK UP!";g_brk_color=NEON_GREEN;}else if(g_nearest_sup>0&&pC<g_nearest_sup&&pO>=g_nearest_sup){g_brk_str="BRK DOWN!";g_brk_color=NEON_RED;}}
void UpdateSR(){
   // Only run once per new candle
   if(Time[0]==lastSRBar) return;
   lastSRBar=Time[0];
   if(Bars<15) return;
   
   bool jpy=(StringFind(Symbol(),"JPY")>=0);
   double pip=jpy?0.01:0.0001;
   double cur=Close[0];
   
   // Find swing highs/lows from last 10 bars as potential S/R
   // Use stronger candles (body > 40% of range)
   for(int i=2;i<=10;i++){
      double rng=High[i]-Low[i];
      double bd=MathAbs(Close[i]-Open[i]);
      if(rng<=0) continue;
      // Swing high candidate: higher than neighbors
      if(High[i]>High[i-1]&&High[i]>High[i+1]&&High[i]>cur+5*pip){
         AddRes(High[i]);
      }
      // Swing low candidate
      if(Low[i]<Low[i-1]&&Low[i]<Low[i+1]&&Low[i]<cur-5*pip){
         AddSup(Low[i]);
      }
   }
   
   // If arrays empty, add basic levels
   if(resCount<1){double nR=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,10,1)];if(nR>cur)AddRes(nR);}
   if(supCount<1){double nS=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,10,1)];if(nS<cur)AddSup(nS);}
   
   DrawNearestSR();
   CheckBRK();
}
void UpdateTimer(){
   if(!SHOW_TIMER) return;
   string nm = PFX+"candle_timer";
   int ps  = Period() * 60;
   int el  = (int)(TimeCurrent() - Time[0]);
   int rem = ps - el;
   if(rem <= 0) rem = ps;
   if(rem > ps) rem = ps;
   int mm = rem / 60, ss = rem % 60;
   string t = (mm > 0 ? IntegerToString(mm) + ":" : "") +
              (ss < 10 ? "0" : "") + IntegerToString(ss) + "s";
   
   // Chart pe candle ke right mein 8px offset
   // Time = current bar close time (Time[0] + period)
   // Price = High[0] ka thoda upar
   double atrVal = iATR(NULL, PERIOD_M1, 14, 0);
   double offset = (atrVal > 0) ? atrVal * 0.25 : Point * 30;
   
   // Candle ke TIME ke thoda baad place karo = right side mein dikhega
   datetime tPos = Time[0] + 8;  // 8 seconds = candle ke right mein
   double   pPos = High[0] + offset;
   
   if(ObjectFind(0, nm) < 0){
      ObjectCreate(0, nm, OBJ_TEXT, 0, tPos, pPos);
      ObjectSetInteger(0, nm, OBJPROP_BACK,       false);
      ObjectSetInteger(0, nm, OBJPROP_SELECTABLE, false);
      ObjectSetInteger(0, nm, OBJPROP_HIDDEN,     false);
   }
   ObjectSetInteger(0, nm, OBJPROP_TIME,  tPos);
   ObjectSetDouble (0, nm, OBJPROP_PRICE, pPos);
   ObjectSetText(nm, t, 11, "Arial Bold", NEON_YELLOW);
}
void InitNW(){NW[0]=0.852;NW[1]=0.724;NW[2]=0.913;NW[3]=0.681;NW[4]=0.795;NW[5]=0.836;NW[6]=0.772;NW[7]=0.894;NW[8]=0.623;NW[9]=0.748;NW[10]=0.887;NW[11]=0.716;NW[12]=0.661;NW[13]=0.829;NW[14]=0.753;NW[15]=0.942;NW[16]=0.784;NW[17]=0.697;NW[18]=0.871;NW[19]=0.735;NW[20]=0.813;NW[21]=0.768;NW[22]=0.932;NW[23]=0.674;NW[24]=0.845;NW[25]=0.709;NW[26]=0.888;NW[27]=0.651;NW[28]=0.921;NW[29]=0.743;NW[30]=0.802;NW[31]=0.867;NW[32]=1.24;NW[33]=-0.93;NW[34]=1.15;NW[35]=-1.08;}
void Bx(string id,int x,int y,int w,int h,color bg,color bd){string n=PFX+id;if(ObjectFind(0,n)<0)ObjectCreate(0,n,OBJ_RECTANGLE_LABEL,0,0,0);ObjectSetInteger(0,n,OBJPROP_XDISTANCE,x);ObjectSetInteger(0,n,OBJPROP_YDISTANCE,y);ObjectSetInteger(0,n,OBJPROP_XSIZE,w);ObjectSetInteger(0,n,OBJPROP_YSIZE,h);ObjectSetInteger(0,n,OBJPROP_BGCOLOR,bg);ObjectSetInteger(0,n,OBJPROP_BORDER_TYPE,BORDER_FLAT);ObjectSetInteger(0,n,OBJPROP_COLOR,bd);ObjectSetInteger(0,n,OBJPROP_BACK,false);}
void Tx(string id,int x,int y,string txt,color tc,int fs,bool bold){string n=PFX+id;if(ObjectFind(0,n)<0)ObjectCreate(0,n,OBJ_LABEL,0,0,0);ObjectSetInteger(0,n,OBJPROP_XDISTANCE,x);ObjectSetInteger(0,n,OBJPROP_YDISTANCE,y);ObjectSetText(n,txt,fs,bold?"Arial Bold":"Arial",tc);ObjectSetInteger(0,n,OBJPROP_BACK,false);}
void NeonBar(string id,int x,int y,int w,int h,double pct,color fc){Bx(id+"_bg",x,y,w,h,BG_DARK4,BG_DARK4);int fw=(int)(pct/100.0*w);if(fw<4)fw=4;if(fw>w)fw=w;Bx(id+"_f",x,y,fw,h,fc,fc);}
void Cube(string id,int x,int y,int w,int h,color bc,color bg,string lbl,color lc,string val,color vc,int vfs){Bx(id,x,y,w,h,bg,bc);if(StringLen(lbl)>0)Tx(id+"_l",x+10,y+6,lbl,lc,11,true);if(StringLen(val)>0)Tx(id+"_v",x+10,y+38,val,vc,vfs,true);}
void DrawOtherPairsCube(int x,int y,int w,int h){
   Bx("c20",x,y,w,h,BG_DARK2,NEON_GOLD);
   Tx("c20_l",x+8,y+4,"OTHER PAIRS",NEON_CYAN,10,true);
   if(g_pairCount==0){
      Tx("c20_v0",x+8,y+30,"No signals yet",CGR,10,false);
      Tx("c20_v1",x+8,y+52,"(need 2+ instances)",C'100,100,100',9,false);
      return;
   }
   // NO bars at all — only text lines, 20px per entry, no overlap possible
   int lY=24;
   for(int i=0;i<g_pairCount&&i<5;i++){
      if(lY+16 > h-4) break;
      string sp=g_pairNames[i];
      if(StringLen(sp)>9) sp=StringSubstr(sp,0,9);
      int qScore=(int)g_pairConfs[i];
      string qLabel;
      if(qScore>=80)      qLabel="[S]";
      else if(qScore>=65) qLabel="[G]";
      else if(qScore>=50) qLabel="[M]";
      else                qLabel="[W]";
      
      // Check if NCP signal matches this pair's signal
      bool ncpMatch = (ENABLE_MTG &&
                       (g_mtgState=="CALL"||g_mtgState=="PUT"||
                        g_mtgState=="CALL TRAP"||g_mtgState=="PUT TRAP") &&
                       g_pairSigs[i]==StringSubstr(g_mtgState,0,4)); // "CALL" or "PUT_"
      // More precise match check
      bool isCallSig = (g_mtgState=="CALL"||g_mtgState=="CALL TRAP");
      bool isPutSig  = (g_mtgState=="PUT" ||g_mtgState=="PUT TRAP");
      ncpMatch = ((isCallSig && g_pairSigs[i]=="CALL") ||
                  (isPutSig  && g_pairSigs[i]=="PUT"));
      
      // Color: purple if NCP matches, else normal green/red
      color dc;
      string prefix="";
      if(ncpMatch){
         dc = NEON_PURPLE;   // NCP condition matched = purple
         prefix = "* ";      // Star marker
      } else {
         dc = (g_pairSigs[i]=="CALL") ? NEON_GREEN : NEON_RED;
      }
      string txt=prefix+sp+" "+g_pairSigs[i]+" "+IntegerToString(qScore)+qLabel;
      Tx("c20_p"+IntegerToString(i),x+8,y+lY,txt,dc,10,true);
      lY+=20;
   }
}
void DrawOTCQuickCube(int x,int y,int w,int h){
   Bx("c_quick",x,y,w,h,BG_DARK2,NEON_LIME);Tx("c_quick_l",x+8,y+2,"OTC QUICK",NEON_CYAN,10,true);
   int age=(int)(TimeCurrent()-Time[0]);int ps=Period()*60;int rem=ps-age;if(rem<0)rem=0;
   int mm=rem/60,ss2=rem%60;string tl=(mm>0?IntegerToString(mm)+"m ":"")+IntegerToString(ss2)+"s";
   Tx("c_quick_t",x+8,y+20,"Time: "+tl,NEON_GOLD,11,true);
   double spread=MarketInfo(Symbol(),MODE_SPREAD);color spC=(spread<=BROKER_SPREAD_THRESHOLD)?NEON_GREEN:NEON_ORANGE;
   Tx("c_quick_s",x+8,y+38,"Spread: "+DoubleToString(spread,0),spC,10,true);
   // VOLUME FIX: Bar[1]=last closed candle vs Bar[2]=candle before it (1 candle comparison only)
   double volLast = (double)iVolume(NULL,PERIOD_M1,1);  // Last fully closed candle
   double volPrev = (double)iVolume(NULL,PERIOD_M1,2);  // Candle just before last
   double volRatio = (volPrev > 0) ? volLast / volPrev : 1.0;
   bool candleBull = (Close[1] > Open[1]);
   bool candleBear = (Close[1] < Open[1]);
   color vColor; string vText;
   if(candleBull){
      if(volRatio>=2.0){vColor=NEON_GREEN;vText="UP "+DoubleToString(volRatio,1)+"x HI";}
      else if(volRatio>=1.3){vColor=NEON_LIME;vText="UP "+DoubleToString(volRatio,1)+"x MD";}
      else if(volRatio>=0.8){vColor=NEON_CYAN;vText="UP "+DoubleToString(volRatio,1)+"x LO";}
      else{vColor=NEON_YELLOW;vText="UP "+DoubleToString(volRatio,1)+"x WK";}
   } else if(candleBear){
      if(volRatio>=2.0){vColor=NEON_RED;vText="DN "+DoubleToString(volRatio,1)+"x HI";}
      else if(volRatio>=1.3){vColor=NEON_ORANGE;vText="DN "+DoubleToString(volRatio,1)+"x MD";}
      else if(volRatio>=0.8){vColor=NEON_PINK;vText="DN "+DoubleToString(volRatio,1)+"x LO";}
      else{vColor=NEON_YELLOW;vText="DN "+DoubleToString(volRatio,1)+"x WK";}
   } else{vColor=NEON_YELLOW;vText="DOJI "+DoubleToString(volRatio,1)+"x";}
   Tx("c_quick_v",x+8,y+56,vText,vColor,11,true);
   string es=GetEntryStatus();color eC=GetEntryColor();Tx("c_quick_e",x+8,y+76,es,eC,10,true);}
string GetEntryStatus(){
   int age=(int)(TimeCurrent()-Time[0]);int ps=Period()*60;int rem=ps-age;if(rem<0)rem=0;string ms=DetectMyStrategy();
   if(ms!="WAIT"){string type=(g_strategyType=="TRAP")?"TRAP":"TREND";
      if(ENTRY_MODE=="FLAG"){if(age<FLAG_MIN_SEC)return type+" WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s";if(rem<MIN_REMAINING_SEC)return type+" EXPIRED";if(age>FLAG_MAX_SEC)return type+" LATE";return type+" OPEN "+IntegerToString(rem)+"s";}
      if(age<TIME_MIN_SEC)return type+" WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s";if(age>TIME_MAX_SEC)return type+" CLOSED";return type+" OPEN "+IntegerToString(age)+"s";}
   if(ENTRY_MODE=="FLAG"){if(age<FLAG_MIN_SEC)return "WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s";if(rem<MIN_REMAINING_SEC)return "EXPIRED";if(age>FLAG_MAX_SEC)return "LATE";return "OPEN "+IntegerToString(rem)+"s left";}
   if(age<TIME_MIN_SEC)return "WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s";if(age>TIME_MAX_SEC)return "CLOSED";return "OPEN "+IntegerToString(age)+"s";}
color GetEntryColor(){string s=GetEntryStatus();if(StringFind(s,"TRAP OPEN")>=0)return NEON_PURPLE;if(StringFind(s,"TREND OPEN")>=0)return NEON_LIME;if(StringFind(s,"OPEN")>=0)return NEON_GREEN;if(StringFind(s,"WAIT")>=0)return NEON_YELLOW;if(StringFind(s,"LATE")>=0||StringFind(s,"EXPIRED")>=0||StringFind(s,"CLOSED")>=0)return NEON_ORANGE;return NEON_RED;}
bool DirectionOK(){if(!ENABLE_ENTRY_ZONE)return true;double cur=Close[0],lo=Low[0],hi=High[0],rg=hi-lo;if(rg==0)return true;double pos=(cur-lo)/rg*100.0;if(MathMax(g_calc_gProb,g_calc_rProb)>=85)return true;string ms=DetectMyStrategy();if(ms=="CALL")return(pos>REVERSAL_PCT);if(ms=="PUT")return(pos<(100.0-REVERSAL_PCT));if(StringFind(g_adv1,"CALL")>=0)return(pos>REVERSAL_PCT&&(hi-cur)<rg*WICK_PCT);if(StringFind(g_adv1,"PUT")>=0)return(pos<(100.0-REVERSAL_PCT)&&(cur-lo)<rg*WICK_PCT);return true;}
bool EntryPrecisionOK(){if(TRADE_MODE=="GOD")return true;if(g_calc_gProb>80&&Close[0]<Open[0])return false;if(g_calc_rProb>80&&Close[0]>Open[0])return false;return true;}
bool ConsensusOK(){if(!CONSENSUS_FILTER)return true;string ms=DetectMyStrategy();if(ms=="WAIT")return true;bool haAgree=false;if(ms=="CALL"&&(g_haM1=="HA BULLISH 1"||g_haBoth=="BOTH BULL"))haAgree=true;if(ms=="PUT"&&(g_haM1=="HA BEARISH 1"||g_haBoth=="BOTH BEAR"))haAgree=true;return haAgree;}
void SendTelegramAlert(string message){
   if(!ENABLE_TELEGRAM)return;if(StringLen(TELEGRAM_TOKEN)<10||StringLen(TELEGRAM_CHAT_ID)<5)return;
   string url="https://api.telegram.org/bot"+TELEGRAM_TOKEN+"/sendMessage?chat_id="+TELEGRAM_CHAT_ID+"&text="+message;
   char post[];char result_data[];string result_headers;int timeout=5000;
   int res=WebRequest("GET",url,"",timeout,post,result_data,result_headers);
   if(res==-1)Print("Telegram failed: ",GetLastError());}

//+------------------------------------------------------------------+
// MAIN DRAW FUNCTION
//+------------------------------------------------------------------+
void Draw(){
   HideSPM(); DelDashboard();
   int W=DASH_W,G=8,CW=(W-2*G)/3,CH=110,cx=POS_X+G,yy=POS_Y;
   int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
   g_marketMode=DetectMarketMode(brain,g_rsc,cp,nb);
   if(StringLen(g_prevMode)>0&&g_prevMode!=g_marketMode){g_signalTime=0;g_finalSignal="WAIT";}
   g_prevMode=g_marketMode;
   CalcOTCCrowd();UpdateAccuracy();UpdateWeights();
   double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
   CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
   UpdateRiskControl();CheckMTFConfirmation();
   double tfaScore=CalcAdvancedTFA(g_tfa_detail);
   color ha1C=(g_haM1=="HA BULLISH 1")?NEON_GREEN:(g_haM1=="HA BEARISH 1")?NEON_RED:NEON_YELLOW;
   color ha5C=(g_haM5=="HA BULLISH 5")?NEON_GREEN:(g_haM5=="HA BEARISH 5")?NEON_RED:NEON_YELLOW;
   color biasClr;string biasStr=CalcAdvancedMarketBias(biasClr,brain,g_rsc);
   // Strategy cube: g_strategyType already set in CalcPrediction() via DetectMyStrategy()
   // Re-call se side-effects avoid karo — cached values use karo
   string strategyMS = g_finalSignal; // Use already computed final signal direction
   // But for strategy label, use g_strategyType and g_strategyReason directly
   color stratC = (g_strategyType=="TRAP") ? NEON_PURPLE : (g_strategyType=="TREND") ? NEON_GREEN : CGR;
   string stratSig = "";
   if(g_strategyType=="TRAP" || g_strategyType=="TREND"){
      // g_strategyReason has: "CALL xx% + HA GREEN" or "PUT xx% + HA RED"
      if(StringFind(g_strategyReason,"CALL")>=0) stratSig = "CALL";
      else if(StringFind(g_strategyReason,"PUT")>=0) stratSig = "PUT";
   }
   string stratLabel = (g_strategyType=="TRAP")  ? "TRAP "  + stratSig :
                       (g_strategyType=="TREND") ? "TREND " + stratSig : "NO STRATEGY";
   
   // ============================================================
   // SIGNAL CUBE - BB PULLBACK INTEGRATED - FIXED COLORS
   // ============================================================
   string finalSig = g_finalSignal;
   color sigC = NEON_YELLOW;  // Default = YELLOW (WAIT)
   
   // BB signal integration: agar regular WAIT hai aur BB signal active hai
   if(ENABLE_BB_PULLBACK && g_bbSignal != "--" && (finalSig == "WAIT" || finalSig == "")){
      finalSig = "BB " + g_bbSignal;
      sigC = g_bbColor;  // GREEN for CALL, RED for PUT, YELLOW for no signal
   } else {
      if(finalSig=="CALL")      sigC = NEON_GREEN;
      else if(finalSig=="PUT")  sigC = NEON_RED;
      else if(finalSig=="WEAK CALL") sigC = NEON_CYAN;
      else if(finalSig=="WEAK PUT")  sigC = NEON_ORANGE;
      else sigC = NEON_YELLOW;  // WAIT = always YELLOW
   }
   
   // ROW 1 - PAIR, SIGNAL, NEXT CANDLE (CH=110)
   Cube("c1",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"PAIR",NEON_CYAN,Symbol(),NEON_BLUE,13);
   Bx("c2",cx+CW+G,yy,CW,CH,BG_DARK2,sigC);
   Tx("c2_l",cx+CW+G+10,yy+4,"SIGNAL",NEON_CYAN,10,true);
   Tx("c2_v",cx+CW+G+10,yy+26,finalSig,sigC,13,true);
   if(ENABLE_BB_PULLBACK){
      string ha30Txt=Is30SecHABull()?"HA30:BULL":Is30SecHABear()?"HA30:BEAR":"HA30:DOJI";
      color ha30C=Is30SecHABull()?NEON_GREEN:Is30SecHABear()?NEON_RED:NEON_YELLOW;
      Tx("c2_ha30",cx+CW+G+10,yy+60,ha30Txt,ha30C,9,false);
      if(g_bbSignal!="--")Tx("c2_bb",cx+CW+G+10,yy+78,g_bbDetail,g_bbColor,9,false);
   }
   double gP,rP;string rsn;color pClr;
   CalcAdvancedPrediction(gP,rP,rsn,pClr);
   g_frozen_gProb=gP;g_frozen_rProb=rP;g_frozen_pAction=rsn;g_frozen_pColor=pClr;g_last_freeze_bar=Time[0];
   Bx("c_pred",cx+2*(CW+G),yy,CW,CH,BG_DARK2,pClr);
   Tx("c_pred_l",cx+2*(CW+G)+10,yy+4,"NEXT CANDLE",NEON_CYAN,10,true);
   int bW=CW-20,gBW=(int)(gP/100.0*bW),rBW=(int)(rP/100.0*bW);
   if(gBW<3)gBW=3;if(rBW<3)rBW=3;
   Bx("c_pred_gbg",cx+2*(CW+G)+10,yy+22,bW,7,BG_DARK4,BG_DARK4);
   Bx("c_pred_gfg",cx+2*(CW+G)+10,yy+22,gBW,7,NEON_GREEN,NEON_GREEN);
   Tx("c_pred_gp",cx+2*(CW+G)+10,yy+31,"G:"+DoubleToString(gP,0)+"%",NEON_GREEN,11,true);
   Bx("c_pred_rbg",cx+2*(CW+G)+10,yy+48,bW,7,BG_DARK4,BG_DARK4);
   Bx("c_pred_rfg",cx+2*(CW+G)+10,yy+48,rBW,7,NEON_RED,NEON_RED);
   Tx("c_pred_rp",cx+2*(CW+G)+10,yy+57,"R:"+DoubleToString(rP,0)+"%",NEON_RED,11,true);
   Tx("c_pred_a",cx+2*(CW+G)+10,yy+76,rsn,pClr,11,true);
   NeonBar("c_pred_b",cx+2*(CW+G)+10,yy+92,bW,7,MathMax(gP,rP),pClr);
   yy+=CH+G;

// ROW 2 - NEURAL AI, CROWD, SESSION (CH=110)
   Cube("c7",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"NEURAL AI",NEON_CYAN,DoubleToString(nb,1)+"%",(nb>72)?NEON_ORANGE:(nb<35)?NEON_CYAN:NEON_GREEN,16);
   NeonBar("c7b",cx+12,yy+92,CW-24,7,nb,(nb>72)?NEON_ORANGE:(nb<35)?NEON_CYAN:NEON_GREEN);
   Bx("c8",cx+CW+G,yy,CW,CH,BG_DARK2,NEON_CYAN);
   Tx("c8_l",cx+CW+G+10,yy+4,"CROWD",NEON_CYAN,10,true);
   Tx("c8_c",cx+CW+G+10,yy+24,"CALL "+IntegerToString(g_otcCallPct)+"%",NEON_RED,14,true);
   Tx("c8_p",cx+CW+G+10,yy+54,"PUT "+IntegerToString(g_otcPutPct)+"%",NEON_GREEN,14,true);
   Tx("c8_b",cx+CW+G+10,yy+86,"OTC Crowd",NEON_GOLD,9,false);
   color sClr=CGR;string sName=GetCurrentSession(sClr);bool isAct=IsSessionActive();
   Bx("c_ses",cx+2*(CW+G),yy,CW,CH,BG_DARK2,sClr);
   Tx("c_ses_l",cx+2*(CW+G)+10,yy+4,"SESSION",NEON_CYAN,10,true);
   Tx("c_ses_v",cx+2*(CW+G)+10,yy+22,sName,sClr,14,true);
   int gH=TimeHour(TimeGMT()),gMn=TimeMinute(TimeGMT());
   Tx("c_ses_t",cx+2*(CW+G)+10,yy+54,"GMT "+(gH<10?"0":"")+IntegerToString(gH)+":"+(gMn<10?"0":"")+IntegerToString(gMn),NEON_WHITE,11,false);
   Tx("c_ses_s",cx+2*(CW+G)+10,yy+76,isAct?"ACTIVE":"LOW VOL",isAct?NEON_GREEN:NEON_ORANGE,11,true);
   yy+=CH+G;

// ROW 3 - OTHER PAIRS, OTC QUICK, BRAIN (Strategy hata diya)
   DrawOtherPairsCube(cx,yy,CW,CH);
   DrawOTCQuickCube(cx+CW+G,yy,CW,CH);
   // BRAIN cube yahan (Row 3, position 3)
   Bx("c_brain_r3",cx+2*(CW+G),yy,CW,CH,BG_DARK3,NEON_CYAN);
   Tx("c_brain_r3_l",cx+2*(CW+G)+10,yy+5,"BRAIN",NEON_CYAN,10,true);
   color brainClr3=(brain>0)?NEON_GREEN:NEON_RED;
   Tx("c_brain_r3_v",cx+2*(CW+G)+10,yy+28,(brain>=0?"+":"")+DoubleToString(brain,1),brainClr3,22,true);
   // Strategy info as small text below brain value
   Tx("c_brain_r3_s",cx+2*(CW+G)+10,yy+72,stratLabel,stratC,10,false);
   NeonBar("c_brain_r3_b",cx+2*(CW+G)+12,yy+92,CW-24,7,MathMin(100,MathAbs(brain)*8+50),(brain>0)?NEON_GREEN:NEON_RED);
   yy+=CH+G;

// ROW 4 - MICRO AI, MICRO TRAP, TFA (CH4=120 - taller)
   int CH4=120;
   color maC;
   if(mai>72)maC=NEON_ORANGE;else if(mai>55)maC=NEON_YELLOW;else if(mai>45)maC=NEON_CYAN;else maC=NEON_GREEN;
   Cube("c_mai",cx,yy,CW,CH4,maC,BG_DARK2,"MICRO AI",NEON_CYAN,DoubleToString(mai,0)+"%",maC,16);
   NeonBar("c_mai_b",cx+12,yy+104,CW-24,7,mai,maC);
   color mtsC=(mts>=90)?NEON_PURPLE:(mts>=75)?NEON_RED:(mts>=50)?NEON_ORANGE:NEON_GREEN;
   Cube("c_mts",cx+CW+G,yy,CW,CH4,mtsC,BG_DARK2,"MICRO TRAP",NEON_CYAN,"SCORE "+IntegerToString(mts),mtsC,14);
   NeonBar("c_mts_b",cx+CW+G+12,yy+104,CW-24,7,MathMin(100,mts),mtsC);
   // TFA SCORE - fixed, no overlap
   int tfaInt=(int)tfaScore;color tfaColor;string tfaLabel;
   if(tfaInt>=5){tfaLabel="STRONG";tfaColor=NEON_GREEN;}
   else if(tfaInt>=4){tfaLabel="GOOD";tfaColor=NEON_LIME;}
   else if(tfaInt>=3){tfaLabel="MEDIUM";tfaColor=NEON_YELLOW;}
   else if(tfaInt>=2){tfaLabel="WEAK";tfaColor=NEON_ORANGE;}
   else{tfaLabel="POOR";tfaColor=C'100,100,120';}
   color tfaBC=tfaColor;string dirTxt="";
   if(g_haM1=="HA BEARISH 1"){tfaBC=NEON_RED;dirTxt="[DOWN]";}
   else if(g_haM1=="HA BULLISH 1"){tfaBC=NEON_GREEN;dirTxt="[UP]";}
   else dirTxt="[MIX]";
   Bx("c_tfa",cx+2*(CW+G),yy,CW,CH4,BG_DARK3,tfaBC);
   Tx("c_tfa_l",cx+2*(CW+G)+10,yy+4,"TFA SCORE",NEON_CYAN,10,true);
   Tx("c_tfa_v",cx+2*(CW+G)+10,yy+22,IntegerToString(tfaInt)+"/6 "+tfaLabel,tfaBC,12,true);
   Tx("c_tfa_dir",cx+2*(CW+G)+10,yy+44,dirTxt,tfaBC,11,true);
   // Split TFA detail into 2 short lines
   string tdet=g_tfa_detail;
   int pp=StringFind(tdet," | ");
   string td1=(pp>=0)?StringSubstr(tdet,0,pp):tdet;
   string td2=(pp>=0)?StringSubstr(tdet,pp+3):"";
   if(StringLen(td1)>24)td1=StringSubstr(td1,0,23);
   if(StringLen(td2)>24)td2=StringSubstr(td2,0,23);
   Tx("c_tfa_d1",cx+2*(CW+G)+10,yy+62,td1,CGR,8,false);
   if(StringLen(td2)>0)Tx("c_tfa_d2",cx+2*(CW+G)+10,yy+76,td2,CGR,8,false);
   int tfaFW=(int)((double)tfaInt/6.0*(CW-20));if(tfaFW<2)tfaFW=2;if(tfaFW>CW-20)tfaFW=CW-20;
   Bx("c_tfa_bb",cx+2*(CW+G)+10,yy+104,CW-20,7,BG_DARK4,BG_DARK4);
   Bx("c_tfa_bf",cx+2*(CW+G)+10,yy+104,tfaFW,7,tfaBC,tfaBC);
   yy+=CH4+G;

// ROW 5 - NCP PRO (replaces FRACTAL), MARKET BIAS, S/R LEVELS (CH5=120)
   int CH5=120;
   // NCP PRO v4.2 CUBE
   if(ENABLE_MTG){
      bool isTrap=(g_mtgState=="PUT TRAP"||g_mtgState=="CALL TRAP");
      color mtgC=g_mtgClr;
      if(mtgC==CGR||mtgC==clrGray) mtgC=C'55,65,85';
      // Trap = purple flashing border
      color borderC = isTrap ? NEON_PURPLE : mtgC;
      
      Bx("c_mtg",cx,yy,CW,CH5,BG_DARK2,borderC);
      
      // Title: NCP + run count
      string runStr="";
      if(g_mtgBullCount>=2) runStr=" "+IntegerToString(g_mtgBullCount)+"G-RUN";
      else if(g_mtgBearCount>=2) runStr=" "+IntegerToString(g_mtgBearCount)+"R-RUN";
      Tx("c_mtg_l",cx+10,yy+4,"NCP PRO"+runStr,NEON_PURPLE,9,true);
      
      // State (big) — TRAP gets special size
      int stateFS = isTrap ? 11 : 13;
      Tx("c_mtg_s",cx+10,yy+20,g_mtgState,mtgC,stateFS,true);
      
      // CALL% bar + text
      int cW=(int)(g_mtgHype/100.0*(CW-22));if(cW<2)cW=2;if(cW>CW-22)cW=CW-22;
      color cBarC=(g_mtgHype>=g_mtgBetrayal)?NEON_GREEN:C'35,70,35';
      Bx("c_mtg_cbb",cx+10,yy+42,CW-22,6,BG_DARK4,BG_DARK4);
      Bx("c_mtg_cbf",cx+10,yy+42,cW,6,cBarC,cBarC);
      Tx("c_mtg_ct",cx+10,yy+50,"CALL: "+DoubleToString(g_mtgHype,1)+"%",NEON_GREEN,10,true);
      
      // PUT% bar + text
      int pW=(int)(g_mtgBetrayal/100.0*(CW-22));if(pW<2)pW=2;if(pW>CW-22)pW=CW-22;
      color pBarC=(g_mtgBetrayal>g_mtgHype)?NEON_RED:C'70,25,25';
      Bx("c_mtg_pbb",cx+10,yy+66,CW-22,6,BG_DARK4,BG_DARK4);
      Bx("c_mtg_pbf",cx+10,yy+66,pW,6,pBarC,pBarC);
      Tx("c_mtg_pt",cx+10,yy+74,"PUT:  "+DoubleToString(g_mtgBetrayal,1)+"%",NEON_RED,10,true);
      
      // Action — trap gets purple, else normal
      string actD=g_mtgAction;if(StringLen(actD)>24)actD=StringSubstr(actD,0,23);
      color actC=isTrap?NEON_PURPLE:(g_mtgState=="CALL")?NEON_GREEN:(g_mtgState=="PUT")?NEON_RED:NEON_YELLOW;
      Tx("c_mtg_a",cx+10,yy+88,actD,actC,10,true);
      
      // Strength + RSI
      string rsnD=(StringLen(g_mtgReason)>0)?g_mtgReason:g_mtgPattern;
      if(StringLen(rsnD)>24)rsnD=StringSubstr(rsnD,0,23);
      Tx("c_mtg_r",cx+10,yy+104,rsnD,CGR,8,false);
      
   } else {
      double frac=CalcAdvancedFractal();
      color frC=(frac>=75)?NEON_RED:(frac>=50)?NEON_ORANGE:(frac>=25)?NEON_YELLOW:NEON_GREEN;
      string frT=(frac>=75)?"TRAP ZONE!":(frac>=50)?"WARNING":(frac>=25)?"CAUTION":"CLEAR";
      Cube("c_frc",cx,yy,CW,CH5,frC,BG_DARK2,"FRACTAL",NEON_CYAN,frT,frC,13);
      NeonBar("c_frc_b",cx+12,yy+104,CW-24,7,frac,frC);
   }
   // MARKET BIAS - fixed spacing
   Bx("c_bias",cx+CW+G,yy,CW,CH5,BG_DARK2,biasClr);
   Tx("c_bias_l",cx+CW+G+10,yy+4,"MARKET BIAS",NEON_CYAN,10,true);
   string bStr=biasStr;if(StringLen(bStr)>13)bStr=StringSubstr(bStr,0,12);
   Tx("c_bias_v",cx+CW+G+10,yy+22,bStr,biasClr,13,true);
   Tx("c_bias_m",cx+CW+G+10,yy+52,"MODE: "+g_marketMode,(g_marketMode=="TREND")?NEON_GREEN:(g_marketMode=="REVERSAL")?NEON_RED:NEON_YELLOW,10,false);
   color accC=(g_accuracy>=70)?NEON_GREEN:(g_accuracy>=60)?NEON_YELLOW:NEON_RED;
   Tx("c_bias_a",cx+CW+G+10,yy+72,"ACC: "+DoubleToString(g_accuracy,1)+"%",accC,10,false);
   NeonBar("c_bias_b",cx+CW+G+10,yy+88,CW-20,7,g_accuracy,accC);
   // S/R LEVELS
   int dg_sr=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg_sr<=0)dg_sr=5;
   Bx("c18",cx+2*(CW+G),yy,CW,CH5,BG_DARK2,NEON_CYAN);
   Tx("c18_l",cx+2*(CW+G)+10,yy+4,"S/R LEVELS",NEON_CYAN,10,true);
   Tx("c18_r",cx+2*(CW+G)+10,yy+24,"R: "+(g_nearest_res>0?DoubleToString(g_nearest_res,dg_sr):"--"),NEON_RED,13,true);
   Tx("c18_s",cx+2*(CW+G)+10,yy+54,"S: "+(g_nearest_sup>0?DoubleToString(g_nearest_sup,dg_sr):"--"),NEON_GREEN,13,true);
   Tx("c18_b",cx+2*(CW+G)+10,yy+86,g_brk_str,g_brk_color,11,true);
   yy+=CH5+G;

// ROW 6 - WICKS, HA CANDLES, REVERSAL (CH6=120)
   int CH6=120;
   color wickC=(mw>0.70)?NEON_RED:(mw>0.50)?NEON_ORANGE:NEON_GREEN;
   Bx("c15",cx,yy,CW,CH6,BG_DARK2,wickC);
   Tx("c15_l",cx+10,yy+4,"WICKS",NEON_CYAN,10,true);
   Tx("c15_v",cx+10,yy+26,DoubleToString(mw,2),wickC,18,true);
   Tx("c15_b",cx+10,yy+62,(mw>0.70)?"KILL SHOT":(mw>0.50)?"HIGH":"LOW",wickC,11,false);
   NeonBar("c15_bar",cx+10,yy+80,CW-20,7,mw*100,wickC);
   // HA CANDLES - fixed M5 cutoff
   Bx("c_ha",cx+CW+G,yy,CW,CH6,BG_DARK2,ha1C);
   Tx("c_ha_l",cx+CW+G+10,yy+4,"HA CANDLES",NEON_CYAN,10,true);
   string haM1txt=g_haM1,haM5txt=g_haM5;
   if(StringLen(haM1txt)>16)haM1txt=StringSubstr(haM1txt,3);
   if(StringLen(haM5txt)>16)haM5txt=StringSubstr(haM5txt,3);
   Tx("c_ha_m1",cx+CW+G+10,yy+24,"M1: "+haM1txt,ha1C,11,true);
   Tx("c_ha_m5",cx+CW+G+10,yy+50,"M5: "+haM5txt,ha5C,11,true);
   string haComb="";color haCombC=NEON_YELLOW;
   if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5"){haComb="BOTH BULL";haCombC=NEON_GREEN;}
   else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5"){haComb="BOTH BEAR";haCombC=NEON_RED;}
   else if(g_haBoth=="MIXED")haComb="MIXED";
   else haComb=g_haBoth;
   Tx("c_ha_c",cx+CW+G+10,yy+76,haComb,haCombC,11,true);
   // REVERSAL
   string revReason=DetectSuddenReversal();color revColor=NEON_YELLOW;
   if(StringFind(revReason,"BULL")>=0)revColor=NEON_GREEN;
   if(StringFind(revReason,"BEAR")>=0)revColor=NEON_RED;
   Bx("c_reason",cx+2*(CW+G),yy,CW,CH6,BG_DARK2,revColor);
   Tx("c_reason_l",cx+2*(CW+G)+10,yy+4,"REVERSAL",NEON_CYAN,10,true);
   Tx("c_reason_v",cx+2*(CW+G)+10,yy+36,(StringLen(revReason)>0?revReason:"No reversal"),revColor,10,false);
   yy+=CH6+G;

// BB PULLBACK ROW - with ADX+RSI confirmation display
   if(ENABLE_BB_PULLBACK){
      int bbRowH=52;
      color bbRowBorder = (g_bbSignal=="CALL")?NEON_GREEN:(g_bbSignal=="PUT")?NEON_RED:BB_GREY;
      Bx("c_bb_row",cx,yy,W-2*G,bbRowH,BG_DARK3,bbRowBorder);
      // Line 1: BB info + HA30 + bands
      string ha30Str=Is30SecHABull()?"BULL":Is30SecHABear()?"BEAR":"DOJI";
      color ha30C2=Is30SecHABull()?NEON_GREEN:Is30SecHABear()?NEON_RED:NEON_YELLOW;
      double adxD=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);
      double rsiD=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
      double bbU2=iBands(NULL,PERIOD_M1,BB_PERIOD,BB_DEVIATION,0,PRICE_CLOSE,MODE_UPPER,0);
      double bbL2=iBands(NULL,PERIOD_M1,BB_PERIOD,BB_DEVIATION,0,PRICE_CLOSE,MODE_LOWER,0);
      int dg3=(int)MarketInfo(Symbol(),MODE_DIGITS);if(dg3<=0)dg3=5;
      Tx("c_bb_row_l",cx+10,yy+4,"BB("+IntegerToString(BB_PERIOD)+") PULLBACK",BB_GREY,9,true);
      Tx("c_bb_ha2",cx+190,yy+4,"HA30:"+ha30Str,ha30C2,9,true);
      Tx("c_bb_adx",cx+310,yy+4,"ADX:"+DoubleToString(adxD,0),adxD>=20?NEON_LIME:CGR,9,false);
      Tx("c_bb_rsi",cx+390,yy+4,"RSI:"+DoubleToString(rsiD,0),(rsiD>=70||rsiD<=30)?NEON_RED:CGR,9,false);
      if(bbU2>0&&bbL2>0){
         Tx("c_bb_u2",cx+470,yy+4,"U:"+DoubleToString(bbU2,dg3),NEON_ORANGE,8,false);
         Tx("c_bb_d2",cx+570,yy+4,"L:"+DoubleToString(bbL2,dg3),NEON_CYAN,8,false);
      }
      // Line 2: Signal + full detail
      if(g_bbSignal!="--"){
         string sigTxt = "BB "+g_bbSignal+" | "+g_bbDetail;
         if(StringLen(sigTxt)>60) sigTxt=StringSubstr(sigTxt,0,58)+"..";
         Tx("c_bb_sig2",cx+10,yy+22,sigTxt,g_bbColor,10,true);
      } else {
         Tx("c_bb_sig2",cx+10,yy+22,"Waiting for BB touch + 2+ confirmations (HA30+ADX+RSI)...",CGR,9,false);
      }
      yy+=bbRowH+G;
   }

// BOTTOM ROW - HRN, SPM, STRATEGY
   int bottomW=(W-2*G-2*G)/3,bottomH=106;yy+=4;int x1=cx;
   // HRN LEVEL
   Bx("c_hrn",x1,yy,bottomW,bottomH,BG_DARK2,NEON_PINK);
   Tx("c_hrn_l",x1+8,yy+4,"HRN LEVEL",NEON_PINK,10,true);
   Tx("c_hrn_v",x1+8,yy+22,g_hrn_str,NEON_PINK,13,true);
   Tx("c_hrn_t",x1+8,yy+46,g_hrn_is_sup?"SUPPORT":"RESISTANCE",NEON_PINK,10,false);
   color scoreC=(g_hrn_score>=30)?NEON_GREEN:(g_hrn_score>=15)?NEON_YELLOW:NEON_ORANGE;
   Tx("c_hrn_sc",x1+8,yy+62,"Score: "+DoubleToString(g_hrn_score,0),scoreC,10,false);
   Tx("c_hrn_b",x1+8,yy+78,"Brk "+IntegerToString(g_hrn_brk_bars)+"/"+IntegerToString(HRN_CONFIRM_BARS),NEON_PINK,10,false);
   Tx("c_hrn_s",x1+8,yy+94,g_isSideways?"SIDEWAYS":"TRENDING",g_isSideways?NEON_YELLOW:NEON_GREEN,9,false);
   int x2=x1+bottomW+G;
   // SPM
   Bx("c5",x2,yy,bottomW,bottomH,BG_DARK3,NEON_CYAN);
   Tx("c5_l",x2+10,yy+12,"SPM",NEON_CYAN,10,true);
   Tx("c5_v",x2+10,yy+44,(g_rsc>=0?"+":"")+DoubleToString(g_rsc,1),(g_rsc>0)?NEON_GREEN:NEON_RED,22,true);
   int x3=x2+bottomW+G;
   // STRATEGY
   Bx("c_strat_b",x3,yy,bottomW,bottomH,BG_DARK3,stratC);
   Tx("c_strat_b_l",x3+10,yy+6,"STRATEGY",NEON_CYAN,10,true);
   Tx("c_strat_b_v",x3+10,yy+30,stratLabel,stratC,11,true);
   Tx("c_strat_b_r",x3+10,yy+60,g_strategyReason,CGR,8,false);
   yy+=bottomH+5;

// FILTER STATUS BAR
   int fsW=W-2*G;
   color fsC=(g_filterStatus=="ALL CLEAR")?NEON_GREEN:(StringFind(g_filterStatus,"ACTIVE")>=0)?NEON_LIME:(StringFind(g_filterStatus,"LOCK")>=0)?NEON_RED:NEON_ORANGE;
   Bx("c_filter",cx,yy,fsW,22,BG_DARK3,fsC);
   Tx("c_filter_v",cx+10,yy+4,"FILTER: "+g_filterStatus,fsC,11,true);
   HideSPM();
   ChartRedraw();
}

void UpdateRiskControl(){
   static datetime llt=0;
   if(ENABLE_RISK_LOCK){if(g_lossStreak>=MAX_LOSS_STREAK){g_tradingStopped=true;llt=TimeCurrent();g_filterStatus="RISK LOCK "+IntegerToString(g_lossStreak)+"L";}if(g_tradingStopped&&TimeCurrent()-llt>3600){g_tradingStopped=false;g_lossStreak=0;g_filterStatus="RISK UNLOCK";}}}

void FinalSignalEngine(double brain,int cp,int mts){
   g_filterStatus="ALL CLEAR";
   if(ENABLE_RISK_CONTROL&&g_tradingStopped){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="RISK LOCKED";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
   if(ENABLE_SESSION_FILTER&&!IsSessionActive()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="SESSION OFF";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
   if(MTF_CONFIRM&&!g_mtfConfirmed){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="MTF NO CONF";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
   if(ENABLE_SPIKE_FILTER&&IsBigCandle(1)){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="SPIKE BLOCK";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
   if(ENABLE_LAST_SEC_BLOCK){int age=(int)(TimeCurrent()-Time[0]);int ps=Period()*60;int rem=ps-age;if(rem<0)rem=0;if(rem<MIN_REMAINING_SEC){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="LAST SEC BLOCK";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}}
   double conf=MathMax(g_calc_gProb,g_calc_rProb);
   if(conf<MIN_CONFIDENCE){g_finalSignal="WAIT";g_finalColor=NEON_YELLOW;g_filterStatus="LOW CONF "+DoubleToString(conf,0)+"%";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
   bool reverseSignal=(g_accuracy<45.0&&g_acc_total>20);
   if(reverseSignal)g_filterStatus="REVERSE MODE";
   string ms=DetectMyStrategy();
   if(ms!="WAIT"){
      if(CONSENSUS_FILTER&&!ConsensusOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="NO CONSENSUS";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
      if(ENABLE_ENTRY_ZONE&&!DirectionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="BAD ENTRY ZONE";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
      if(!EntryPrecisionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="PRECISION FAIL";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
      if(reverseSignal){if(ms=="CALL")ms="PUT";else if(ms=="PUT")ms="CALL";}
      g_finalSignal=ms;g_finalColor=(ms=="CALL")?NEON_GREEN:NEON_RED;g_filterStatus=(g_strategyType=="TRAP")?"TRAP ACTIVE":"TREND ACTIVE";
      if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT"){g_finalSignal=ms;g_signalTime=TimeCurrent();}
      SendSignalNotification(ms,conf);return;}
   double th=FAST_MODE?70:68;string rawSignal="WAIT";
   if(g_calc_gProb>th)rawSignal="CALL";else if(g_calc_rProb>th)rawSignal="PUT";
   else if(g_calc_gProb>60)rawSignal="WEAK CALL";else if(g_calc_rProb>60)rawSignal="WEAK PUT";
   if(reverseSignal){if(rawSignal=="CALL")rawSignal="PUT";else if(rawSignal=="PUT")rawSignal="CALL";else if(rawSignal=="WEAK CALL")rawSignal="WEAK PUT";else if(rawSignal=="WEAK PUT")rawSignal="WEAK CALL";}
   g_finalSignal=rawSignal;
   if((g_finalSignal=="CALL"||g_finalSignal=="PUT")&&ENABLE_ENTRY_ZONE&&!DirectionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="BAD ENTRY ZONE";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
   if((g_finalSignal=="CALL"||g_finalSignal=="PUT")&&!EntryPrecisionOK()){g_finalSignal="WAIT";g_finalColor=NEON_ORANGE;g_filterStatus="PRECISION FAIL";if(TimeCurrent()-g_signalTime>HOLD_SEC)g_signalTime=TimeCurrent();return;}
   if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT")g_signalTime=TimeCurrent();
   if(g_finalSignal=="CALL"){g_finalColor=NEON_GREEN;g_filterStatus="GREEN SIGNAL";SendSignalNotification("CALL",conf);}
   else if(g_finalSignal=="PUT"){g_finalColor=NEON_RED;g_filterStatus="RED SIGNAL";SendSignalNotification("PUT",conf);}
   else if(g_finalSignal=="WEAK CALL"){g_finalColor=NEON_CYAN;g_filterStatus="WEAK GREEN";}
   else if(g_finalSignal=="WEAK PUT"){g_finalColor=NEON_ORANGE;g_filterStatus="WEAK RED";}
   else g_finalColor=NEON_YELLOW;}

void SendSignalNotification(string sig,double conf){
   if(!ENABLE_NOTIFY) return;
   string msg=Symbol()+" | "+sig+" | "+DoubleToString(conf,0)+"% | "+g_filterStatus;
   if(msg==g_lastNotified) return;
   g_lastNotified=msg;
   // NO popup Alert, NO SendNotification (mobile push) - removed as requested
   // Only Telegram if enabled, and Print to log
   if(ENABLE_TELEGRAM) SendTelegramAlert("AIBRAIN\n"+Symbol()+"\n"+sig+"\nConf: "+DoubleToString(conf,0)+"%\n"+g_filterStatus);
   Print(msg);
}

void BroadcastSignal(){
   double conf=MathMax(g_frozen_gProb,g_frozen_rProb);if(conf<55)return;
   string fn="OTC_Signals_Master.txt",pair=Symbol();string sig=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
   int exp=(int)(TimeCurrent()+65);string line=pair+"|"+sig+"|"+DoubleToString(conf,0)+"|"+IntegerToString((int)TimeCurrent())+"|"+IntegerToString(exp);
   int h=FileOpen(fn,FILE_READ|FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);
   if(h==INVALID_HANDLE){h=FileOpen(fn,FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);if(h==INVALID_HANDLE)return;FileWriteString(h,line+"\n");FileClose(h);return;}
   string content="";while(!FileIsEnding(h)){string ex=FileReadString(h);if(StringLen(ex)>10&&StringFind(ex,pair+"|")!=0)content+=ex+"\n";}
   content=line+"\n"+content;string lns[];int cnt=0,pos=0;int f=StringFind(content,"\n",pos);
   while(f!=-1&&cnt<100){ArrayResize(lns,cnt+1);lns[cnt]=StringSubstr(content,pos,f-pos);cnt++;pos=f+1;f=StringFind(content,"\n",pos);}
   if(pos<StringLen(content)){ArrayResize(lns,cnt+1);lns[cnt]=StringSubstr(content,pos);cnt++;}
   if(cnt>50){content="";for(int i=0;i<50;i++)if(StringLen(lns[i])>10)content+=lns[i]+"\n";}
   FileSeek(h,0,SEEK_SET);FileWriteString(h,content);FileFlush(h);FileClose(h);}

// ============================================================
// PAIR QUALITY SCORE - 1 MINUTE OTC OPTIMIZED
// Har pair ko 0-100 score deta hai based on:
// 1. HA M1 alignment (25 pts)
// 2. HA M5 alignment (15 pts)
// 3. RSI position (20 pts)
// 4. Volume spike (15 pts)
// 5. Momentum - consecutive candles (15 pts)
// 6. Spread check (10 pts)
// Returns score aur signal direction
// ============================================================
int CalcPairQuality(string pair, string &outSig, string &outDetail){
   // HA M1 calculation
   double o1=iOpen(pair,PERIOD_M1,1), h1=iHigh(pair,PERIOD_M1,1);
   double l1=iLow(pair,PERIOD_M1,1),  c1=iClose(pair,PERIOD_M1,1);
   double o2=iOpen(pair,PERIOD_M1,2), h2=iHigh(pair,PERIOD_M1,2);
   double l2=iLow(pair,PERIOD_M1,2),  c2=iClose(pair,PERIOD_M1,2);
   double o3=iOpen(pair,PERIOD_M1,3), c3=iClose(pair,PERIOD_M1,3);
   if(o1==0||c1==0||o2==0||c2==0||o3==0||c3==0){ outSig="WAIT"; return 0; }
   
   double haC1=(o1+h1+l1+c1)/4.0, haC2=(o2+h2+l2+c2)/4.0;
   double haO2=(o3+c3)/2.0, haO1=(haO2+haC2)/2.0;
   bool haM1Bull=(haC1>haO1), haM1Bear=(haC1<haO1);
   double haBody=MathAbs(haC1-haO1), haRange=(h1-l1);
   double haStrength=(haRange>0)? haBody/haRange : 0;
   
   // HA M5
   double m5_o1=iOpen(pair,PERIOD_M5,1), m5_h1=iHigh(pair,PERIOD_M5,1);
   double m5_l1=iLow(pair,PERIOD_M5,1),  m5_c1=iClose(pair,PERIOD_M5,1);
   double m5_o2=iOpen(pair,PERIOD_M5,2), m5_h2=iHigh(pair,PERIOD_M5,2);
   double m5_l2=iLow(pair,PERIOD_M5,2),  m5_c2=iClose(pair,PERIOD_M5,2);
   double m5_o3=iOpen(pair,PERIOD_M5,3), m5_c3=iClose(pair,PERIOD_M5,3);
   bool haM5Bull=false, haM5Bear=false;
   if(m5_o1>0&&m5_c1>0&&m5_o2>0&&m5_c2>0&&m5_o3>0&&m5_c3>0){
      double m5haC1=(m5_o1+m5_h1+m5_l1+m5_c1)/4.0, m5haC2=(m5_o2+m5_h2+m5_l2+m5_c2)/4.0;
      double m5haO2=(m5_o3+m5_c3)/2.0, m5haO1=(m5haO2+m5haC2)/2.0;
      haM5Bull=(m5haC1>m5haO1); haM5Bear=(m5haC1<m5haO1);
   }
   
   // RSI M1
   double rsi=iRSI(pair,PERIOD_M1,14,PRICE_CLOSE,1);
   
   // Volume ratio (bar1 vs bar2)
   double vol1=(double)iVolume(pair,PERIOD_M1,1);
   double vol2=(double)iVolume(pair,PERIOD_M1,2);
   double volRatio=(vol2>0)?vol1/vol2:1.0;
   
   // Spread
   double spread=(double)MarketInfo(pair,MODE_SPREAD);
   
   // Momentum: consecutive candles same direction
   int bullStreak=0, bearStreak=0;
   for(int i=1;i<=4;i++){
      double ci=iClose(pair,PERIOD_M1,i), oi=iOpen(pair,PERIOD_M1,i);
      if(ci==0||oi==0) break;
      if(ci>oi){ if(bearStreak>0)break; bullStreak++; }
      else if(ci<oi){ if(bullStreak>0)break; bearStreak++; }
      else break;
   }
   
   // ============================================================
   // DETERMINE SIGNAL DIRECTION
   // Priority: HA M1 + M5 both agree = strong
   // ============================================================
   bool bullDir=false, bearDir=false;
   if(haM1Bull&&haM5Bull)      { bullDir=true; }
   else if(haM1Bear&&haM5Bear) { bearDir=true; }
   else if(haM1Bull&&rsi<45)   { bullDir=true; }  // M1 bull + oversold
   else if(haM1Bear&&rsi>55)   { bearDir=true; }  // M1 bear + overbought
   else { outSig="WAIT"; return 0; }
   
   // ============================================================
   // SCORING
   // ============================================================
   int score=0;
   string det="";
   
   // 1. HA M1 (25 pts)
   if(bullDir&&haM1Bull){ int s=(haStrength>0.6)?25:(haStrength>0.4)?18:12; score+=s; det+="HA1+"; }
   if(bearDir&&haM1Bear){ int s=(haStrength>0.6)?25:(haStrength>0.4)?18:12; score+=s; det+="HA1+"; }
   
   // 2. HA M5 alignment (15 pts)
   if(bullDir&&haM5Bull){ score+=15; det+="HA5+"; }
   else if(bearDir&&haM5Bear){ score+=15; det+="HA5+"; }
   else det+="HA5-";
   
   // 3. RSI zone (20 pts)
   if(bullDir){
      if(rsi<30){ score+=20; det+="RSI_OS "; }
      else if(rsi<40){ score+=14; det+="RSI_low "; }
      else if(rsi<50){ score+=8; det+="RSI_mid "; }
      else{ score+=2; det+="RSI_hi "; }
   } else {
      if(rsi>70){ score+=20; det+="RSI_OB "; }
      else if(rsi>60){ score+=14; det+="RSI_hi "; }
      else if(rsi>50){ score+=8; det+="RSI_mid "; }
      else{ score+=2; det+="RSI_lo "; }
   }
   
   // 4. Volume (15 pts)
   if(volRatio>=2.0){ score+=15; det+="VOL_HI "; }
   else if(volRatio>=1.5){ score+=10; det+="VOL_MD "; }
   else if(volRatio>=1.1){ score+=5; det+="VOL_LO "; }
   
   // 5. Momentum streak (15 pts)
   int streak=(bullDir)?bullStreak:bearStreak;
   if(streak>=3){ score+=15; det+="STK"+IntegerToString(streak); }
   else if(streak>=2){ score+=10; det+="STK"+IntegerToString(streak); }
   else if(streak>=1){ score+=5; det+="STK1"; }
   
   // 6. Spread (10 pts) — low spread = good
   if(spread<=3){ score+=10; }
   else if(spread<=6){ score+=6; }
   else if(spread<=10){ score+=3; }
   // else 0 pts
   
   outSig  = bullDir ? "CALL" : "PUT";
   outDetail = det;
   return MathMin(100, score);
}

string GetPairHADirection(string pair){
   double o1=iOpen(pair,PERIOD_M1,1),h1=iHigh(pair,PERIOD_M1,1),l1=iLow(pair,PERIOD_M1,1),c1=iClose(pair,PERIOD_M1,1);
   double o2=iOpen(pair,PERIOD_M1,2),h2=iHigh(pair,PERIOD_M1,2),l2=iLow(pair,PERIOD_M1,2),c2=iClose(pair,PERIOD_M1,2);
   double o3=iOpen(pair,PERIOD_M1,3),c3=iClose(pair,PERIOD_M1,3);
   if(o1==0||h1==0||l1==0||c1==0||o2==0||c2==0||o3==0||c3==0)return "NEUTRAL";
   double haC1=(o1+h1+l1+c1)/4.0,haC2=(o2+h2+l2+c2)/4.0,haO2=(o3+c3)/2.0,haO1=(haO2+haC2)/2.0;
   if(haC1>haO1)return "BULL";else if(haC1<haO1)return "BEAR";return "NEUTRAL";}

double GetPairVolumeRatio(string pair){double v1=iVolume(pair,PERIOD_M1,1),v2=iVolume(pair,PERIOD_M1,2);if(v2<=0)return 1.0;return v1/v2;}

double CalculateCorrelation(string sym1,string sym2){
   int bars=MathMin(iBars(sym1,PERIOD_M1),iBars(sym2,PERIOD_M1));if(bars<50)return 0;
   double sum1=0,sum2=0,sum1sq=0,sum2sq=0,sum12=0;
   for(int i=0;i<bars;i++){double c1=iClose(sym1,PERIOD_M1,i),c2=iClose(sym2,PERIOD_M1,i);if(c1==0||c2==0)continue;sum1+=c1;sum2+=c2;sum1sq+=c1*c1;sum2sq+=c2*c2;sum12+=c1*c2;}
   int n=bars;double num=n*sum12-sum1*sum2;double den=MathSqrt((n*sum1sq-sum1*sum1)*(n*sum2sq-sum2*sum2));if(den==0)return 0;return num/den;}

// ============================================================
// SCAN SIGNALS - QUALITY SCORED VERSION
// File se broadcast signals read karo
// Phir har pair ka quality score check karo
// Sirf high-quality pairs dikhao
// ============================================================
void ScanSignals(){
   g_pairCount=0;
   string fn="OTC_Signals_Master.txt", cur=Symbol();
   int h=FileOpen(fn,FILE_READ|FILE_TXT|FILE_SHARE_READ);
   if(h==INVALID_HANDLE) return;
   
   datetime now=TimeCurrent();
   
   // Temp arrays for sorting by quality score
   string tmpNames[8]; string tmpSigs[8];
   double tmpConfs[8]; int tmpScores[8];
   string tmpDetails[8];
   int tmpCount=0;
   
   while(!FileIsEnding(h) && tmpCount<8){
      string ln=FileReadString(h);
      if(StringLen(ln)<15) continue;
      int p1=StringFind(ln,"|"),p2=StringFind(ln,"|",p1+1),p3=StringFind(ln,"|",p2+1),p4=StringFind(ln,"|",p3+1);
      if(p1<0||p2<0||p3<0||p4<0) continue;
      
      string pair=StringSubstr(ln,0,p1);
      if(pair==cur) continue;
      
      string sig=StringSubstr(ln,p1+1,p2-p1-1);
      double conf=StringToDouble(StringSubstr(ln,p2+1,p3-p2-1));
      int expTime=(int)StringToInteger(StringSubstr(ln,p4+1));
      
      // Basic filters
      if(conf<60) continue;
      if(expTime<(int)(now-20)) continue;  // 20 sec grace period
      
      // Quality score calculate karo
      string qSig="WAIT", qDetail="";
      int qScore=CalcPairQuality(pair, qSig, qDetail);
      
      // Signal direction must match broadcast
      if(qSig != sig) continue;
      // Minimum quality threshold
      if(qScore < 45) continue;
      
      tmpNames[tmpCount]   = pair;
      tmpSigs[tmpCount]    = sig;
      tmpConfs[tmpCount]   = conf;
      tmpScores[tmpCount]  = qScore;
      tmpDetails[tmpCount] = qDetail;
      tmpCount++;
   }
   FileClose(h);
   
   // Sort by quality score (descending) - bubble sort
   for(int i=0;i<tmpCount-1;i++){
      for(int j=0;j<tmpCount-i-1;j++){
         if(tmpScores[j]<tmpScores[j+1]){
            // Swap
            string ts=tmpNames[j];  tmpNames[j]=tmpNames[j+1];   tmpNames[j+1]=ts;
            ts=tmpSigs[j];          tmpSigs[j]=tmpSigs[j+1];     tmpSigs[j+1]=ts;
            ts=tmpDetails[j];       tmpDetails[j]=tmpDetails[j+1]; tmpDetails[j+1]=ts;
            double td=tmpConfs[j];  tmpConfs[j]=tmpConfs[j+1];   tmpConfs[j+1]=td;
            int ti=tmpScores[j];    tmpScores[j]=tmpScores[j+1];  tmpScores[j+1]=ti;
         }
      }
   }
   
   // Copy top 5 to global arrays (already sorted best first)
   g_pairCount=MathMin(5,tmpCount);
   for(int i=0;i<g_pairCount;i++){
      g_pairNames[i] = tmpNames[i];
      g_pairSigs[i]  = tmpSigs[i];
      // Store quality score in conf field for display (combined)
      // Format: "score|broadcast_conf"
      g_pairConfs[i] = tmpScores[i];  // Show quality score
   }
   
   // Boost logic: agar 2+ high-quality pairs same direction mein
   string curPred=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
   int sameDir=0;
   double boostTotal=0;
   for(int i=0;i<g_pairCount;i++){
      if(g_pairSigs[i]==curPred && tmpScores[i]>=60){
         sameDir++;
         boostTotal+=tmpScores[i];
      }
   }
   if(sameDir>=2 && !g_tradingStopped){
      double boost=MathMin(12.0, boostTotal/50.0);
      if(curPred=="CALL"){ g_calc_gProb+=boost; g_calc_rProb-=boost; }
      else               { g_calc_rProb+=boost; g_calc_gProb-=boost; }
      g_calc_gProb=MathMax(8.0,MathMin(92.0,g_calc_gProb));
      g_calc_rProb=100.0-g_calc_gProb;
      if(StringFind(g_filterStatus,"BOOST")<0)
         g_filterStatus="PAIR BOOST+"+DoubleToString(boost,0)+"%";
   }
}

void ReadSPM(){
   datetime cb=Time[0];if(cb==g_last_bar&&TimeCurrent()-g_spm_t<5)return;
   double v1=iCustom(NULL,PERIOD_M1,SPM_FILE,0,0),v2=iCustom(NULL,PERIOD_M1,SPM_FILE,1,0);
   if(v1!=EMPTY_VALUE&&v1!=0){double sm=0.7;g_rsc=g_rsc*(1.0-sm)+v1*sm;}
   if(v2!=EMPTY_VALUE&&v2!=0){double sm=0.7;g_tfa=g_tfa*(1.0-sm)+v2*sm;}
   g_last_bar=cb;g_spm_t=TimeCurrent();}

//+------------------------------------------------------------------+
// ONINIT
//+------------------------------------------------------------------+
int OnInit(){
   InitNW();NuclearDeleteAll();
   resCount=0;supCount=0;lastSRBar=0;g_hrn_price=0;g_hrn_brk_bars=0;g_hrn_scan_bar=0;
   g_hrn_score=0;g_hrn_confirmed_break=false;g_nearest_res=0;g_nearest_sup=0;g_rj_cnt=0;g_pairCount=0;
   g_marketMode="RANGE";g_prevMode="";g_last_freeze_bar=0;g_lastNotified="";
   g_accuracy=ValidateHistoricalAccuracy();g_acc_correct=0;g_acc_total=0;g_acc_lastBar=0;
   g_lastPredGreen=50.0;g_lastPredBar=0;g_lossStreak=0;g_tradingStopped=false;
   g_strategyType="NONE";g_frozen_gProb=50;g_frozen_rProb=50;g_calc_gProb=50;g_calc_rProb=50;
   g_commonCount=0;g_wickLineCount=0;g_tfa_detail="";g_htfLevelCount=0;g_mtfConfirmed=true;g_filterStatus="ALL CLEAR";
   g_symbolKey="";g_brokerBias=0.0;
   // BB variables init
   g_bbSignal="--";g_bbColor=NEON_YELLOW;g_bbTouchPrice=0.0;g_bbSignalTime=0;g_bbSignalBars=0;g_bbDetail="";
   // MTG/NCP init
   g_mtgHype=50;g_mtgBetrayal=50;g_mtgRecovery=0;
   g_mtgState="INIT";g_mtgReason="";g_mtgAction="";
   g_mtgClr=CGR;g_mtg_lastBar=0;g_mtgPattern="";
   g_mtgBullCount=0;g_mtgBearCount=0;g_trapScore=0;
   g_smoothCallScore=50.0;g_smoothPutScore=50.0;
   g_callWeight=1.0;g_putWeight=1.0;
   g_totalTrades=0;g_callTrades=0;g_putTrades=0;
   g_callWins=0;g_putWins=0;
   g_ncpLastSignalTime=0;g_ncpLastSignalType="";
   g_ncpLastEntryPrice=0.0;g_ncpSignalProcessed=true;
   if(ENABLE_LEARNING) LoadBrainMemory();
   g_ha30_open=0;g_ha30_close=0;g_ha30_high=0;g_ha30_low=0;g_ha30_bar=0;
   g_bbLineCount=0;
   LoadMLWeights();EventSetTimer(1);
   Print("===========================================");
   Print("AIBRAIN v46.2 - NCP v7.3 LEARNING+SMOOTH+TIMER");
   Print("BB Color: YELLOW=no signal, GREEN=CALL, RED=PUT");
   Print("Volume: Bar[1] vs Bar[2] - single candle ratio");
   Print("30sec HA: Backtesting safe (no elapsed time)");
   Print("Strategy: Cached values, no double-call");
   Print("BB Pullback: ", ENABLE_BB_PULLBACK?"ON":"OFF", " BB(",BB_PERIOD,",",DoubleToString(BB_DEVIATION,1),")");
   Print("===========================================");
   return INIT_SUCCEEDED;}

//+------------------------------------------------------------------+
// ONDEINIT
//+------------------------------------------------------------------+
void OnDeinit(const int r){
   EventKillTimer();Comment("");
   // Remove all indicator objects including timer
   for(int i=ObjectsTotal()-1;i>=0;i--){
      string nm=ObjectName(i);
      if(StringFind(nm,PFX)==0)ObjectDelete(nm);
   }
}

//+------------------------------------------------------------------+
// ONTIMER
//+------------------------------------------------------------------+
void OnTimer(){
   if(Bars<50)return;
   static datetime last5min=0;
   if(Time[0]/300!=last5min/300){DetectHiddenLevels();last5min=Time[0];}
   ReadSPM();CalcHA();UpdateHRN();UpdateSR();
   DetectCommonPoints();DetectWickRejections();
   DrawCommonPoints();DrawWickRejectLines();DrawHiddenLevels();DrawNearestSR();
   if(ENABLE_BB_PULLBACK) DetectBBPullback();
   if(ENABLE_MTG) CalculateMTG();
   int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
   double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
   CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
   ScanSignals();FinalSignalEngine(brain,cp,mts);BroadcastSignal();
   UpdateTimer(); // Timer update — har second
   Draw();
}

//+------------------------------------------------------------------+
// ONCALCULATE
//+------------------------------------------------------------------+
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[]){
   return(rates_total);}
//+------------------------------------------------------------------+