Guest

Untitled 1581

Apr 25th, 2026
14
0
Never
Not a member of GistPad yet? Sign Up, it unlocks many cool features!
None 260.31 KB | None | 0 0
  1. //+------------------------------------------------------------------+
  2. //| AIBRAIN OTC v46.3 - NCP PRO v8.0 ADVANCED INTEGRATED |
  3. //| Fixed: S/R draw, CalcHA, NCP Engine, Dashboard Layout |
  4. //| Removed: HRN/SPM/Strategy cubes, Added ShortPrice, Purple Theme |
  5. //+------------------------------------------------------------------+
  6. #property copyright "AIBRAIN ULTIMATE - KM RANA"
  7. #property version "46.3"
  8. #property strict
  9. #property indicator_chart_window
  10.  
  11. #define PFX "AIB9_"
  12. #define VER "v46.3"
  13. #define LB 18
  14. #define MAX_LEVELS 5
  15. #define MAX_REJ 50
  16. #define LOOKBACK 50
  17.  
  18. input string SPM_FILE = "KM RANA";
  19. input int HOLD_SEC = 60;
  20. input int POS_X = 4;
  21. input int POS_Y = 20;
  22. input int DASH_W = 660;
  23. input bool SHOW_TIMER = true;
  24. input bool SHOW_SR_LINES = true;
  25. input string ENTRY_MODE = "TIME";
  26. input int FLAG_MIN_SEC = 10;
  27. input int FLAG_MAX_SEC = 35;
  28. input int TIME_MIN_SEC = 10;
  29. input int TIME_MAX_SEC = 35;
  30. input int MIN_REMAINING_SEC = 15;
  31. input double REVERSAL_PCT = 30.0;
  32. input double WICK_PCT = 0.65;
  33. input int HRN_CONFIRM_BARS = 2;
  34. input bool HA_ALIGN_FILTER = false;
  35. input bool CONSENSUS_FILTER = false;
  36. input bool ENABLE_NOTIFY = true;
  37. input bool FAST_MODE = false;
  38. input int BROKER_SPREAD_THRESHOLD= 6;
  39. input double OTC_TRAP_WEIGHT = 15.0;
  40. input int CROWD_EXTREME_PCT = 70;
  41. input bool ENABLE_BROKER_KILLER = true;
  42. input bool ENABLE_SESSION_FILTER = true;
  43. input bool ENABLE_SPIKE_FILTER = true;
  44. input bool ENABLE_LAST_SEC_BLOCK = true;
  45. input bool ENABLE_RISK_CONTROL = true;
  46. input bool ENABLE_ENTRY_ZONE = true;
  47. input bool ML_ADAPTIVE = true;
  48. input bool VOLUME_PROFILE_TRAP = true;
  49. input bool MTF_CONFIRM = false;
  50. input bool ENABLE_TELEGRAM = false;
  51. input string TELEGRAM_TOKEN = "";
  52. input string TELEGRAM_CHAT_ID = "";
  53. input string TRADE_MODE = "NORMAL";
  54. input string STRATEGY_MODE = "TRAP_ONLY";
  55. input int STRATEGY_THRESHOLD = 75;
  56. input int MAX_LOSS_STREAK = 2;
  57. input double MIN_CONFIDENCE = 75.0;
  58. input bool ENABLE_RISK_LOCK = true;
  59. input double PATTERN_TOLERANCE_PIPS = 8.0;
  60. input int MIN_PATTERN_SEPARATION = 5;
  61. input bool SHOW_COMMON_POINTS = true;
  62. input double COMMON_POINT_TOL_PIPS = 15.0;
  63. input bool SHOW_WICK_REJECT_LINES = true;
  64. input int WICK_MIN_TOUCHES = 1;
  65. input double WICK_ZONE_PIPS = 15.0;
  66. input int WICK_EXPIRE_BARS = 60;
  67.  
  68. // ============================================================
  69. // BB PULLBACK SETTINGS
  70. // ============================================================
  71. input bool ENABLE_BB_PULLBACK = true;
  72. input int BB_PERIOD = 20;
  73. input double BB_DEVIATION = 2.0;
  74. input int BB_SIGNAL_EXPIRE_BARS = 5;
  75.  
  76. // ============================================================
  77. // NCP PRO v8.0 ADVANCED SETTINGS
  78. // ============================================================
  79. input bool ENABLE_MTG = true;
  80. input int NCP_OpenNoiseSeconds = 3;
  81. input int NCP_KillZoneSeconds = 55;
  82. input double NCP_MaxSpreadPips = 4.0;
  83. input int NCP_ATRPeriod = 14;
  84. input double NCP_MinATRPips = 0.4;
  85. input int NCP_FastEMA = 3;
  86. input int NCP_MidEMA = 7;
  87. input int NCP_SlowEMA = 15;
  88. input bool NCP_UseM5Confirm = true;
  89. input bool NCP_UseVolume = true;
  90. input double NCP_RoundStepPips = 10.0;
  91. input double NCP_RoundTolPips = 4.0;
  92. input int NCP_MinProbMedium = 57;
  93. input int NCP_MinProbStrong = 63;
  94. input int NCP_MinProbExtreme = 70;
  95. input bool NCP_UseRSINorm = true;
  96. input int NCP_RSIPeriod = 10;
  97. input double NCP_RSIBase = 50.0;
  98. input double NCP_RSIM5Target = 45.0;
  99. input double NCP_RSIM15Target = 40.0;
  100. input bool ENABLE_LEARNING = true;
  101. input string MEMORY_FILE_NAME = "NCP_Brain_v8.csv";
  102. input int MIN_TRADES_TO_LEARN = 15;
  103. input double LEARNING_STEP = 0.025;
  104. input bool ENABLE_TRAP_DETECTION = true;
  105. input int TRAP_LOOKBACK = 30;
  106.  
  107. // ===== NEW NCP v8.0 ADVANCED SETTINGS =====
  108. input string NCP8_SECTION = "=== NCP v8.0 ADVANCED ===";
  109. input bool NCP8_UseM15Trend = true;
  110. input bool NCP8_UseDynamicSR = true;
  111. input bool NCP8_UsePatterns = true;
  112. input bool NCP8_UseMultiTF = true;
  113. input bool NCP8_UseColorPattern = true;
  114. input bool NCP8_UseHRNReject = true;
  115. input bool NCP8_UseOrderBlocks = true;
  116. input bool NCP8_UseDivergence = true;
  117. input int NCP8_MinConfidence = 65;
  118. input int NCP8_StrongConfidence = 78;
  119. input int NCP8_ExtremeConfidence = 88;
  120.  
  121. #define NEON_GREEN C'0,255,100'
  122. #define NEON_RED C'255,40,80'
  123. #define NEON_YELLOW C'255,220,0'
  124. #define NEON_ORANGE C'255,120,0'
  125. #define NEON_CYAN C'0,255,200'
  126. #define NEON_PURPLE C'200,0,255'
  127. #define NEON_PINK C'255,80,180'
  128. #define NEON_BLUE C'0,200,255'
  129. #define NEON_LIME C'80,255,80'
  130. #define NEON_GOLD C'255,180,0'
  131. #define DARK_BLUE_NEON C'0,100,255'
  132. #define NEON_WHITE C'220,230,255'
  133. #define CGR C'160,170,190'
  134. #define BB_GREY C'180,180,190'
  135. #define BG_DARK1 C'6,8,16'
  136. #define BG_DARK2 C'10,14,24'
  137. #define BG_DARK3 C'14,20,32'
  138. #define BG_DARK4 C'18,26,40'
  139.  
  140. struct HTFLevel{ double price; string timeframe; string type; datetime time; int strength; bool isRoundNumber; };
  141.  
  142. struct NCPPatternResult {
  143. string name;
  144. int type;
  145. int strength;
  146. string category;
  147. };
  148.  
  149. struct NCPSRZone {
  150. double price;
  151. string type;
  152. int touches;
  153. int strength;
  154. bool isRoundNum;
  155. bool isOrderBlock;
  156. datetime lastTouch;
  157. };
  158.  
  159. struct NCPTrendInfo {
  160. string m15Direction;
  161. int m15Strength;
  162. int m1Bias;
  163. string m5Direction;
  164. int m5Strength;
  165. bool aligned;
  166. };
  167.  
  168. struct NCPMultiTF {
  169. double rsi_m1;
  170. double rsi_m5;
  171. double rsi_m15;
  172. int cci_m1;
  173. int cci_m5;
  174. int macd_m1_dir;
  175. int macd_m5_dir;
  176. double atr_m1;
  177. double atr_m5;
  178. bool ha_m1_bull;
  179. bool ha_m1_bear;
  180. bool ha_m5_bull;
  181. bool ha_m5_bear;
  182. int bullCount;
  183. int bearCount;
  184. };
  185.  
  186. //+------------------------------------------------------------------+
  187. // GLOBAL VARIABLES
  188. //+------------------------------------------------------------------+
  189. string g_haM1="",g_haM5="",g_haBoth="";
  190. color g_haM1Color=clrGray,g_haM5Color=clrGray;
  191. static double NW[36];
  192. static double g_rsc=0,g_tfa=3;
  193. static datetime g_spm_t=0,g_last_bar=0;
  194. static double g_nearest_res=0,g_nearest_sup=0;
  195. static string g_brk_str="NO BRK";
  196. static color g_brk_color=CGR;
  197. struct RejLevel{double price;int touches;};
  198. static RejLevel g_rj[MAX_REJ];
  199. static int g_rj_cnt=0;
  200.  
  201. static double g_hrn_price=0;
  202. static bool g_hrn_is_sup=true;
  203. static int g_hrn_brk_bars=0;
  204. static datetime g_hrn_scan_bar=0;
  205. static string g_hrn_str="--";
  206. static double g_hrn_score=0;
  207. static bool g_hrn_confirmed_break=false;
  208.  
  209. static int g_otcCallPct=50,g_otcPutPct=50;
  210. static string g_pairNames[8],g_pairSigs[8];
  211. static double g_pairConfs[8];
  212. static int g_pairCount=0;
  213. static double g_frozen_gProb=50,g_frozen_rProb=50;
  214. static string g_frozen_pAction="UNCERTAIN";
  215. static color g_frozen_pColor=NEON_YELLOW;
  216. static double g_calc_gProb=50,g_calc_rProb=50;
  217. static string g_calc_pAction="UNCERTAIN";
  218. static color g_calc_pColor=NEON_YELLOW;
  219. static double g_gProb=50,g_rProb=50;
  220. static string g_pAction="UNCERTAIN";
  221. static color g_pColor=NEON_YELLOW;
  222. static datetime g_last_freeze_bar=0;
  223. static double g_accuracy=65.0;
  224. static int g_acc_correct=0,g_acc_total=0;
  225. static datetime g_acc_lastBar=0;
  226. static double g_lastPredGreen=50.0;
  227. static datetime g_lastPredBar=0;
  228. static string g_finalSignal="WAIT";
  229. static color g_finalColor=NEON_YELLOW;
  230. static datetime g_signalTime=0;
  231. static string g_lastNotified="";
  232. static string g_marketMode="RANGE",g_prevMode="";
  233. static int g_lossStreak=0;
  234. static bool g_tradingStopped=false;
  235. static string g_strategyType="NONE";
  236. static string g_strategyReason="";
  237. static double qmrA=0,qmrB=0,qmrC=0,qmrD=0;
  238. static bool qmrActive=false;
  239. static datetime qmrExpire=0;
  240. #define MAX_COMMON_PTS 5
  241. static double g_commonPrice[MAX_COMMON_PTS];
  242. static datetime g_commonTime[MAX_COMMON_PTS];
  243. static int g_commonCount=0;
  244. static datetime g_commonExpire[MAX_COMMON_PTS];
  245. static string g_commonType[MAX_COMMON_PTS];
  246. static datetime g_lastCommonScan=0;
  247. #define MAX_WICK_LINES 5
  248. static double g_wickLinePrice[MAX_WICK_LINES];
  249. static int g_wickLineTouches[MAX_WICK_LINES];
  250. static datetime g_wickLineExpire[MAX_WICK_LINES];
  251. static int g_wickLineCount=0;
  252. static datetime g_lastWickScan=0;
  253. static bool g_isSideways=false;
  254. static string g_tfa_detail="";
  255. static HTFLevel g_htfLevels[50];
  256. static int g_htfLevelCount=0;
  257. static bool g_mtfConfirmed=true;
  258. static string g_filterStatus="ALL CLEAR";
  259. static string g_adv1="WAIT KAR";
  260. static string g_symbolKey="";
  261. static double g_brokerBias=0.0;
  262.  
  263. double g_stableRes[10];
  264. double g_stableSup[10];
  265. int g_stableResCount = 0;
  266. int g_stableSupCount = 0;
  267. datetime g_lastSRScan = 0;
  268. int g_srScanInterval = 5;
  269.  
  270. static string g_bbSignal = "--";
  271. static color g_bbColor = CGR;
  272. static double g_bbTouchPrice = 0.0;
  273. static datetime g_bbSignalTime = 0;
  274. static int g_bbSignalBars = 0;
  275. static string g_bbDetail = "";
  276.  
  277. static double g_ha30_open = 0.0;
  278. static double g_ha30_close = 0.0;
  279. static double g_ha30_high = 0.0;
  280. static double g_ha30_low = 0.0;
  281. static datetime g_ha30_bar = 0;
  282.  
  283. #define MAX_BB_LINES 8
  284. static double g_bbLinePrice[MAX_BB_LINES];
  285. static datetime g_bbLineExpire[MAX_BB_LINES];
  286. static string g_bbLineType[MAX_BB_LINES];
  287. static int g_bbLineCount=0;
  288.  
  289. // NCP PRO v8.0 GLOBALS
  290. static string g_mtgState = "INIT";
  291. static string g_mtgReason = "";
  292. static string g_mtgAction = "";
  293. static color g_mtgClr = CGR;
  294. static double g_mtgHype = 50.0;
  295. static double g_mtgBetrayal = 50.0;
  296. static string g_mtgPattern = "";
  297. static int g_mtgBullCount = 0;
  298. static int g_mtgBearCount = 0;
  299. static double g_mtgRecovery = 0.0;
  300. static datetime g_mtg_lastBar = 0;
  301. static double g_trapScore = 0;
  302. static double g_ncpADX = 0.0;
  303. static double g_ncpPlusDI = 0.0;
  304. static double g_ncpMinusDI = 0.0;
  305.  
  306. static double g_callWeight = 1.0;
  307. static double g_putWeight = 1.0;
  308. static int g_totalTrades = 0;
  309. static int g_callTrades = 0;
  310. static int g_putTrades = 0;
  311. static int g_callWins = 0;
  312. static int g_putWins = 0;
  313. static datetime g_ncpLastSignalTime = 0;
  314. static string g_ncpLastSignalType = "";
  315. static double g_ncpLastEntryPrice = 0.0;
  316. static bool g_ncpSignalProcessed = true;
  317. static double g_smoothCallScore = 50.0;
  318. static double g_smoothPutScore = 50.0;
  319.  
  320. static NCPTrendInfo g_ncpTrend;
  321. static NCPMultiTF g_ncpMultiTF;
  322. static NCPSRZone g_ncpSRZones[20];
  323. static int g_ncpSRCount = 0;
  324. static string g_ncpDetailLine1 = "";
  325. static string g_ncpDetailLine2 = "";
  326. static string g_ncpDetailLine3 = "";
  327. static int g_ncpPatternBullScore = 0;
  328. static int g_ncpPatternBearScore = 0;
  329. static string g_ncpMainPattern = "";
  330. // ============================================================
  331. // OTC BROKER KILLER v4.0 - PROFESSIONAL TRAP ENGINE
  332. // ============================================================
  333. struct VisualTrapPro {
  334. string boxStatus, gannStatus, m30Dir, m1Seq, verdict;
  335. color gannColor, verdictColor;
  336. double callBias, putBias, trapScore;
  337. bool buySignal, sellSignal;
  338. };
  339. VisualTrapPro g_visualTrapPro;
  340. static datetime g_lastTrapArrowTime = 0;
  341.  
  342. //+------------------------------------------------------------------+
  343. // SHORT PRICE FUNCTION - For chart S/R labels
  344. //+------------------------------------------------------------------+
  345. string ShortPrice(double price){
  346. int dg = (int)MarketInfo(Symbol(), MODE_DIGITS);
  347. if(dg < 2) dg = 5; // Safety fallback
  348. return DoubleToString(price, dg);
  349. }
  350. string SRPrice(double price){ return ShortPrice(price); }
  351. //+------------------------------------------------------------------+
  352. // DYNAMIC ADX COLOR FUNCTION
  353. //+------------------------------------------------------------------+
  354. color GetADXColor(double adx, double plusDI, double minusDI){
  355. if(adx < 15) return CGR; // Very Weak - Grey
  356. if(adx < 22) return NEON_ORANGE; // Weak - Orange
  357.  
  358. double diDiff = plusDI - minusDI;
  359. if(diDiff > 10) return NEON_GREEN; // Strong Bullish
  360. if(diDiff > 5) return NEON_LIME; // Moderate Bullish
  361. if(diDiff < -10) return NEON_RED; // Strong Bearish
  362. if(diDiff < -5) return C'255,100,100'; // Moderate Bearish
  363.  
  364. return NEON_YELLOW; // Sideways
  365. }
  366.  
  367. //+------------------------------------------------------------------+
  368. // 30-SECOND HA CANDLE
  369. //+------------------------------------------------------------------+
  370. void Calc30SecHA(){
  371. if(Bars < 5) return;
  372.  
  373. // Use M30 timeframe data if available
  374. if(iBars(NULL, PERIOD_M30) >= 2){
  375. g_ha30_open = iOpen(NULL, PERIOD_M30, 1);
  376. g_ha30_close = iClose(NULL, PERIOD_M30, 1);
  377. g_ha30_high = iHigh(NULL, PERIOD_M30, 1);
  378. g_ha30_low = iLow(NULL, PERIOD_M30, 1);
  379. g_ha30_bar = iTime(NULL, PERIOD_M30, 1);
  380. }
  381. else {
  382. // Fallback to M1 current bar
  383. g_ha30_open = Open[0];
  384. g_ha30_close = Close[0];
  385. g_ha30_high = High[0];
  386. g_ha30_low = Low[0];
  387. g_ha30_bar = Time[0];
  388. }
  389. }
  390.  
  391. bool Is30SecHABull(){ return (g_ha30_close > g_ha30_open); }
  392. bool Is30SecHABear(){ return (g_ha30_close < g_ha30_open); }
  393.  
  394. //+------------------------------------------------------------------+
  395. //| UPGRADED BB PULLBACK - 30 SEC HA PHOOLBAG ENGINE |
  396. //+------------------------------------------------------------------+
  397. void DetectBBPullback(){
  398. if(!ENABLE_BB_PULLBACK || Bars < BB_PERIOD + 5) return;
  399. Calc30SecHA();
  400.  
  401. // BB Current Real-time Values (M1 timeframe)
  402. double bbUpper0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 0);
  403. double bbLower0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 0);
  404. double bbMid0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_MAIN, 0);
  405.  
  406. // BB Previous Closed Values (For strict signal generation)
  407. double bbUpper1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 1);
  408. double bbLower1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 1);
  409.  
  410. if(bbUpper1 <= 0 || bbLower1 <= 0) return;
  411.  
  412. // --- EXACT PHOOLBAG LOGIC (30-SEC HA vs BB) ---
  413. bool isHa30Bull = Is30SecHABull();
  414. bool isHa30Bear = Is30SecHABear();
  415.  
  416. // Top Phoolbag: HA30 ka high BB Upper se touch kare, lekin close neeche aaye (Wick banaye)
  417. bool topPhoolbag = (g_ha30_high >= bbUpper0 * 0.9998) && (g_ha30_close < bbUpper0) && isHa30Bear;
  418.  
  419. // Bottom Phoolbag: HA30 ka low BB Lower se touch kare, lekin close upar aaye (Wick banaye)
  420. bool bottomPhoolbag = (g_ha30_low <= bbLower0 * 1.0002) && (g_ha30_close > bbLower0) && isHa30Bull;
  421.  
  422. // Extra Confirmation Filters (ADX, RSI, DI)
  423. double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  424. double plusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
  425. double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
  426. double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  427.  
  428. bool adxValid = (adx >= 18); // Minimum trend strength
  429. bool diBull = (plusDI > minusDI);
  430. bool diBear = (minusDI > plusDI);
  431.  
  432. // Calculate Wick Size for "Phoolbag" quality
  433. double ha30Range = g_ha30_high - g_ha30_low;
  434. double topWick = (ha30Range > 0) ? (g_ha30_high - MathMax(g_ha30_open, g_ha30_close)) / ha30Range : 0;
  435. double bottomWick = (ha30Range > 0) ? (MathMin(g_ha30_open, g_ha30_close) - g_ha30_low) / ha30Range : 0;
  436. bool isStrongTopPhoolbag = topPhoolbag && (topWick > 0.50); // Upper wick 50%+ bada ho
  437. bool isStrongBottomPhoolbag = bottomPhoolbag && (bottomWick > 0.50); // Lower wick 50%+ bada ho
  438.  
  439. // Confluence Counters
  440. int putConfirm = 0;
  441. if(isStrongTopPhoolbag) putConfirm += 3; // Main Phoolbag logic
  442. else if(topPhoolbag) putConfirm += 2;
  443.  
  444. if(diBear) putConfirm++;
  445. if(rsi > 55) putConfirm++;
  446. if(rsi > 65) putConfirm++; // Overbought touch
  447.  
  448. int callConfirm = 0;
  449. if(isStrongBottomPhoolbag) callConfirm += 3; // Main Phoolbag logic
  450. else if(bottomPhoolbag) callConfirm += 2;
  451.  
  452. if(diBull) callConfirm++;
  453. if(rsi < 45) callConfirm++;
  454. if(rsi < 35) callConfirm++; // Oversold touch
  455.  
  456. // ADX Lock
  457. if(!adxValid) { putConfirm = 0; callConfirm = 0; }
  458.  
  459. // Signal Text Formatting
  460. string adxStr = "ADX:"+DoubleToString(adx,0)+(adxValid?"*":"");
  461. string rsiStr = "RSI:"+DoubleToString(rsi,0);
  462. string diStr = (diBull?"DI^":diBear?"DIv":"DI=");
  463. string haStr = isHa30Bull?"HA30:BULL":isHa30Bear?"HA30:BEAR":"HA30:DOJI";
  464.  
  465. // Expire old signals
  466. if(g_bbSignal != "--" && g_bbSignalTime > 0){
  467. int barsElapsed = (int)((TimeCurrent() - g_bbSignalTime) / (Period() * 60));
  468. if(barsElapsed > BB_SIGNAL_EXPIRE_BARS){
  469. g_bbSignal = "--"; g_bbColor = NEON_YELLOW;
  470. g_bbDetail = ""; g_bbTouchPrice = 0.0;
  471. }
  472. }
  473.  
  474. string newSignal = "--";
  475. double touchPriceNew = 0.0;
  476. string detailNew = "";
  477. color newColor = NEON_YELLOW;
  478.  
  479. // --- SIGNAL GENERATION (Strict 2+ Confirmations) ---
  480. if(putConfirm >= 2){
  481. newSignal = "PUT";
  482. touchPriceNew = bbUpper0;
  483. string conf = (putConfirm>=4)?"STRONG PB":(putConfirm>=3)?"GOOD PB":"WEAK PB"; // PB = PhoolBag
  484. detailNew = "PB UP|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr+"|"+haStr;
  485. newColor = (putConfirm >= 3) ? NEON_RED : NEON_ORANGE;
  486. }
  487. else if(callConfirm >= 2){
  488. newSignal = "CALL";
  489. touchPriceNew = bbLower0;
  490. string conf = (callConfirm>=4)?"STRONG PB":(callConfirm>=3)?"GOOD PB":"WEAK PB"; // PB = PhoolBag
  491. detailNew = "PB LO|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr+"|"+haStr;
  492. newColor = (callConfirm >= 3) ? NEON_GREEN : NEON_CYAN;
  493. }
  494.  
  495. // Update Global Signal State
  496. if(newSignal != "--"){
  497. bool isNew = (newSignal != g_bbSignal || touchPriceNew != g_bbTouchPrice);
  498. if(isNew){
  499. g_bbSignal = newSignal;
  500. g_bbTouchPrice = touchPriceNew;
  501. g_bbSignalTime = TimeCurrent();
  502. g_bbDetail = detailNew;
  503. g_bbColor = newColor;
  504. AddBBLine(touchPriceNew, newSignal);
  505. Print("BB PHOOLBAG: ",newSignal," | ",detailNew," Conf:",(newSignal=="PUT"?putConfirm:callConfirm),"/5");
  506. }
  507. } else if(g_bbSignal == "--"){
  508. g_bbColor = NEON_YELLOW;
  509. }
  510.  
  511. DrawBBLines(bbUpper0, bbLower0, bbMid0);
  512. }
  513.  
  514. void DrawBBLines(double upper, double lower, double mid){
  515. if(!ENABLE_BB_PULLBACK) return;
  516. string nmU = PFX+"BB_UPPER"; SafeDel(nmU);
  517. 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); }
  518. string nmL = PFX+"BB_LOWER"; SafeDel(nmL);
  519. 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); }
  520. string nmM = PFX+"BB_MID"; SafeDel(nmM);
  521. 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); }
  522. int dg = (int)MarketInfo(Symbol(), MODE_DIGITS); if(dg <= 0) dg = 5;
  523. string lblU = PFX+"BB_U_LBL"; SafeDel(lblU);
  524. 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); }
  525. }
  526.  
  527. void AddBBLine(double price, string sigType){
  528. if(price <= 0) return;
  529. for(int i = 0; i < MAX_BB_LINES; i++){ SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i)); SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i)); }
  530. g_bbLineCount = 0; g_bbLinePrice[0] = price; g_bbLineExpire[0] = TimeCurrent() + 60 * BB_SIGNAL_EXPIRE_BARS; g_bbLineType[0] = sigType; g_bbLineCount = 1;
  531. DrawAllBBTouchLines();
  532. }
  533.  
  534. void DrawAllBBTouchLines(){
  535. for(int i = 0; i < MAX_BB_LINES; i++){ SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i)); SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i)); }
  536. if(g_bbLineCount > 0 && TimeCurrent() > g_bbLineExpire[0]){ g_bbLineCount = 0; return; }
  537. if(g_bbLineCount <= 0) return;
  538.  
  539. string nm = PFX+"BB_TOUCH_0";
  540. string lbl = PFX+"BB_TOUCH_LBL_0";
  541.  
  542. // FIXED: Dynamic Color based on Signal Type (CALL = Green, PUT = Red)
  543. color lineColor = (g_bbLineType[0]=="CALL") ? NEON_GREEN : NEON_RED;
  544.  
  545. ObjectCreate(0, nm, OBJ_HLINE, 0, 0, g_bbLinePrice[0]);
  546. ObjectSetInteger(0, nm, OBJPROP_COLOR, lineColor); // Fixed line color
  547. ObjectSetInteger(0, nm, OBJPROP_WIDTH, 2);
  548. ObjectSetInteger(0, nm, OBJPROP_STYLE, STYLE_SOLID);
  549. ObjectSetInteger(0, nm, OBJPROP_BACK, false);
  550.  
  551. if(Bars > 3){
  552. string txt = (g_bbLineType[0]=="CALL") ? "PB^ CALL" : "PBv PUT";
  553. ObjectCreate(0, lbl, OBJ_TEXT, 0, Time[3], g_bbLinePrice[0]);
  554. ObjectSetText(lbl, txt, 8, "Arial Bold", lineColor); // Fixed text color
  555. ObjectSetInteger(0, lbl, OBJPROP_BACK, false);
  556. }
  557. }
  558.  
  559. // ============================================================
  560. // BROKER TRAP CALCULATOR
  561. // ============================================================
  562. double CalculateBrokerTrap(double callBias,double putBias){
  563. if(!ENABLE_TRAP_DETECTION||Bars<20) return 0;
  564. double trapScore=0;
  565. bool jpy=(StringFind(Symbol(),"JPY")>=0);
  566. double pip=jpy?0.01:0.0001;
  567. for(int i=1;i<=15&&i<Bars-1;i++){
  568. bool bullEngulf=(Close[i]>Open[i])&&(Close[i-1]<Open[i-1])&&(Close[i]>=Open[i-1])&&(Open[i]<=Close[i-1]);
  569. bool bearEngulf=(Close[i]<Open[i])&&(Close[i-1]>Open[i-1])&&(Close[i]<=Open[i-1])&&(Open[i]>=Close[i-1]);
  570. if(i>=2){
  571. bool mornStar=(Close[i-2]<Open[i-2])&&(MathAbs(Close[i-1]-Open[i-1])<pip*3)&&(Close[i]>Open[i]);
  572. bool eveStar =(Close[i-2]>Open[i-2])&&(MathAbs(Close[i-1]-Open[i-1])<pip*3)&&(Close[i]<Open[i]);
  573. if(i>=3){
  574. if(bullEngulf&&Close[i-3]<Close[i-2]) trapScore+=3.5;
  575. if(bearEngulf&&Close[i-3]>Close[i-2]) trapScore+=3.5;
  576. if(mornStar&&Close[i-3]<Close[i-2]) trapScore+=3.0;
  577. if(eveStar&&Close[i-3]>Close[i-2]) trapScore+=3.0;
  578. }
  579. }
  580. double rng=High[i]-Low[i];
  581. if(rng<=0) continue;
  582. double uw=(High[i]-MathMax(Open[i],Close[i]))/rng;
  583. double lw=(MathMin(Open[i],Close[i])-Low[i])/rng;
  584. if(uw>0.55&&Close[i]<Open[i]) trapScore+=2.0;
  585. if(lw>0.55&&Close[i]>Open[i]) trapScore+=2.0;
  586. }
  587. double rng0=High[0]-Low[0];
  588. if(rng0>0){
  589. double uw0=(High[0]-MathMax(Open[0],Close[0]))/rng0;
  590. double lw0=(MathMin(Open[0],Close[0])-Low[0])/rng0;
  591. if(uw0>0.65&&Close[0]<Open[0]) trapScore+=4.0;
  592. if(lw0>0.65&&Close[0]>Open[0]) trapScore+=4.0;
  593. if(Close[0]>Open[0]&&Close[1]<Open[1]){
  594. if(Close[0]>Open[1]&&Open[0]<Close[1]) trapScore+=3.0;
  595. }
  596. if(Close[0]<Open[0]&&Close[1]>Open[1]){
  597. if(Close[0]<Open[1]&&Open[0]>Close[1]) trapScore+=3.0;
  598. }
  599. }
  600. double biasStr=MathMax(callBias,putBias)-50;
  601. double biasMul=1.0+biasStr/150.0;
  602. if(biasMul>1.5) biasMul=1.5;
  603. if(biasMul<0.5) biasMul=0.5;
  604. trapScore*=biasMul;
  605. return MathMin(100,trapScore);
  606. }
  607.  
  608. // ============================================================
  609. // HA CANDLE CALCULATION (FIXED ARRAY)
  610. // ============================================================
  611. void CalcHA(){
  612. if(Bars<10) return;
  613. bool wasOpenSeries=ArrayGetAsSeries(Open), wasHighSeries=ArrayGetAsSeries(High),
  614. wasLowSeries=ArrayGetAsSeries(Low), wasCloseSeries=ArrayGetAsSeries(Close);
  615. ArraySetAsSeries(Open,true); ArraySetAsSeries(High,true);
  616. ArraySetAsSeries(Low,true); ArraySetAsSeries(Close,true);
  617.  
  618. static double haO1[500], haC1[500];
  619. static datetime lb1=0;
  620. ArraySetAsSeries(haO1,true); ArraySetAsSeries(haC1,true);
  621.  
  622. datetime c1=iTime(NULL,PERIOD_M1,0);
  623. if(c1!=lb1){
  624. lb1=c1;
  625. int lim=MathMin(iBars(NULL,PERIOD_M1),500);
  626. for(int i=lim-1; i>=0; i--){
  627. haC1[i] = (Open[i]+High[i]+Low[i]+Close[i])/4.0;
  628. if(i==lim-1)
  629. haO1[i] = (Open[i]+Close[i])/2.0;
  630. else
  631. haO1[i] = (haO1[i+1] + haC1[i+1])/2.0;
  632. }
  633. }
  634.  
  635. double d1=MathAbs(haC1[1]-haO1[1]), r1=High[1]-Low[1];
  636. bool dz=(r1>0 && d1<r1*0.1), b1=(!dz && haC1[1]>haO1[1]), be1=(!dz && haC1[1]<haO1[1]);
  637. if(b1){ g_haM1="HA BULLISH 1"; g_haM1Color=clrLime; }
  638. else if(be1){ g_haM1="HA BEARISH 1"; g_haM1Color=clrRed; }
  639. else{ g_haM1="HA DOJI 1"; g_haM1Color=clrYellow; }
  640.  
  641. if(iBars(NULL,PERIOD_M5)>=10){
  642. static double haO5[200], haC5[200];
  643. static datetime lb5=0;
  644. ArraySetAsSeries(haO5,true); ArraySetAsSeries(haC5,true);
  645. datetime c5=iTime(NULL,PERIOD_M5,0);
  646. if(c5!=lb5){
  647. lb5=c5;
  648. int lim5=MathMin(iBars(NULL,PERIOD_M5),200);
  649. for(int i=lim5-1; i>=0; i--){
  650. double o=iOpen(NULL,PERIOD_M5,i), h=iHigh(NULL,PERIOD_M5,i),
  651. l=iLow(NULL,PERIOD_M5,i), c=iClose(NULL,PERIOD_M5,i);
  652. haC5[i]=(o+h+l+c)/4.0;
  653. if(i==lim5-1)
  654. haO5[i]=(o+c)/2.0;
  655. else
  656. haO5[i]=(haO5[i+1]+haC5[i+1])/2.0;
  657. }
  658. }
  659. double d5=MathAbs(haC5[1]-haO5[1]), r5=iHigh(NULL,PERIOD_M5,1)-iLow(NULL,PERIOD_M5,1);
  660. bool dz5=(r5>0 && d5<r5*0.1), b5=(!dz5 && haC5[1]>haO5[1]), be5=(!dz5 && haC5[1]<haO5[1]);
  661. if(b5){ g_haM5="HA BULLISH 5"; g_haM5Color=clrLime; }
  662. else if(be5){ g_haM5="HA BEARISH 5"; g_haM5Color=clrRed; }
  663. else{ g_haM5="HA DOJI 5"; g_haM5Color=clrYellow; }
  664.  
  665. if(b1&&b5) g_haBoth="BOTH BULL";
  666. else if(be1&&be5) g_haBoth="BOTH BEAR";
  667. else g_haBoth="MIXED";
  668. } else {
  669. g_haM5="5 --"; g_haM5Color=clrGray; g_haBoth="HA --";
  670. }
  671.  
  672. if(!wasOpenSeries) ArraySetAsSeries(Open,false);
  673. if(!wasHighSeries) ArraySetAsSeries(High,false);
  674. if(!wasLowSeries) ArraySetAsSeries(Low,false);
  675. if(!wasCloseSeries) ArraySetAsSeries(Close,false);
  676. }
  677.  
  678. // ============================================================
  679. // HELPERS
  680. // ============================================================
  681. bool IsLineNearby(double price,double pipTol=3.0){
  682. bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=pipTol*pip;
  683. for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i);
  684. if((int)ObjectGetInteger(0,nm,OBJPROP_TYPE)==OBJ_HLINE){
  685. double lp=ObjectGetDouble(0,nm,OBJPROP_PRICE); if(MathAbs(lp-price)<tol) return true; }}
  686. return false;
  687. }
  688. string GetCurrentSession(color &sC){
  689. int h=TimeHour(TimeGMT());
  690. if(h>=12&&h<16){sC=NEON_GOLD;return "LON+NY";}
  691. if(h>=7&&h<9){sC=NEON_CYAN;return "ASI+LON";}
  692. if(h>=7&&h<16){sC=NEON_GREEN;return "LONDON";}
  693. if(h>=12&&h<21){sC=NEON_BLUE;return "NEW YORK";}
  694. if(h>=0&&h<9){sC=NEON_ORANGE;return "ASIA";}
  695. sC=C'100,100,120'; return "SYDNEY";
  696. }
  697. bool IsSessionActive(){int h=TimeHour(TimeGMT());return(h>=7&&h<=21);}
  698. 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);}
  699. bool CheckMTFConfirmation(){
  700. if(!MTF_CONFIRM) return true;
  701. bool m1Bull=(Close[1]>Open[1]);
  702. bool m5Bull=false,m15Bull=false;
  703. if(iBars(NULL,PERIOD_M5)>=3) m5Bull=(iClose(NULL,PERIOD_M5,1)>iOpen(NULL,PERIOD_M5,1));
  704. if(iBars(NULL,PERIOD_M15)>=3) m15Bull=(iClose(NULL,PERIOD_M15,1)>iOpen(NULL,PERIOD_M15,1));
  705. int bullCount=0,bearCount=0;
  706. if(m1Bull) bullCount++; else bearCount++;
  707. if(m5Bull) bullCount++; else bearCount++;
  708. if(m15Bull) bullCount++; else bearCount++;
  709. g_mtfConfirmed=(bullCount>=2 || bearCount>=2);
  710. return g_mtfConfirmed;
  711. }
  712. double Tanh(double x){double e=MathExp(2.0*x);return(e-1.0)/(e+1.0);}
  713.  
  714. double CalcAdvancedMicroAI(){
  715. if(Bars<20) return 50.0;
  716. double score=50.0;
  717. bool jpy=(StringFind(Symbol(),"JPY")>=0);
  718. double pip=jpy?0.01:0.0001;
  719. for(int i=1;i<=5;i++){
  720. double r=High[i]-Low[i]; if(r<=0) continue;
  721. double uw=(High[i]-MathMax(Open[i],Close[i]))/r;
  722. double lw=(MathMin(Open[i],Close[i])-Low[i])/r;
  723. double w=(6.0-i)/5.0;
  724. if(uw>0.65) score-=w*18; else if(uw>0.50) score-=w*10;
  725. if(lw>0.65) score+=w*18; else if(lw>0.50) score+=w*10;
  726. }
  727. double pos5=0;
  728. for(int i=1;i<=5;i++){double r=High[i]-Low[i]; if(r<=0) continue; pos5+=(Close[i]-Low[i])/r; }
  729. score+=(pos5/5.0-0.5)*25.0;
  730. double gc=0,rc=0;
  731. for(int i=1;i<=8;i++){double w=(9.0-i)/8.0; if(Close[i]>Open[i]) gc+=w; else if(Close[i]<Open[i]) rc+=w;}
  732. score+=(gc-rc)*4.0;
  733. double vl1=(double)iVolume(NULL,PERIOD_M1,1),vA=0;
  734. for(int i=2;i<=6;i++) vA+=iVolume(NULL,PERIOD_M1,i);
  735. vA/=5.0;
  736. if(vA>0){double vr=vl1/vA; if(vr>2.0&&Close[1]>Open[1]) score+=12; else if(vr>2.0&&Close[1]<Open[1]) score-=12; else if(vr>1.5&&Close[1]>Open[1]) score+=7; else if(vr>1.5&&Close[1]<Open[1]) score-=7;}
  737. double r1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  738. double r5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
  739. if(r1<30) score+=15; else if(r1<40) score+=7;
  740. if(r1>70) score-=15; else if(r1>60) score-=7;
  741. if(r1>r5&&Close[1]<Close[5]) score+=8;
  742. if(r1<r5&&Close[1]>Close[5]) score-=8;
  743. if(g_nearest_res>0){double distR=(g_nearest_res-Close[0])/pip; if(distR<5) score-=12; else if(distR<10) score-=6;}
  744. if(g_nearest_sup>0){double distS=(Close[0]-g_nearest_sup)/pip; if(distS<5) score+=12; else if(distS<10) score+=6;}
  745. if(Close[0]>Open[0]&&Close[1]>Open[1]) score+=5;
  746. if(Close[0]<Open[0]&&Close[1]<Open[1]) score-=5;
  747. return MathMax(5.0,MathMin(95.0,score));
  748. }
  749.  
  750. int CalcAdvancedMicroTrap(){
  751. if(Bars<20) return 0;
  752. int score=0;
  753. bool jpy=(StringFind(Symbol(),"JPY")>=0);
  754. double pip=jpy?0.01:0.0001;
  755. double r1=High[1]-Low[1];
  756. if(r1>0){
  757. double uw1=(High[1]-MathMax(Open[1],Close[1]))/r1;
  758. double lw1=(MathMin(Open[1],Close[1])-Low[1])/r1;
  759. if(uw1>0.65) score+=35; else if(uw1>0.50) score+=18;
  760. if(lw1>0.65) score+=25; else if(lw1>0.50) score+=12;
  761. }
  762. double r0=High[0]-Low[0];
  763. if(r0>0){double uw0=(High[0]-MathMax(Open[0],Close[0]))/r0; double lw0=(MathMin(Open[0],Close[0])-Low[0])/r0; if(uw0>0.60) score+=15; if(lw0>0.60) score+=10;}
  764. double v1=(double)iVolume(NULL,PERIOD_M1,1); double v2=(double)iVolume(NULL,PERIOD_M1,2); double v3=(double)iVolume(NULL,PERIOD_M1,3); double vAvg=(v2+v3)/2.0;
  765. if(vAvg>0){double vr=v1/vAvg; if(vr>3.0) score+=30; else if(vr>2.0) score+=22; else if(vr>1.5) score+=12;}
  766. double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  767. if(rsi>82||rsi<18) score+=25; else if(rsi>75||rsi<25) score+=18; else if(rsi>70||rsi<30) score+=10;
  768. if(g_nearest_res>0 && (High[1]>g_nearest_res && Close[1]<g_nearest_res)) score+=30;
  769. if(g_nearest_sup>0 && (Low[1]<g_nearest_sup && Close[1]>g_nearest_sup)) score+=30;
  770. bool aG=(Close[1]>Open[1] && Close[2]>Open[2] && Close[3]>Open[3]);
  771. bool aR=(Close[1]<Open[1] && Close[2]<Open[2] && Close[3]<Open[3]);
  772. if(aG||aR) score+=18;
  773. if(Bars>=5){bool aG4=(aG && Close[4]>Open[4]); bool aR4=(aR && Close[4]<Open[4]); if(aG4||aR4) score+=10;}
  774. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
  775. if(sp>BROKER_SPREAD_THRESHOLD*2.0) score+=15; else if(sp>BROKER_SPREAD_THRESHOLD*1.5) score+=8;
  776. if(g_hrn_price>0){double distH=MathAbs(Close[0]-g_hrn_price)/pip; if(distH<3) score+=20; else if(distH<7) score+=10;}
  777. return MathMin(100,score);
  778. }
  779.  
  780. double CalcAdvancedTFA(string &detail){
  781. if(Bars<30){detail="Bars low";return 3.0;}
  782. double score=0;string p="";
  783. double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);
  784. double adxSc=(adx>=25)?1.0:(adx>=20)?0.6:(adx>=15)?0.3:0.1;
  785. score+=adxSc;p+="ADX:"+((adxSc>=0.6)?"+":"-")+" ";
  786. double v1=iVolume(NULL,PERIOD_M1,1),vA=0;
  787. for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);
  788. vA=(vA>0)?vA/5.0:1;double vr=v1/vA;
  789. double volSc=(vr>=2.0)?1.0:(vr>=1.5)?0.7:(vr>=1.1)?0.4:0.1;
  790. score+=volSc;p+="VOL:"+((volSc>=0.5)?"+":"-")+" ";
  791. double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  792. double rsiSc=0.2;if(rsi>=60||rsi<=40)rsiSc=1.0;else if(rsi>=55||rsi<=45)rsiSc=0.6;
  793. score+=rsiSc;p+="RSI:"+((rsiSc>=0.6)?"+":"-")+" ";
  794. double atr=iATR(NULL,PERIOD_M1,14,1),cs=High[1]-Low[1],atrSc=0.2;
  795. 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;}
  796. score+=atrSc;p+="ATR:"+((atrSc>=0.6)?"+":"-")+" ";
  797. double body=MathAbs(Close[1]-Open[1]),range=High[1]-Low[1],bdySc=0.2;
  798. 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;}
  799. score+=bdySc;p+="BODY:"+((bdySc>=0.6)?"+":"-")+" ";
  800. double sesSc=IsSessionActive()?1.0:0.4;
  801. score+=sesSc;p+="SES:"+((sesSc>=0.7)?"+":"-");
  802. double finalScore=MathMin(6.0,score);int rounded=(int)MathRound(finalScore);
  803. string dir="MIX";
  804. if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")dir="STRONG UP";
  805. else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")dir="STRONG DOWN";
  806. else if(g_haM1=="HA BULLISH 1")dir="UP";
  807. else if(g_haM1=="HA BEARISH 1")dir="DOWN";
  808. detail=p+" | "+IntegerToString(rounded)+"/6 "+dir;
  809. g_tfa_detail=detail;return finalScore;
  810. }
  811.  
  812. string CalcAdvancedMarketBias(color &bC,double brain,double rsc){
  813. if(Bars<30){bC=NEON_YELLOW;return "CALCULATING";}
  814. double score=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  815. double pc=Close[0]-Close[10];
  816. 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;
  817. double hh1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hh2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
  818. double ll1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],ll2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
  819. 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;
  820. double ema20=0,ema20p=0;for(int i=0;i<20;i++)ema20+=Close[i];ema20/=20;
  821. for(int i=1;i<=20&&i<Bars;i++)ema20p+=Close[i];ema20p/=20;
  822. if(ema20>ema20p)score+=3;else if(ema20<ema20p)score-=3;
  823. double ema50=0;for(int i=0;i<50&&i<Bars;i++)ema50+=Close[i];ema50/=MathMin(50,Bars);
  824. if(ema20>ema50)score+=3;else score-=3;
  825. 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++;}
  826. if(gC>=7)score+=3;else if(rC>=7)score-=3;else if(gC>=5)score+=1;else if(rC>=5)score-=1;
  827. 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");
  828. if(m1B&&m5B)score+=4;else if(m1Be&&m5Be)score-=4;else if(m1B)score+=2;else if(m1Be)score-=2;
  829. 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);
  830. if(adx>20){if(pDI>mDI+5)score+=4;else if(mDI>pDI+5)score-=4;}
  831. if(brain>3)score-=2;else if(brain<-3)score+=2;
  832. if(Close[1]>Open[1])score+=1;else if(Close[1]<Open[1])score-=1;
  833. if(rsc>2)score+=1;else if(rsc<-2)score-=1;
  834. 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";}
  835. 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";}
  836. bC=NEON_YELLOW;return "NEUTRAL";
  837. }
  838.  
  839. void CalcAdvancedPrediction(double &gP,double &rP,string &reason,color &pC){
  840. if(Bars<50){gP=50;rP=50;reason="Bars low";pC=NEON_YELLOW;return;}
  841. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  842. double green=0,red=0;
  843. double body1=MathAbs(Close[1]-Open[1]),range1=High[1]-Low[1];
  844. if(range1>0){double uw=High[1]-MathMax(Open[1],Close[1]),lw=MathMin(Open[1],Close[1])-Low[1];
  845. if(uw>range1*0.60&&Close[1]>Open[1])red+=22;else if(lw>range1*0.60&&Close[1]<Open[1])green+=22;
  846. else if((uw+lw)/range1>0.55){if(uw>lw)red+=12;else green+=12;}}
  847. 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);
  848. int os=0,ob=0;
  849. 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++;
  850. if(os>=3)green+=18;else if(os>=2)green+=12;else if(ob>=3)red+=18;else if(ob>=2)red+=12;
  851. double rsiPrev=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
  852. double low1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],low2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
  853. double high1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],high2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
  854. if(low1<low2&&rsi>rsiPrev&&rsi<45)green+=15;if(high1>high2&&rsi<rsiPrev&&rsi>55)red+=15;
  855. 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;
  856. double vol_ratio=(vAvg>0)?v1/vAvg:1.0;
  857. 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;}
  858. 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;
  859. double m1_haO2=(Open[3]+Close[3])/2.0,m1_haO1=(m1_haO2+m1_haC2)/2.0;
  860. bool haBull1=(m1_haC1>m1_haO1);
  861. double haStr1=MathAbs(m1_haC1-m1_haO1)/(High[1]-Low[1]+0.00001);
  862. bool haBull5=false;double haStr5=0;
  863. if(iBars(NULL,PERIOD_M5)>=5){
  864. 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);
  865. 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);
  866. double o3=iOpen(NULL,PERIOD_M5,3),c3=iClose(NULL,PERIOD_M5,3);
  867. 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;
  868. haBull5=(haC1_5>haO1_5);haStr5=MathAbs(haC1_5-haO1_5)/(h1-l1+0.00001);}
  869. if(haBull1&&haBull5)green+=15;else if(!haBull1&&!haBull5)red+=15;
  870. else if(haBull1&&haStr1>0.5)green+=8;else if(!haBull1&&haStr1>0.5)red+=8;
  871. 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);
  872. double diDiff=plusDI-minusDI;
  873. 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;}
  874. else if(adx>15){if(plusDI>minusDI)green+=4;else red+=4;}
  875. double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,20,2)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,20,2)];
  876. double dR=(res-Close[0])/pip,dS=(Close[0]-sup)/pip;
  877. if(dR<8&&dR>=0)red+=12;else if(dR<15&&dR>=0)red+=6;
  878. if(dS<8&&dS>=0)green+=12;else if(dS<15&&dS>=0)green+=6;
  879. 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;}}
  880. 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);
  881. 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);
  882. if(macdMain>macdSig&&macdPrev<=macdSigPrev)green+=10;else if(macdMain<macdSig&&macdPrev>=macdSigPrev)red+=10;
  883. else if(macdMain>macdSig)green+=5;else if(macdMain<macdSig)red+=5;
  884. if(ENABLE_BB_PULLBACK&&g_bbSignal=="CALL")green+=12; else if(ENABLE_BB_PULLBACK&&g_bbSignal=="PUT")red+=12;
  885. double diff=MathMax(-100.0,MathMin(100.0,green-red));
  886. gP=MathMax(8.0,MathMin(92.0,50.0+diff*0.65));rP=100.0-gP;
  887. double dom=MathMax(gP,rP);
  888. if(dom>=82){reason=(gP>rP)?"STRONG GREEN":"STRONG RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
  889. else if(dom>=72){reason=(gP>rP)?"GREEN":"RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
  890. else if(dom>=60){reason=(gP>rP)?"WEAK GREEN":"WEAK RED";pC=(gP>rP)?NEON_CYAN:NEON_ORANGE;}
  891. else{reason="WAIT";pC=NEON_YELLOW;}
  892. }
  893.  
  894. string DetectMyStrategy(){
  895. int cc=g_otcCallPct,cp=g_otcPutPct,thr=STRATEGY_THRESHOLD;
  896. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TRAP_ONLY"){
  897. if(cc>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TRAP";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA RED";return "PUT";}
  898. if(cp>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TRAP";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA GREEN";return "CALL";}}
  899. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TREND_ONLY"){
  900. if(cc>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TREND";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA GREEN";return "CALL";}
  901. if(cp>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TREND";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA RED";return "PUT";}}
  902. g_strategyType="NONE";g_strategyReason="Wait "+IntegerToString(thr)+"% + HA";return "WAIT";
  903. }
  904.  
  905. void CalcOTCCrowd(){
  906. int cS=0,pS=0;int weights[15];
  907. for(int w=0;w<15;w++)weights[w]=15-w*2;
  908. for(int w=0;w<15;w++)if(weights[w]<1)weights[w]=1;
  909. for(int i=1;i<=15&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
  910. double uw=(High[i]-MathMax(Open[i],Close[i]))/rg,lw=(MathMin(Open[i],Close[i])-Low[i])/rg;int wgt=weights[i-1];
  911. if(uw>0.70&&Close[i]<Open[i])cS+=4*wgt;if(lw>0.70&&Close[i]>Open[i])pS+=4*wgt;
  912. if(uw>0.55&&Close[i]<Open[i])cS+=2*wgt;if(lw>0.55&&Close[i]>Open[i])pS+=2*wgt;
  913. if(Close[i]>Open[i])cS+=1*wgt;else if(Close[i]<Open[i])pS+=1*wgt;}
  914. int tot=cS+pS;if(tot==0){g_otcCallPct=50;g_otcPutPct=50;}
  915. else{int rC=(int)(cS*100.0/tot),rP=100-rC;
  916. if(rC>=rP){g_otcCallPct=MathMax(50,rC);g_otcPutPct=100-g_otcCallPct;}
  917. else{g_otcPutPct=MathMax(50,rP);g_otcCallPct=100-g_otcPutPct;}}
  918. }
  919.  
  920. // ============================================================
  921. // BRAIN AI
  922. // ============================================================
  923. double BrainSc(int &cp){
  924. double s=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001;
  925. if(g_nearest_res>0){double dR=(g_nearest_res-Close[0])/pip; if(dR<5) s-=3; else if(dR<15) s-=1;}
  926. if(g_nearest_sup>0){double dS=(Close[0]-g_nearest_sup)/pip; if(dS<5) s+=3; else if(dS<15) s+=1;}
  927. if(g_nearest_res>0&&High[1]>g_nearest_res){double bodyH=MathMax(Open[1],Close[1]); if(bodyH>g_nearest_res+2*pip) s-=4; else s+=2;}
  928. if(g_nearest_sup>0&&Low[1]<g_nearest_sup){double bodyL=MathMin(Open[1],Close[1]); if(bodyL<g_nearest_sup-2*pip) s+=4; else s-=2;}
  929. double atr=iATR(NULL,PERIOD_M1,14,1);
  930. if(atr>0){double cn=(High[1]-Low[1])/atr; double v1=(double)iVolume(NULL,PERIOD_M1,1); double 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.0; if(cn>1.3&&vr>1.8){if(Close[1]>Open[1]) s-=2; else s+=2;}}
  931. int c=0; for(int i=1;i<=30;i++) if(Close[i]>Open[i]) c++; cp=(int)(c*100.0/30.0);
  932. if(cp>=80) s-=4; else if(cp>=75) s-=2; else if(cp<=20) s+=4; else if(cp<=25) s+=2;
  933. int dj=0; double wickBull=0,wickBear=0;
  934. for(int i=1;i<=8;i++){double bd=MathAbs(Close[i]-Open[i]); double rg=High[i]-Low[i]; if(rg<=0) continue; if(bd<rg*0.2) dj++; double uw=High[i]-MathMax(Open[i],Close[i]); double lw=MathMin(Open[i],Close[i])-Low[i]; double w=(9.0-i)/8.0; if(uw>bd*2) wickBear+=w; if(lw>bd*2) wickBull+=w;}
  935. if(wickBull>wickBear+1.0) s+=3; else if(wickBear>wickBull+1.0) s-=3;
  936. if(dj>=4) s*=0.8;
  937. int bu=0,be=0; for(int i=1;i<=8;i++){if(Close[i]>Open[i]){bu++;be=0;} else if(Close[i]<Open[i]){be++;bu=0;} else {bu=0;be=0;} if(bu>=6) s-=3; if(be>=6) s+=3;}
  938. double ema10=0; for(int i=0;i<10&&i<Bars;i++) ema10+=Close[i]; ema10/=10.0; double ema20=0; for(int i=0;i<20&&i<Bars;i++) ema20+=Close[i]; ema20/=20.0;
  939. if(ema10>ema20&&ema10-ema20>3*pip&&s<-2) s*=0.7; if(ema10<ema20&&ema20-ema10>3*pip&&s>2) s*=0.7;
  940. int h=TimeHour(TimeCurrent()); double mul=1.0; if((h>=8&&h<=11)||(h>=14&&h<=17)) mul=1.1; if(h>=3&&h<=7) mul=0.9; return s*mul;
  941. }
  942.  
  943. // ============================================================
  944. // S/R LEVELS - STABLE VERSION WITH CHART LABELS
  945. // ============================================================
  946. void AddStableRes(double lv){if(lv<=0)return; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=5.0*pip; for(int i=0;i<g_stableResCount;i++){if(MathAbs(g_stableRes[i]-lv)<tol)return;} if(g_stableResCount<10){g_stableRes[g_stableResCount]=lv;g_stableResCount++;} else{for(int i=0;i<9;i++)g_stableRes[i]=g_stableRes[i+1]; g_stableRes[9]=lv;}}
  947. void AddStableSup(double lv){if(lv<=0)return; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=5.0*pip; for(int i=0;i<g_stableSupCount;i++){if(MathAbs(g_stableSup[i]-lv)<tol)return;} if(g_stableSupCount<10){g_stableSup[g_stableSupCount]=lv;g_stableSupCount++;} else{for(int i=0;i<9;i++)g_stableSup[i]=g_stableSup[i+1]; g_stableSup[9]=lv;}}
  948. void AddRes(double lv){AddStableRes(lv);} void AddSup(double lv){AddStableSup(lv);}
  949.  
  950. void UpdateSR(){
  951. if(Time[0]==g_lastSRScan) return; static int barCount=0; barCount++; if(barCount<g_srScanInterval) return; barCount=0; g_lastSRScan=Time[0]; if(Bars<30) return;
  952. bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double cur=Close[0];
  953. for(int i=3;i<=25&&i<Bars-2;i++){double h=High[i]; if(h>High[i-1]&&h>High[i-2]&&h>High[i+1]&&h>High[i+2]){if(h>cur+3*pip){double body=MathMax(Open[i],Close[i]); if(body>h-10*pip){AddStableRes(h);}}}}
  954. for(int i=3;i<=25&&i<Bars-2;i++){double l=Low[i]; if(l<Low[i-1]&&l<Low[i-2]&&l<Low[i+1]&&l<Low[i+2]){if(l<cur-3*pip){double body=MathMin(Open[i],Close[i]); if(body<l+10*pip){AddStableSup(l);}}}}
  955. double rndStep=50*pip; double nearRnd=MathRound(cur/rndStep)*rndStep; for(int k=-1;k<=1;k++){double lv=nearRnd+k*rndStep; if(MathAbs(cur-lv)<30*pip){if(lv>cur)AddStableRes(lv); else AddStableSup(lv);}}
  956. DrawNearestSR(); CheckBRK();
  957. }
  958.  
  959. void DrawNearestSR(){
  960. for(int i=0;i<20;i++){SafeDel(PFX+"RES_"+IntegerToString(i));SafeDel(PFX+"SUP_"+IntegerToString(i));}
  961. SafeDel(PFX+"NEAREST_RES"); SafeDel(PFX+"NEAREST_SUP");
  962. SafeDel(PFX+"NEAREST_RES_LBL"); SafeDel(PFX+"NEAREST_SUP_LBL");
  963.  
  964. double cur=Close[0]; g_nearest_res=0; g_nearest_sup=0; double minResDist=999999; double minSupDist=999999;
  965. for(int i=0;i<g_stableResCount;i++){if(g_stableRes[i]>cur){double d=g_stableRes[i]-cur; if(d<minResDist){minResDist=d; g_nearest_res=g_stableRes[i];}}}
  966. for(int i=0;i<g_stableSupCount;i++){if(g_stableSup[i]<cur){double d=cur-g_stableSup[i]; if(d<minSupDist){minSupDist=d; g_nearest_sup=g_stableSup[i];}}}
  967.  
  968. // Draw lines and SHORT PRICE labels on chart
  969. if(g_nearest_res > 0){
  970. DrawHLine(PFX+"NEAREST_RES", g_nearest_res, NEON_BLUE, 2, STYLE_DASH);
  971. ObjectCreate(0, PFX+"NEAREST_RES_LBL", OBJ_TEXT, 0, Time[5], g_nearest_res);
  972. ObjectSetText(PFX+"NEAREST_RES_LBL", ShortPrice(g_nearest_res), 9, "Arial Bold", NEON_BLUE);
  973. ObjectSetInteger(0, PFX+"NEAREST_RES_LBL", OBJPROP_BACK, false);
  974. }
  975. if(g_nearest_sup > 0){
  976. DrawHLine(PFX+"NEAREST_SUP", g_nearest_sup, NEON_BLUE, 2, STYLE_DASH);
  977. ObjectCreate(0, PFX+"NEAREST_SUP_LBL", OBJ_TEXT, 0, Time[5], g_nearest_sup);
  978. ObjectSetText(PFX+"NEAREST_SUP_LBL", ShortPrice(g_nearest_sup), 9, "Arial Bold", NEON_BLUE);
  979. ObjectSetInteger(0, PFX+"NEAREST_SUP_LBL", OBJPROP_BACK, false);
  980. }
  981. }
  982.  
  983. 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;}}
  984.  
  985. // ============================================================
  986. // MICRO WICK & VOLUME TRAP
  987. // ============================================================
  988. 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;}
  989. double VolumeTrapScore(){
  990. if(!VOLUME_PROFILE_TRAP||Bars<50)return 0;
  991. double cur=Close[0],hi=High[iHighest(NULL,0,MODE_HIGH,50,1)],lo=Low[iLowest(NULL,0,MODE_LOW,50,1)];
  992. 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};
  993. 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]++;}
  994. for(int z=0;z<zn;z++)if(zc[z]>0)vz[z]/=zc[z];
  995. int cz=(int)((cur-lo)/zs);if(cz<0)cz=0;if(cz>=zn)cz=zn-1;
  996. double vr=(double)Volume[1]/(vz[cz]+0.001);double wr=MicroWick();
  997. if(vr>2.0&&wr>0.65)return 25;if(vr>1.8&&wr>0.55)return 15;return 0;
  998. }
  999. double UltimateTrapScore(){double wr=MicroWick(),v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  1000. double avg=v2>0?v2:1.0,vr=v1/avg,rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),sc=0.0;
  1001. if(wr>0.65)sc+=40;if(vr>2.0)sc+=30;if(rsi>75||rsi<25)sc+=20;
  1002. if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))sc+=25;
  1003. sc+=VolumeTrapScore();return MathMin(100.0,sc);}
  1004. bool IsBrokerForce(double dummy=0){
  1005. int sd=0;for(int i=1;i<=3;i++){if(Close[i]>Open[i])sd++;else sd--;}
  1006. double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  1007. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
  1008. return(MathAbs(sd)==3&&v1>v2*2.0&&sp>BROKER_SPREAD_THRESHOLD);}
  1009.  
  1010. // ============================================================
  1011. // NEURAL AI
  1012. // ============================================================
  1013. double NeuralBiasFast(){double r=NeuralBias(0)*0.3+NeuralBias(1)*0.7;if(r>96)r=96;if(r<4)r=4;return r;}
  1014. double NeuralBias(int s){double f[8];f[0]=fDoji(s);f[1]=fWick(s);f[2]=fVol();f[3]=fMom(s);f[4]=fSpread();f[5]=fMem(s);f[6]=fTick(s);f[7]=fFrac(s);for(int i=0;i<8;i++) f[i]/=100.0;double h[4];for(int i=0;i<4;i++){double sum=0;for(int j=0;j<8;j++) sum+=f[j]*NW[j*4+i];h[i]=MathMax(0,sum-0.06);}double out=0;for(int i=0;i<4;i++) out+=h[i]*NW[32+i];double result=50.0+out*22.0;return(result>96)?96:((result<4)?4:result);}
  1015. double fDoji(int s){if(s+8>=Bars)return 0;double score=0;int streak=0;for(int i=s;i<s+8&&i<Bars;i++){double body=MathAbs(Open[i]-Close[i]);double range=High[i]-Low[i];if(range<=0)continue;double ratio=body/range;double w=(9.0-(i-s))/8.0;if(ratio<0.15){score+=18*w;streak++;double lw=MathMin(Open[i],Close[i])-Low[i];if(lw>range*0.55)score+=12*w;double uw=High[i]-MathMax(Open[i],Close[i]);if(uw>range*0.55)score-=8*w;}else if(ratio<0.25){score+=8*w;streak++;}}if(streak>=3)score+=15;else if(streak>=2)score+=8;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];if(g_nearest_res>0&&(g_nearest_res-cur)<8*pip)score+=12;if(g_nearest_sup>0&&(cur-g_nearest_sup)<8*pip)score+=12;if(g_hrn_price>0&&MathAbs(cur-g_hrn_price)<5*pip)score+=10;return MathMin(100,score);}
  1016. double fWick(int s){double range=High[s]-Low[s];if(range==0)return 0;double u=(High[s]-MathMax(Open[s],Close[s]))/range;double l=(MathMin(Open[s],Close[s])-Low[s])/range;bool closedRed=(Close[s]<Open[s]);double score=0;if(u>0.65&&!closedRed)score=95;else if(u>0.50&&!closedRed)score=70;else if(l>0.65&&closedRed)score=90;else if(l>0.50&&closedRed)score=65;else if(u>0.65||l>0.65)score=50;else if(u>0.50||l>0.50)score=30;if(score>=50){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];if(g_nearest_res>0&&(g_nearest_res-cur)<10*pip)score+=15;if(g_nearest_sup>0&&(cur-g_nearest_sup)<10*pip)score+=15;}return MathMin(100,score);}
  1017. double fVol(){if(Bars<15)return 0;double cur=(double)iVolume(NULL,PERIOD_M1,0);double avg=0;for(int i=1;i<=10;i++)avg+=iVolume(NULL,PERIOD_M1,i);avg/=10.0;if(avg==0)return 0;double ratio=cur/avg;double score=0;if(ratio>3.0)score=95;else if(ratio>2.5)score=85;else if(ratio>2.0)score=75;else if(ratio>1.5)score=50;else if(ratio>1.2)score=30;if(ratio<0.7)score=MathMin(score,15);return MathMin(100,score);}
  1018. double fMom(int s){if(s+5>=Bars)return 0;double m1=(Close[s]-Close[s+1]);double m2=(Close[s+1]-Close[s+2]);double m3=(Close[s+2]-Close[s+3]);bool shift=false;if(m1>0&&m2<0&&m3<0)shift=true;if(m1<0&&m2>0&&m3>0)shift=true;double accel=MathAbs(m1)-MathAbs(m2);double body1=MathAbs(Close[s]-Open[s]);double body2=MathAbs(Close[s+1]-Open[s+1]);double body3=MathAbs(Close[s+2]-Open[s+2]);double score=0;if(shift){score=88;if(accel>0)score+=12;}if(body1<body2&&body2<body3&&body3>0){score=60;if(body1<body2*0.5)score=80;}bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;if(MathAbs(m2)>3*pip&&MathAbs(m1)<pip)score=75;return MathMin(100,score);}
  1019. double fSpread(){double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);double typical=3.0;double ratio=sp/typical;double score=0;if(ratio>3.0)score=95;else if(ratio>2.5)score=85;else if(ratio>2.0)score=75;else if(ratio>1.5)score=50;else if(ratio>1.2)score=30;int h=TimeHour(TimeGMT());if((h>=0&&h<=3)||(h>=12&&h<=14))score+=10;return MathMin(100,score);}
  1020. double fMem(int s){if(s+10>=Bars)return 0;bool bullEng=(Close[s]>Open[s])&&(Close[s+1]<Open[s+1])&&(Close[s]>=Open[s+1])&&(Open[s]<=Close[s+1]);bool bearEng=(Close[s]<Open[s])&&(Close[s+1]>Open[s+1])&&(Close[s]<=Open[s+1])&&(Open[s]>=Close[s+1]);double range=High[s]-Low[s];if(range<=0)return 0;double body=MathAbs(Close[s]-Open[s]);double upperW=High[s]-MathMax(Open[s],Close[s]);double lowerW=MathMin(Open[s],Close[s])-Low[s];bool pinUp=(body<range*0.3&&lowerW>range*0.5);bool pinDn=(body<range*0.3&&upperW>range*0.5);double score=0;if(bullEng)score=85;else if(bearEng)score=85;else if(pinUp)score=80;else if(pinDn)score=80;if(score>=50){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];if(g_nearest_res>0&&(g_nearest_res-cur)<10*pip)score+=15;if(g_nearest_sup>0&&(cur-g_nearest_sup)<10*pip)score+=15;}return MathMin(100,score);}
  1021. double fTick(int s){if(s+5>=Bars)return 0;double volN=(double)iVolume(NULL,PERIOD_M1,s);double volP=(double)iVolume(NULL,PERIOD_M1,s+1);if(volP==0)return 0;double volRatio=volN/volP;double priceMove=MathAbs(Close[s]-Close[s+1]);double pricePct=Close[s+1]>0?priceMove/Close[s+1]*100:0;double score=0;if(volRatio>2.0&&pricePct<0.1)score=85;else if(volRatio>1.5&&pricePct<0.05)score=60;else if(volRatio>1.2&&pricePct<0.03)score=35;return MathMin(100,score);}
  1022. double fFrac(int s){if(s+4>=Bars||s<2)return 0;bool fHigh=(High[s]>High[s-1]&&High[s]>High[s-2]&&High[s]>High[s+1]&&High[s]>High[s+2]);bool fLow=(Low[s]<Low[s-1]&&Low[s]<Low[s-2]&&Low[s]<Low[s+1]&&Low[s]<Low[s+2]);if(!fHigh&&!fLow)return 0;double score=0;if(fHigh){score=70;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double dist=MathAbs(High[s]-Close[0])/pip;if(dist<15)score+=20;else if(dist<30)score+=10;if(Close[s]<High[s])score+=15;}if(fLow){score=70;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double dist=MathAbs(Low[s]-Close[0])/pip;if(dist<15)score+=20;else if(dist<30)score+=10;if(Close[s]>Low[s])score+=15;}return MathMin(100,score);}
  1023. void InitNW(){NW[0]=0.80;NW[1]=0.90;NW[2]=0.40;NW[3]=0.85;NW[4]=0.70;NW[5]=0.60;NW[6]=0.30;NW[7]=0.20;NW[8]=0.30;NW[9]=0.60;NW[10]=0.70;NW[11]=0.40;NW[12]=0.50;NW[13]=0.65;NW[14]=0.25;NW[15]=0.35;NW[16]=0.75;NW[17]=0.70;NW[18]=0.50;NW[19]=0.90;NW[20]=0.30;NW[21]=0.20;NW[22]=0.60;NW[23]=0.40;NW[24]=0.85;NW[25]=0.65;NW[26]=0.30;NW[27]=0.80;NW[28]=0.25;NW[29]=0.30;NW[30]=0.70;NW[31]=0.35;NW[32]=1.30;NW[33]=-0.80;NW[34]=1.10;NW[35]=-0.95;}
  1024.  
  1025. void CalcPrediction(double brain,double nb,int cp,double mai,int mts,double rsc,bool bf,double mw){
  1026. string ms=DetectMyStrategy();bool sA=(ms!="WAIT");
  1027. 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;}}
  1028. double tS=UltimateTrapScore();bool bF2=IsBrokerForce();
  1029. 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;}}
  1030. 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;}
  1031. double gS=0,rS=0,ab=MathMax(0.70,MathMin(1.30,g_accuracy/65.0));
  1032. 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;}
  1033. 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;}}
  1034. 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;
  1035. if(HA_ALIGN_FILTER&&g_haBoth=="MIXED"){gS*=0.5;rS*=0.5;}
  1036. gS+=(nb-50)/50.0*22*ab;rS-=(nb-50)/50.0*22*ab;
  1037. double bn=MathMax(-1.0,MathMin(1.0,brain/10.0));gS+=bn*15*ab;rS-=bn*15*ab;
  1038. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  1039. 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;
  1040. double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi1>70)rS+=6;if(rsi1<30)gS+=6;
  1041. double sn=MathMax(-1.0,MathMin(1.0,rsc/3.0));gS+=sn*8*ab;rS-=sn*8*ab;
  1042. if(ENABLE_BB_PULLBACK){if(g_bbSignal=="CALL")gS+=18*ab;else if(g_bbSignal=="PUT")rS+=18*ab;}
  1043. int rd=DetectRSIDivergence();if(rd==1)gS+=20;if(rd==-1)rS+=20;
  1044. int sk=StreakReversalSignal();if(sk==1)gS+=18;if(sk==-1)rS+=18;
  1045. 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;}
  1046. int vs=SmartVolumeSignal();if(vs==1)gS+=12;if(vs==-1)rS+=12;
  1047. if(!IsVolatilityGood()){gS*=0.5;rS*=0.5;}
  1048. double diff=MathMax(-100.0,MathMin(100.0,gS-rS));
  1049. g_gProb=MathMax(8.0,MathMin(92.0,50.0+(diff/1.8)));g_rProb=100.0-g_gProb;
  1050. double dom=MathMax(g_gProb,g_rProb);
  1051. 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;}}}
  1052. 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;}}}
  1053. else{if(!sA){g_pAction="WAIT";g_pColor=NEON_YELLOW;}}
  1054. g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;
  1055. }
  1056.  
  1057. // ============================================================
  1058. // COMMON POINTS & WICK REJECTIONS
  1059. // ============================================================
  1060. 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--;}}
  1061. 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);}}
  1062. 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--;}}
  1063. 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);}}
  1064. 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));}
  1065. 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));}
  1066. // ============================================================
  1067. // OTC BROKER KILLER v4.0 - PROFESSIONAL TRAP ENGINE
  1068. // ============================================================
  1069. void CalcVisualTrapPro(){
  1070. // Reset
  1071. g_visualTrapPro.boxStatus="NO BOX"; g_visualTrapPro.gannStatus="--";
  1072. g_visualTrapPro.m30Dir="M30: --"; g_visualTrapPro.m1Seq="M1: --";
  1073. g_visualTrapPro.verdict="SCANNING"; g_visualTrapPro.verdictColor=CGR;
  1074. g_visualTrapPro.callBias=50.0; g_visualTrapPro.putBias=50.0; g_visualTrapPro.trapScore=0;
  1075. g_visualTrapPro.buySignal=false; g_visualTrapPro.sellSignal=false;
  1076.  
  1077. // Cleanup
  1078. SafeDel(PFX+"VBOX"); SafeDel(PFX+"VMID"); SafeDel(PFX+"VSIG");
  1079.  
  1080. bool isJpy=(StringFind(Symbol(),"JPY")>=0); double pip=isJpy?0.01:0.0001;
  1081. int BOX_C=25; double MIN_P=4.0, MAX_P=30.0;
  1082. // --- MULTI-PAIR BACKGROUND SCANNER ---
  1083. string scanPairs[4] = {"EURUSD", "GBPUSD", "EURJPY", "AUDUSD"}; // Yahan apni pairs daalo
  1084. for(int p=0; p<4; p++){
  1085. if(StringFind(Symbol(), scanPairs[p]) >= 0) continue; // Apni pair skip karo
  1086. int bgH = iHighest(scanPairs[p], PERIOD_M1, MODE_HIGH, BOX_C, 1);
  1087. int bgL = iLowest(scanPairs[p], PERIOD_M1, MODE_LOW, BOX_C, 1);
  1088. if(bgH < 0 || bgL < 0) continue;
  1089. double bgHigh = iHigh(scanPairs[p], PERIOD_M1, bgH);
  1090. double bgLow = iLowest(scanPairs[p], PERIOD_M1, bgL);
  1091. double bgG50 = bgLow + (bgHigh - bgLow)/2.0;
  1092. double bgCur = iClose(scanPairs[p], PERIOD_M1, 0);
  1093. double bgDist = MathAbs(bgCur - bgG50) / pip;
  1094.  
  1095. if(bgDist < 1.5){ // Agar dusri pair touch kar rahi hai
  1096. g_visualTrapPro.boxStatus = "["+scanPairs[p]+"] MATCH!";
  1097. g_visualTrapPro.gannStatus = "["+scanPairs[p]+"] TRAP!";
  1098. g_visualTrapPro.gannColor = NEON_YELLOW;
  1099. g_visualTrapPro.trapScore += 30;
  1100. break;
  1101. }
  1102. }
  1103. // === PART 1: ENHANCED GANN BOX + TRAP DETECTION ===
  1104. if(Bars<BOX_C+10) return;
  1105. int hIdx=iHighest(NULL,0,MODE_HIGH,BOX_C,1); int lIdx=iLowest(NULL,0,MODE_LOW,BOX_C,1);
  1106. double bH=High[hIdx], bL=Low[lIdx], bHt=bH-bL; double bPips=bHt/pip;
  1107.  
  1108. if(bPips>=MIN_P && bPips<=MAX_P){
  1109. double g50=bL+(bHt/2.0); double dist=MathAbs(Close[0]-g50)/pip;
  1110. double trapStrength = (bPips-10)/20.0 * 100;
  1111. if(trapStrength<0) trapStrength=0;
  1112.  
  1113. g_visualTrapPro.boxStatus="BOX: "+DoubleToString(bPips,0)+"p (T"+DoubleToString(trapStrength,0)+"%)";
  1114.  
  1115. if(dist<1.2){
  1116. g_visualTrapPro.gannStatus="[!!!] GANN TRAP!"; g_visualTrapPro.gannColor=NEON_YELLOW;
  1117. g_visualTrapPro.trapScore += 35;
  1118. } else {
  1119. g_visualTrapPro.gannStatus="GANN: "+DoubleToString(dist,1)+"p";
  1120. g_visualTrapPro.trapScore += dist>3 ? 10 : 5;
  1121. }
  1122.  
  1123. // Professional Clean Box (White Border, No Fill)
  1124. ObjectCreate(0, PFX+"VBOX", OBJ_RECTANGLE, 0, Time[hIdx], bH, Time[1], bL);
  1125. ObjectSetInteger(0, PFX+"VBOX", OBJPROP_COLOR, clrWhite);
  1126. ObjectSetInteger(0, PFX+"VBOX", OBJPROP_WIDTH, 2);
  1127. ObjectSetInteger(0, PFX+"VBOX", OBJPROP_BACK, false);
  1128. ObjectSetInteger(0, PFX+"VBOX", OBJPROP_FILL, false);
  1129.  
  1130. // Gann midline (Yellow Solid)
  1131. ObjectCreate(0, PFX+"VMID", OBJ_HLINE, 0, 0, g50);
  1132. ObjectSetInteger(0, PFX+"VMID", OBJPROP_COLOR, clrYellow);
  1133. ObjectSetInteger(0, PFX+"VMID", OBJPROP_WIDTH, 1);
  1134. ObjectSetInteger(0, PFX+"VMID", OBJPROP_STYLE, STYLE_SOLID);
  1135. ObjectSetInteger(0, PFX+"VMID", OBJPROP_BACK, false);
  1136. }
  1137.  
  1138. // === PART 2: M30 DIRECTION + CROWD BIAS CALC ===
  1139. if(iBars(NULL,PERIOD_M30)<10) return;
  1140.  
  1141. int m30BullBars=0, m30BearBars=0;
  1142. for(int i=1; i<=8; i++){
  1143. if(iClose(NULL,PERIOD_M30,i)>iOpen(NULL,PERIOD_M30,i)) m30BullBars++;
  1144. else m30BearBars++;
  1145. }
  1146.  
  1147. bool m30Bull = (m30BullBars >= m30BearBars + 2);
  1148. g_visualTrapPro.m30Dir = (m30Bull ? "M30: [UP] " : "M30: [DN] ") +
  1149. IntegerToString(MathMax(m30BullBars,m30BearBars)) + "/8";
  1150.  
  1151. // === PART 3: M1 CROWD TRAP PATTERNS ===
  1152. datetime m30Start = iTime(NULL,PERIOD_M30,1);
  1153. int m1Bull=0, m1Bear=0, dojiChain=0, fakeBreak=0;
  1154. string m1Pattern = "";
  1155.  
  1156. for(int i=1; i<=60 && i<Bars; i++){
  1157. if(Time[i] >= m30Start){
  1158. double body = MathAbs(Close[i]-Open[i]);
  1159. double range = High[i]-Low[i];
  1160.  
  1161. if(range > 0 && body < 0.3*range) dojiChain++;
  1162. else if(Close[i]>Open[i]) {m1Bull++; m1Pattern+="G";}
  1163. else {m1Bear++; m1Pattern+="R";}
  1164.  
  1165. // Fake breakout logic fixed
  1166. if(i<60 && High[i]>High[i+1] && Close[i+1]<Open[i+1]) fakeBreak++;
  1167. }
  1168. }
  1169.  
  1170. string recentPattern = "";
  1171. for(int j=StringLen(m1Pattern)-1; j>=0 && StringLen(recentPattern)<8; j--){
  1172. recentPattern += StringSubstr(m1Pattern,j,1);
  1173. }
  1174. g_visualTrapPro.m1Seq = "M1: " + recentPattern;
  1175.  
  1176. // === PART 4: PROFESSIONAL SIGNAL LOGIC (Zero Division Fixed) ===
  1177. double totalCandles = (double)(m1Bull + m1Bear);
  1178.  
  1179. if(totalCandles > 0){
  1180. g_visualTrapPro.callBias = NormalizeDouble((m1Bull/totalCandles)*100,1);
  1181. g_visualTrapPro.putBias = NormalizeDouble((m1Bear/totalCandles)*100,1);
  1182. } else {
  1183. g_visualTrapPro.callBias = 50.0; g_visualTrapPro.putBias = 50.0;
  1184. }
  1185.  
  1186. g_visualTrapPro.trapScore += dojiChain * 8;
  1187. g_visualTrapPro.trapScore += fakeBreak * 12;
  1188. g_visualTrapPro.trapScore += m30Bull ? m1Bear*2 : m1Bull*2;
  1189.  
  1190. if(g_visualTrapPro.trapScore > 100) g_visualTrapPro.trapScore = 100;
  1191.  
  1192. // KILLER SIGNALS
  1193. if(m30Bull && g_visualTrapPro.callBias >= 70 && g_visualTrapPro.trapScore >= 60){
  1194. g_visualTrapPro.verdict = "[DN] PUT NOW! " + DoubleToString(g_visualTrapPro.trapScore,0) + "%";
  1195. g_visualTrapPro.verdictColor = NEON_RED;
  1196. g_visualTrapPro.sellSignal = true;
  1197. }
  1198. else if(!m30Bull && g_visualTrapPro.putBias >= 70 && g_visualTrapPro.trapScore >= 60){
  1199. g_visualTrapPro.verdict = "[UP] CALL NOW! " + DoubleToString(g_visualTrapPro.trapScore,0) + "%";
  1200. g_visualTrapPro.verdictColor = NEON_GREEN;
  1201. g_visualTrapPro.buySignal = true;
  1202. }
  1203. else if(g_visualTrapPro.trapScore >= 75){
  1204. g_visualTrapPro.verdict = "[!!] TRAP FORM " + DoubleToString(g_visualTrapPro.trapScore,0) + "%";
  1205. g_visualTrapPro.verdictColor = NEON_ORANGE;
  1206. }
  1207. else {
  1208. g_visualTrapPro.verdict = "WAIT " + DoubleToString(g_visualTrapPro.callBias,0) + "/" +
  1209. DoubleToString(g_visualTrapPro.putBias,0);
  1210. g_visualTrapPro.verdictColor = CGR;
  1211. }
  1212.  
  1213. // Signal Arrow (Spam Protected - Sirf naya signal aane par banega)
  1214. if((g_visualTrapPro.buySignal || g_visualTrapPro.sellSignal) && g_lastTrapArrowTime != Time[0]){
  1215. g_lastTrapArrowTime = Time[0];
  1216. ObjectCreate(0, PFX+"VSIG", OBJ_ARROW, 0, Time[0], Low[0] - (isJpy?0.05:0.0005));
  1217. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_ARROWCODE, g_visualTrapPro.buySignal ? 233 : 234);
  1218. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_COLOR, g_visualTrapPro.buySignal ? NEON_GREEN : NEON_RED);
  1219. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_WIDTH, 3);
  1220. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_BACK, false);
  1221. }
  1222. }
  1223.  
  1224. // ============================================================
  1225. // HIDDEN LEVELS & HELPERS
  1226. // ============================================================
  1227. 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();}
  1228. 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);}}}
  1229. 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;}
  1230. 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;}
  1231. 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++;}
  1232. 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;}}
  1233. 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++;}}
  1234.  
  1235. string DetectSuddenReversal(){if(Bars<10)return "";bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);double atr=iATR(NULL,PERIOD_M1,14,1);if(atr<=0)return "";double rng1=High[1]-Low[1];double body1=MathAbs(Close[1]-Open[1]);double uw1=(rng1>0)?(High[1]-MathMax(Open[1],Close[1]))/rng1:0;double lw1=(rng1>0)?(MathMin(Open[1],Close[1])-Low[1])/rng1:0;bool bull1=(Close[1]>Open[1]);bool bear1=(Close[1]<Open[1]);int bullScore=0,bearScore=0;string bullReason="",bearReason="";if(lw1>0.60&&body1<rng1*0.30&&rsi<48){bullScore+=30;bullReason+="PinBar ";}if(uw1>0.60&&body1<rng1*0.30&&rsi>52){bearScore+=30;bearReason+="PinBar ";}if(bull1&&body1>MathAbs(Close[2]-Open[2])*1.1&&Close[2]<Open[2]&&body1>atr*0.35){bullScore+=25;bullReason+="Engulf ";}if(bear1&&body1>MathAbs(Close[2]-Open[2])*1.1&&Close[2]>Open[2]&&body1>atr*0.35){bearScore+=25;bearReason+="Engulf ";}if(bull1&&lw1>0.55&&uw1<0.20&&rsi<55){bullScore+=20;bullReason+="Hammer ";}if(bear1&&uw1>0.55&&lw1<0.20&&rsi>45){bearScore+=20;bearReason+="ShootStar ";}if(rsi<30&&bullScore>0){bullScore+=15;bullReason+="RSI_OS ";}if(rsi>70&&bearScore>0){bearScore+=15;bearReason+="RSI_OB ";}if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)/pip<8&&bullScore>0){bullScore+=15;bullReason+="@SUP ";}if(g_nearest_res>0&&(g_nearest_res-Close[0])/pip<8&&bearScore>0){bearScore+=15;bearReason+="@RES ";}if(bullScore>=40&&bullScore>bearScore){return "BULL REVERSAL";}else if(bearScore>=40&&bearScore>bullScore){return "BEAR REVERSAL";}return "";}
  1236. void SafeDel(string id){if(ObjectFind(0,id)>=0)ObjectDelete(0,id);}
  1237. 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);}
  1238. void HideSPM(){for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);if(StringFind(nm,PFX)==0)continue;if(StringFind(nm,PFX+"candle_timer")>=0)continue;int tp=(int)ObjectGetInteger(0,nm,OBJPROP_TYPE);if(tp==OBJ_LABEL||tp==OBJ_RECTANGLE_LABEL||tp==OBJ_TEXT)ObjectDelete(0,nm);}}
  1239. void NuclearDeleteAll(){for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);if(StringFind(nm,PFX+"candle_timer")>=0)continue;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);}}
  1240. 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;if(StringFind(nm,"NEAREST_RES")>=0)continue;if(StringFind(nm,"NEAREST_SUP")>=0)continue;if(StringFind(nm,"VBOX")>=0)continue;if(StringFind(nm,"VMID")>=0)continue;if(StringFind(nm,"VSIG")>=0)continue;ObjectDelete(nm);}}
  1241.  
  1242. // ============================================================
  1243. // ML & ACCURACY
  1244. // ============================================================
  1245. 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;}
  1246. 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);}}
  1247. 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();}
  1248. 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];}
  1249. 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;}
  1250. 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]));}}
  1251. 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";}
  1252. 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;}
  1253. 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;}
  1254. 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;}
  1255. 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;}
  1256. double GetADXStrength(){if(Bars<20)return 0;return iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);}
  1257. 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;}
  1258. 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;}
  1259. 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;}
  1260.  
  1261. // ============================================================
  1262. // HRN LEVEL (Kept for chart line only, cube removed)
  1263. // ============================================================
  1264. 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);}
  1265. 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++;}
  1266. 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;}
  1267.  
  1268. 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;}}
  1269.  
  1270. void UpdateHRN(){
  1271. if(Bars<LOOKBACK+10)return;
  1272. bool jpy=(StringFind(Symbol(),"JPY")>=0);
  1273. double pip=jpy?0.01:0.0001;
  1274. int dg=(int)MarketInfo(Symbol(),MODE_DIGITS);
  1275. if(dg<=0)dg=5;
  1276. if(Time[0]!=g_hrn_scan_bar){
  1277. double nH=FindBestHiddenRoundNumber(Close[0]);
  1278. if(g_hrn_price==0||MathAbs(nH-g_hrn_price)>2*pip){
  1279. g_hrn_price=nH;
  1280. g_hrn_is_sup=(Close[0]>g_hrn_price);
  1281. g_hrn_brk_bars=0;
  1282. g_hrn_confirmed_break=false;
  1283. }
  1284. g_hrn_scan_bar=Time[0];
  1285. }
  1286. double tol=1*pip;
  1287. if(g_hrn_is_sup){
  1288. if(Bars>=3){
  1289. bool c1b=(Close[1]<g_hrn_price-tol),c2b=(Close[2]<g_hrn_price-tol);
  1290. if(c1b&&c2b){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}
  1291. else if(c1b)g_hrn_brk_bars=1;
  1292. else g_hrn_brk_bars=0;
  1293. }
  1294. } else {
  1295. if(Bars>=3){
  1296. bool c1a=(Close[1]>g_hrn_price+tol),c2a=(Close[2]>g_hrn_price+tol);
  1297. if(c1a&&c2a){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}
  1298. else if(c1a)g_hrn_brk_bars=1;
  1299. else g_hrn_brk_bars=0;
  1300. }
  1301. }
  1302. if(g_hrn_brk_bars>=HRN_CONFIRM_BARS){
  1303. double nH=FindBestHiddenRoundNumber(Close[0]);
  1304. if(MathAbs(nH-g_hrn_price)>3*pip){
  1305. g_hrn_price=nH;g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;
  1306. } else {
  1307. g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;
  1308. }
  1309. }
  1310. g_hrn_str=DoubleToString(NormalizeDouble(g_hrn_price,dg),dg);
  1311. color hrnColor=g_hrn_is_sup?NEON_GREEN:NEON_RED;
  1312. if(g_hrn_brk_bars==1)hrnColor=NEON_YELLOW;
  1313. DrawHLine(PFX+"HRN_LINE",g_hrn_price,hrnColor,3,STYLE_SOLID);
  1314. string ln=PFX+"HRN_LBL";SafeDel(ln);
  1315. string typeStr=g_hrn_is_sup?"SUP":"RES";
  1316. string confStr=(g_hrn_brk_bars==1)?" [1/2]":(g_hrn_confirmed_break?" [SHIFT]":"");
  1317. ObjectCreate(0,ln,OBJ_TEXT,0,Time[0]+Period()*60*3,g_hrn_price);
  1318. ObjectSetText(ln,"HRN "+ShortPrice(g_hrn_price)+" "+typeStr+confStr,9,"Arial Bold",hrnColor);
  1319. ObjectSetInteger(0,ln,OBJPROP_BACK,false);
  1320. }
  1321.  
  1322. // ============================================================
  1323. // CANDLE PATTERN RECOGNITION (FIXED BUG)
  1324. // ============================================================
  1325. NCPPatternResult NCPCheckSinglePattern(int shift){
  1326. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="SINGLE";
  1327. if(shift+1>=Bars || shift < 0) return r;
  1328. double o=Open[shift],c=Close[shift],h=High[shift],l=Low[shift];
  1329. double body=MathAbs(c-o); double range=h-l;
  1330. if(range<=0 || o==0 || c==0) return r;
  1331. double upperWick=h-MathMax(o,c); double lowerWick=MathMin(o,c)-l;
  1332. double bodyRatio=body/range; double uwRatio=upperWick/range; double lwRatio=lowerWick/range;
  1333. bool isBull=(c>o); bool isBear=(c<o);
  1334. if(bodyRatio<0.10){
  1335. if(uwRatio>0.35&&lwRatio>0.35){
  1336. r.name="DOJI"; r.type=0; r.strength=2;
  1337. if(uwRatio>0.60&&lwRatio<0.15){r.name="GRAVESTONE DOJI";r.type=-1;r.strength=4;}
  1338. else if(lwRatio>0.60&&uwRatio<0.15){r.name="DRAGONFLY DOJI";r.type=1;r.strength=4;}
  1339. else if(uwRatio>0.40&&lwRatio>0.40){r.name="LONG-LEG DOJI";r.type=0;r.strength=3;}
  1340. return r;
  1341. }
  1342. if(body<range*0.05&&upperWick<range*0.10&&lowerWick<range*0.10){r.name="4-PRICE DOJI";r.type=0;r.strength=1;return r;}
  1343. }
  1344. if(lwRatio>0.55&&uwRatio<0.15&&bodyRatio>0.15&&bodyRatio<0.40){r.name="HAMMER";r.type=1;r.strength=4;if(g_nearest_sup>0&&MathAbs(l-g_nearest_sup)<5*(StringFind(Symbol(),"JPY")>=0?0.01:0.0001)){r.strength=5;r.name="HAMMER@SUP";}return r;}
  1345. if(uwRatio>0.55&&lwRatio<0.15&&isBull&&bodyRatio>0.10&&bodyRatio<0.35){r.name="INV HAMMER";r.type=1;r.strength=3;return r;}
  1346. if(uwRatio>0.55&&lwRatio<0.15&&isBear&&bodyRatio>0.15&&bodyRatio<0.40){r.name="SHOOT STAR";r.type=-1;r.strength=4;if(g_nearest_res>0&&MathAbs(h-g_nearest_res)<5*(StringFind(Symbol(),"JPY")>=0?0.01:0.0001)){r.strength=5;r.name="SHOOT@RES";}return r;}
  1347. if(lwRatio>0.55&&uwRatio<0.15&&isBear&&bodyRatio>0.15&&bodyRatio<0.40){r.name="HANG MAN";r.type=-1;r.strength=3;return r;}
  1348. if(bodyRatio>0.10&&bodyRatio<0.30&&uwRatio>0.25&&lwRatio>0.25){r.name="SPIN TOP";r.type=0;r.strength=1;return r;}
  1349. if(bodyRatio>0.75){if(isBull){r.name="BULL MARUBOZU";r.type=1;r.strength=5;}else{r.name="BEAR MARUBOZU";r.type=-1;r.strength=5;}return r;}
  1350. if(bodyRatio<0.20&&uwRatio>0.30&&lwRatio>0.30){r.name="HIGH WAVE";r.type=0;r.strength=2;return r;}
  1351. return r;
  1352. }
  1353.  
  1354. NCPPatternResult NCPCheckDualPattern(int shift){
  1355. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="DUAL";
  1356. if(shift+2>=Bars || shift < 0) return r;
  1357. if(Open[shift]==0||Close[shift]==0||Open[shift+1]==0||Close[shift+1]==0) return r;
  1358. double o1=Open[shift],c1=Close[shift],h1=High[shift],l1=Low[shift];
  1359. double o2=Open[shift+1],c2=Close[shift+1],h2=High[shift+1],l2=Low[shift+1];
  1360. double body1=MathAbs(c1-o1); double body2=MathAbs(c2-o2); if(body1<=0||body2<=0) return r;
  1361.  
  1362. // ✅ CRITICAL BUG FIX HERE: o1 instead of o2
  1363. bool bull1=(c1>o1), bear1=(c1<o1);
  1364. bool bull2=(c2>o2), bear2=(c2<o2);
  1365.  
  1366. if(bull1&&bear2&&c1>=o2&&o1<=c2&&body1>body2){r.name="BULL ENGULF";r.type=1;r.strength=5;if(g_nearest_sup>0){double pip=(StringFind(Symbol(),"JPY")>=0)?0.01:0.0001;if(MathAbs(l1-g_nearest_sup)<8*pip||MathAbs(l2-g_nearest_sup)<8*pip){r.strength=6;r.name="BULL ENGULF@SUP";}}return r;}
  1367. if(bear1&&bull2&&c1<=o2&&o1>=c2&&body1>body2){r.name="BEAR ENGULF";r.type=-1;r.strength=5;if(g_nearest_res>0){double pip=(StringFind(Symbol(),"JPY")>=0)?0.01:0.0001;if(MathAbs(h1-g_nearest_res)<8*pip||MathAbs(h2-g_nearest_res)<8*pip){r.strength=6;r.name="BEAR ENGULF@RES";}}return r;}
  1368. double tol=(h1+l1)*0.001;
  1369. if(bull1&&bear2&&MathAbs(h1-h2)<tol&&h1>c1&&h2>c2){r.name="TWEEZER TOP";r.type=-1;r.strength=4;return r;}
  1370. if(bear1&&bull2&&MathAbs(l1-l2)<tol&&l1<c1&&l2<c2){r.name="TWEEZER BTM";r.type=1;r.strength=4;return r;}
  1371. if(bull1&&bear2&&o1<l2&&c1>(o2+c2)/2.0&&c1<o2){r.name="PIERCING";r.type=1;r.strength=3;return r;}
  1372. if(bear1&&bull2&&o1>h2&&c1<(o2+c2)/2.0&&c1>o2){r.name="DARK CLOUD";r.type=-1;r.strength=3;return r;}
  1373. if(h1<h2&&l1>l2){if(bull1&&bear2){r.name="BULL HARAMI";r.type=1;r.strength=2;}else if(bear1&&bull2){r.name="BEAR HARAMI";r.type=-1;r.strength=2;}return r;}
  1374. return r;
  1375. }
  1376.  
  1377. NCPPatternResult NCPCheckTriplePattern(int shift){
  1378. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="TRIPLE";
  1379. if(shift+3>=Bars || shift < 0) return r;
  1380. double o1=Open[shift],c1=Close[shift],h1=High[shift],l1=Low[shift];
  1381. double o2=Open[shift+1],c2=Close[shift+1],h2=High[shift+1],l2=Low[shift+1];
  1382. double o3=Open[shift+2],c3=Close[shift+2],h3=High[shift+2],l3=Low[shift+2];
  1383. double body1=MathAbs(c1-o1),body2=MathAbs(c2-o2),body3=MathAbs(c3-o3);double rng2=h2-l2;
  1384. bool bull1=(c1>o1),bear1=(c1<o1),bull3=(c3>o3),bear3=(c3<o3);
  1385. if(bull1&&bear3&&rng2>0&&body2<rng2*0.30&&c1>(o3+c3)/2.0){r.name="MORN STAR";r.type=1;r.strength=5;if(g_nearest_sup>0){double pip=(StringFind(Symbol(),"JPY")>=0)?0.01:0.0001;if(MathAbs(l2-g_nearest_sup)<8*pip){r.strength=6;r.name="MORN STAR@SUP";}}return r;}
  1386. if(bear1&&bull3&&rng2>0&&body2<rng2*0.30&&c1<(o3+c3)/2.0){r.name="EVE STAR";r.type=-1;r.strength=5;if(g_nearest_res>0){double pip=(StringFind(Symbol(),"JPY")>=0)?0.01:0.0001;if(MathAbs(h2-g_nearest_res)<8*pip){r.strength=6;r.name="EVE STAR@RES";}}return r;}
  1387. if(bull1&&c2>o2&&bull3&&c1>c2&&c2>c3&&o1>o2&&o2>o3){r.name="3 SOLDIERS";r.type=1;r.strength=5;if(body1<body2){r.strength=4;r.name="3 SOLDIERS-W";}return r;}
  1388. if(bear1&&c2<o2&&bear3&&c1<c2&&c2<c3&&o1<o2&&o2<o3){r.name="3 CROWS";r.type=-1;r.strength=5;if(body1<body2){r.strength=4;r.name="3 CROWS-W";}return r;}
  1389. if(bull1&&bear3&&h1<h2&&l1>l2&&c1>c2&&c2>c3){r.name="3 IN UP";r.type=1;r.strength=3;return r;}
  1390. if(bear1&&bull3&&h1<h2&&l1>l2&&c1<c2&&c2<c3){r.name="3 IN DN";r.type=-1;r.strength=3;return r;}
  1391. if(bull1&&bear3&&h1>h2&&l1<l2&&c1>o2){r.name="3 OUT UP";r.type=1;r.strength=4;return r;}
  1392. if(bear1&&bull3&&h1>h2&&l1<l2&&c1<o2){r.name="3 OUT DN";r.type=-1;r.strength=4;return r;}
  1393. return r;
  1394. }
  1395.  
  1396. NCPPatternResult NCPCheckColorPattern(){
  1397. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="MULTI";
  1398. if(Bars<8)return r;
  1399. int bullRun=0,bearRun=0;
  1400. 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;}
  1401. if(bullRun>=3){r.name="3G-RUN";r.type=-1;r.strength=3;double b1=MathAbs(Close[1]-Open[1]),b2=MathAbs(Close[2]-Open[2]),b3=MathAbs(Close[3]-Open[3]);if(b1<b2&&b2<b3){r.strength=4;r.name="3G-WEAK";}}
  1402. else if(bearRun>=3){r.name="3R-RUN";r.type=1;r.strength=3;double b1=MathAbs(Close[1]-Open[1]),b2=MathAbs(Close[2]-Open[2]),b3=MathAbs(Close[3]-Open[3]);if(b1<b2&&b2<b3){r.strength=4;r.name="3R-WEAK";}}
  1403. if(bullRun>=4){r.name="4G-RUN";r.type=-1;r.strength=4;}else if(bearRun>=4){r.name="4R-RUN";r.type=1;r.strength=4;}
  1404. if(bullRun>=5){r.name="5G-EXHAUST";r.type=-1;r.strength=5;double v1=(double)iVolume(NULL,PERIOD_M1,1),v5=(double)iVolume(NULL,PERIOD_M1,5);if(v5>0&&v1<v5*0.6){r.strength=6;r.name="5G-EXH+VOL";}}
  1405. else if(bearRun>=5){r.name="5R-EXHAUST";r.type=1;r.strength=5;double v1=(double)iVolume(NULL,PERIOD_M1,1),v5=(double)iVolume(NULL,PERIOD_M1,5);if(v5>0&&v1<v5*0.6){r.strength=6;r.name="5R-EXH+VOL";}}
  1406. return r;
  1407. }
  1408.  
  1409. void NCPScanAllPatterns(){g_ncpPatternBullScore=0;g_ncpPatternBearScore=0;g_ncpMainPattern="";int bestStrength=0;
  1410. for(int i=0;i<=2;i++){NCPPatternResult p=NCPCheckSinglePattern(i);if(p.type!=0&&p.strength>0){int weight=(i==0)?3:(i==1)?2:1;if(p.type==1)g_ncpPatternBullScore+=p.strength*weight;else if(p.type==-1)g_ncpPatternBearScore+=p.strength*weight;if(p.strength*weight>bestStrength){bestStrength=p.strength*weight;g_ncpMainPattern=p.name;}}}
  1411. for(int i=0;i<=1;i++){NCPPatternResult p=NCPCheckDualPattern(i);if(p.type!=0&&p.strength>0){int weight=(i==0)?4:2;if(p.type==1)g_ncpPatternBullScore+=p.strength*weight;else if(p.type==-1)g_ncpPatternBearScore+=p.strength*weight;if(p.strength*weight>bestStrength){bestStrength=p.strength*weight;g_ncpMainPattern=p.name;}}}
  1412. NCPPatternResult p3=NCPCheckTriplePattern(0);if(p3.type!=0&&p3.strength>0){if(p3.type==1)g_ncpPatternBullScore+=p3.strength*5;else if(p3.type==-1)g_ncpPatternBearScore+=p3.strength*5;if(p3.strength*5>bestStrength){bestStrength=p3.strength*5;g_ncpMainPattern=p3.name;}}
  1413. if(NCP8_UseColorPattern){NCPPatternResult pc=NCPCheckColorPattern();if(pc.type!=0&&pc.strength>0){if(pc.type==1)g_ncpPatternBullScore+=pc.strength*3;else if(pc.type==-1)g_ncpPatternBearScore+=pc.strength*3;if(pc.strength*3>bestStrength&&bestStrength<15){g_ncpMainPattern=pc.name;}}}
  1414. g_ncpPatternBullScore=MathMin(100,g_ncpPatternBullScore);g_ncpPatternBearScore=MathMin(100,g_ncpPatternBearScore);
  1415. }
  1416. int NCPCheckHRNRejection(){if(g_hrn_price<=0)return 0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];double dist=MathAbs(cur-g_hrn_price)/pip;if(dist>10)return 0;int score=0;if(g_hrn_is_sup){if(Low[1]<=g_hrn_price+2*pip&&Close[1]>g_hrn_price){score+=15;double rng=High[1]-Low[1];if(rng>0){double lw=MathMin(Open[1],Close[1])-Low[1];if(lw/rng>0.50)score+=10;}}if(Close[1]<g_hrn_price-2*pip)score-=12;}else{if(High[1]>=g_hrn_price-2*pip&&Close[1]<g_hrn_price){score-=15;double rng=High[1]-Low[1];if(rng>0){double uw=High[1]-MathMax(Open[1],Close[1]);if(uw/rng>0.50)score-=10;}}if(Close[1]>g_hrn_price+2*pip)score+=12;}return score;}
  1417. int NCPCheckDivergence(){if(!NCP8_UseDivergence||Bars<30)return 0;int score=0;double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);double rsi5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);double low5=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)];double low10=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,10,6)];if(low5<low10&&rsi1>rsi5&&rsi1<45)score+=20;double high5=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)];double high10=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,10,6)];if(high5>high10&&rsi1<rsi5&&rsi1>55)score-=20;double macd1=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_MAIN,1);double macd5=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_MAIN,5);if(macd1>macd5&&Close[1]<Close[5]&&macd1<0)score+=12;if(macd1<macd5&&Close[1]>Close[5]&&macd1>0)score-=12;return score;}
  1418.  
  1419. // ============================================================
  1420. // NCP PRO v8.0 CORE ENGINE
  1421. // ============================================================
  1422. NCPTrendInfo NCPDetectTrend(){NCPTrendInfo t;t.m15Direction="FLAT";t.m15Strength=0;t.m1Bias=0;t.m5Direction="FLAT";t.m5Strength=0;t.aligned=false;if(Bars<20)return t;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;int greenCount=0,redCount=0;double greenBody=0,redBody=0;for(int i=1;i<=15&&i<Bars;i++){double body=Close[i]-Open[i];double absBody=MathAbs(body);if(body>0){greenCount++;greenBody+=absBody;}else if(body<0){redCount++;redBody+=absBody;}}double netBody=greenBody-redBody;t.m1Bias=(int)((netBody/pip)*2);if(t.m1Bias>100)t.m1Bias=100;if(t.m1Bias<-100)t.m1Bias=-100;if(iBars(NULL,PERIOD_M15)>=3){double m15Open=iOpen(NULL,PERIOD_M15,1);double m15Close=iClose(NULL,PERIOD_M15,1);double m15High=iHigh(NULL,PERIOD_M15,1);double m15Low=iLow(NULL,PERIOD_M15,1);double m15Body=m15Close-m15Open;double m15Range=m15High-m15Low;if(m15Body>5*pip){t.m15Direction="UP";t.m15Strength=(m15Range>0)?(int)(MathAbs(m15Body)/m15Range*10):5;}else if(m15Body<-5*pip){t.m15Direction="DOWN";t.m15Strength=(m15Range>0)?(int)(MathAbs(m15Body)/m15Range*10):5;}else{t.m15Direction="FLAT";t.m15Strength=3;}for(int j=1;j<=3;j++){double m5c=iClose(NULL,PERIOD_M5,j);double m5o=iOpen(NULL,PERIOD_M5,j);if(m5c>m5o)t.m5Strength++;else if(m5c<m5o)t.m5Strength--;}t.m5Direction=(t.m5Strength>1)?"UP":(t.m5Strength<-1)?"DOWN":"FLAT";}else{if(greenCount>=10){t.m15Direction="UP";t.m15Strength=greenCount-7;}else if(redCount>=10){t.m15Direction="DOWN";t.m15Strength=redCount-7;}t.m5Direction=(greenCount>redCount+2)?"UP":(redCount>greenCount+2)?"DOWN":"FLAT";}bool m1Up=(greenCount>redCount+2);bool m1Dn=(redCount>greenCount+2); bool m5Up=(t.m5Direction=="UP"); bool m5Dn=(t.m5Direction=="DOWN"); bool m15Up=(t.m15Direction=="UP"); bool m15Dn=(t.m15Direction=="DOWN"); t.aligned=(m1Up&&m5Up&&m15Up)||(m1Dn&&m5Dn&&m15Dn); return t;}
  1423.  
  1424. void NCPDetectDynamicSR(){g_ncpSRCount=0;if(Bars<30)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];for(int i=3;i<=30&&i<Bars-2&&g_ncpSRCount<15;i++){if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){double lv=High[i];if(MathAbs(lv-cur)/pip<40)NCPAddSRZone(lv,"RESISTANCE",1,false,false,iTime(NULL,PERIOD_M1,i));}if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){double lv=Low[i];if(MathAbs(lv-cur)/pip<40)NCPAddSRZone(lv,"SUPPORT",1,false,false,iTime(NULL,PERIOD_M1,i));}}double rndSteps[]={5,10,25,50,100};for(int s=0;s<5;s++){double step=rndSteps[s]*pip;double nearRound=MathRound(cur/step)*step;for(int k=-1;k<=1;k++){double lv=nearRound+k*step;if(MathAbs(lv-cur)/pip<30){string type=(lv>cur)?"RESISTANCE":"SUPPORT";NCPAddSRZone(lv,type,(s<2)?3:(s<3)?2:1,true,false,TimeCurrent());}}}if(NCP8_UseOrderBlocks)NCPDetectOrderBlocks();}
  1425. void NCPAddSRZone(double price,string type,int strength,bool isRound,bool isOB,datetime lastTouch){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double tol=5*pip;for(int i=0;i<g_ncpSRCount;i++){if(MathAbs(g_ncpSRZones[i].price-price)<tol&&g_ncpSRZones[i].type==type){g_ncpSRZones[i].touches++;g_ncpSRZones[i].strength=MathMin(10,g_ncpSRZones[i].strength+1);g_ncpSRZones[i].lastTouch=lastTouch;if(isRound)g_ncpSRZones[i].isRoundNum=true;if(isOB)g_ncpSRZones[i].isOrderBlock=true;return;}}if(g_ncpSRCount<20){g_ncpSRZones[g_ncpSRCount].price=price;g_ncpSRZones[g_ncpSRCount].type=type;g_ncpSRZones[g_ncpSRCount].touches=1;g_ncpSRZones[g_ncpSRCount].strength=strength;g_ncpSRZones[g_ncpSRCount].isRoundNum=isRound;g_ncpSRZones[g_ncpSRCount].isOrderBlock=isOB;g_ncpSRZones[g_ncpSRCount].lastTouch=lastTouch;g_ncpSRCount++;}}
  1426. void NCPDetectOrderBlocks(){if(Bars<30)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];for(int i=2;i<=20&&i<Bars&&g_ncpSRCount<18;i++){if(Close[i]<Open[i]){double move=0;for(int j=i-1;j>=MathMax(1,i-3);j--){if(Close[j]>Open[j])move+=Close[j]-Open[j];else break;}if(move>8*pip){double obLow=Low[i];if(MathAbs(obLow-cur)/pip<20&&cur>obLow)NCPAddSRZone(obLow,"SUPPORT",4,false,true,iTime(NULL,PERIOD_M1,i));}}if(Close[i]>Open[i]){double move=0;for(int j=i-1;j>=MathMax(1,i-3);j--){if(Close[j]<Open[j])move+=Open[j]-Close[j];else break;}if(move>8*pip){double obHigh=High[i];if(MathAbs(obHigh-cur)/pip<20&&cur<obHigh)NCPAddSRZone(obHigh,"RESISTANCE",4,false,true,iTime(NULL,PERIOD_M1,i));}}}}
  1427. int NCPGetSRSignal(){if(g_ncpSRCount==0)return 0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];int score=0;for(int i=0;i<g_ncpSRCount;i++){double dist=MathAbs(g_ncpSRZones[i].price-cur)/pip;if(dist>15)continue;int weight=g_ncpSRZones[i].strength;if(g_ncpSRZones[i].isRoundNum)weight+=2;if(g_ncpSRZones[i].isOrderBlock)weight+=3;if(g_ncpSRZones[i].touches>=3)weight+=2;if(g_ncpSRZones[i].type=="SUPPORT"){if(dist<3)score+=weight*3;else if(dist<7)score+=weight*2;else if(dist<12)score+=weight;if(Low[1]<g_ncpSRZones[i].price+2*pip&&Close[1]>g_ncpSRZones[i].price)score+=weight*2;}else if(g_ncpSRZones[i].type=="RESISTANCE"){if(dist<3)score-=weight*3;else if(dist<7)score-=weight*2;else if(dist<12)score-=weight;if(High[1]>g_ncpSRZones[i].price-2*pip&&Close[1]<g_ncpSRZones[i].price)score-=weight*2;}}return MathMax(-50,MathMin(50,score));}
  1428. string NCPGetSRSummary(){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];double nearSup=0,nearRes=0;int supStr=0,resStr=0;for(int i=0;i<g_ncpSRCount;i++){double dist=MathAbs(g_ncpSRZones[i].price-cur)/pip;if(dist>15)continue;if(g_ncpSRZones[i].type=="SUPPORT"&&(nearSup==0||dist<MathAbs(nearSup-cur)/pip)){nearSup=g_ncpSRZones[i].price;supStr=g_ncpSRZones[i].strength;}if(g_ncpSRZones[i].type=="RESISTANCE"&&(nearRes==0||dist<MathAbs(nearRes-cur)/pip)){nearRes=g_ncpSRZones[i].price;resStr=g_ncpSRZones[i].strength;}}string result="";if(nearSup>0)result+="S:"+ShortPrice(nearSup)+"["+IntegerToString(supStr)+"] ";if(nearRes>0)result+="R:"+ShortPrice(nearRes)+"["+IntegerToString(resStr)+"]";if(result=="")result="No nearby SR";return result;}
  1429.  
  1430. void CalculateMTG(){
  1431. if(!ENABLE_MTG || Bars < 50){g_mtgState="OFF"; g_mtgReason=""; g_mtgClr=CGR; return;}
  1432. bool jpy = (StringFind(Symbol(), "JPY") >= 0); double pip = jpy ? 0.01 : 0.0001;
  1433. CheckPreviousResult();
  1434. int sec = (int)(TimeCurrent() - Time[0]);
  1435. if(sec < NCP_OpenNoiseSeconds){g_mtgState="..."; g_mtgReason="Bar open"; g_mtgClr=CGR; g_mtgHype=50; g_mtgBetrayal=50; return;}
  1436. if(sec >= NCP_KillZoneSeconds){g_mtgState="END"; g_mtgReason="Late"; g_mtgClr=NEON_ORANGE; g_mtgHype=50; g_mtgBetrayal=50; return;}
  1437. double spPips = MarketInfo(Symbol(), MODE_SPREAD) * Point / pip;
  1438. if(spPips > NCP_MaxSpreadPips){g_mtgState="SPREAD"; g_mtgReason=DoubleToString(spPips,1)+"p"; g_mtgClr=NEON_ORANGE; g_mtgHype=50; g_mtgBetrayal=50; return;}
  1439. double vol1 = (double)iVolume(NULL, PERIOD_M1, 1); double volAvg = 0;
  1440. for(int v = 2; v <= 21; v++) volAvg += (double)iVolume(NULL, PERIOD_M1, v); volAvg /= 20.0;
  1441. if(volAvg > 0 && vol1 < volAvg * 0.7){g_mtgState="WAIT"; g_mtgReason="LOW VOL"; g_mtgClr=NEON_ORANGE; g_mtgHype=50; g_mtgBetrayal=50; return;}
  1442. double atr = iATR(Symbol(), PERIOD_M1, NCP_ATRPeriod, 1); double atrPips = atr / pip;
  1443. if(atrPips < NCP_MinATRPips){g_mtgState="FLAT"; g_mtgReason="Low ATR"; g_mtgClr=CGR; g_mtgHype=50; g_mtgBetrayal=50; return;}
  1444.  
  1445. g_ncpADX = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  1446. double plusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
  1447. double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
  1448. g_ncpPlusDI = plusDI; g_ncpMinusDI = minusDI;
  1449.  
  1450. if(g_ncpADX < 22){g_mtgState="WAIT"; g_mtgReason="ADX LOW ("+DoubleToString(g_ncpADX,0)+")"; g_mtgClr=NEON_ORANGE; g_mtgHype=50; g_mtgBetrayal=50; return;}
  1451.  
  1452. if(NCP8_UseM15Trend) g_ncpTrend = NCPDetectTrend();
  1453. if(NCP8_UseDynamicSR) NCPDetectDynamicSR();
  1454. if(NCP8_UsePatterns) NCPScanAllPatterns();
  1455.  
  1456. double macd_main = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, 1);
  1457. double macd_sig = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, 1);
  1458. bool closedBull = (Close[1] > Open[1]); bool closedBear = (Close[1] < Open[1]);
  1459. double body1 = MathAbs(Close[1] - Open[1]); double rng1 = High[1] - Low[1];
  1460. double dynamicBodyThresh = atr * (0.35 + (g_ncpADX - 20) / 100.0);
  1461.  
  1462. int callConfluence = 0, putConfluence = 0;
  1463. double weightMultiplier = 1.0 + (g_ncpADX - 20) / 50.0;
  1464.  
  1465. if(NCP8_UseM15Trend){if(g_ncpTrend.m15Direction == "UP") callConfluence += (int)(3 * weightMultiplier); else if(g_ncpTrend.m15Direction == "DOWN") putConfluence += (int)(3 * weightMultiplier);}
  1466. double eF = iMA(NULL, 0, NCP_FastEMA, 0, MODE_EMA, PRICE_CLOSE, 1), eM = iMA(NULL, 0, NCP_MidEMA, 0, MODE_EMA, PRICE_CLOSE, 1), eS = iMA(NULL, 0, NCP_SlowEMA, 0, MODE_EMA, PRICE_CLOSE, 1), eF_prev = iMA(NULL, 0, NCP_FastEMA, 0, MODE_EMA, PRICE_CLOSE, 2);
  1467. if(eF > eM && eM > eS && eF > eF_prev) callConfluence += (int)(2.5 * weightMultiplier); else if(eF < eM && eM < eS && eF < eF_prev) putConfluence += (int)(2.5 * weightMultiplier);
  1468. if(g_haM1 == "HA BULLISH 1") callConfluence += 1; else if(g_haM1 == "HA BEARISH 1") putConfluence += 1;
  1469. if(g_haM5 == "HA BULLISH 5") callConfluence += 1; else if(g_haM5 == "HA BEARISH 5") putConfluence += 1;
  1470. if(plusDI > minusDI + 5) callConfluence += 2; else if(minusDI > plusDI + 5) putConfluence += 2;
  1471. double rsi1 = iRSI(NULL, 0, NCP_RSIPeriod, PRICE_CLOSE, 1), rsi2 = iRSI(NULL, 0, NCP_RSIPeriod, PRICE_CLOSE, 2);
  1472. if(rsi1 > 55 && rsi1 > rsi2) callConfluence++; else if(rsi1 < 45 && rsi1 < rsi2) putConfluence++;
  1473. double bodyPct = (rng1 > 0) ? (body1 / rng1) * 100.0 : 0;
  1474. if(closedBull && body1 > dynamicBodyThresh && bodyPct > 60) callConfluence += 3; else if(closedBear && body1 > dynamicBodyThresh && bodyPct > 60) putConfluence += 3;
  1475. bool nearSup = (g_nearest_sup > 0 && MathAbs(Close[1] - g_nearest_sup) < atrPips * 1.2);
  1476. bool nearRes = (g_nearest_res > 0 && MathAbs(Close[1] - g_nearest_res) < atrPips * 1.2);
  1477. if(nearSup) callConfluence += 2; if(nearRes) putConfluence += 2;
  1478. if(g_ncpPatternBullScore > g_ncpPatternBearScore + 15 && vol1 > volAvg * 1.2) callConfluence += 2; else if(g_ncpPatternBearScore > g_ncpPatternBullScore + 15 && vol1 > volAvg * 1.2) putConfluence += 2;
  1479. if(macd_main > macd_sig && macd_main > 0) callConfluence += 1; if(macd_main < macd_sig && macd_main < 0) putConfluence += 1;
  1480.  
  1481. double totalPossible = callConfluence + putConfluence;
  1482. double callStrength = totalPossible > 0 ? (double)callConfluence / totalPossible * 100 : 50;
  1483. double smoothFactor = MathMin(0.65, 0.45 + (atrPips / 20.0) * 0.1);
  1484. g_smoothCallScore = g_smoothCallScore * (1.0 - smoothFactor) + callStrength * smoothFactor;
  1485. g_smoothPutScore = 100.0 - g_smoothCallScore;
  1486. g_mtgHype = NormalizeDouble(g_smoothCallScore, 1); g_mtgBetrayal = NormalizeDouble(g_smoothPutScore, 1);
  1487.  
  1488. string lockReason = ""; int minConfluence = 8;
  1489. if(callConfluence < minConfluence && putConfluence < minConfluence) lockReason = "LOW CONF(" + IntegerToString(MathMax(callConfluence, putConfluence)) + ")";
  1490. if(callConfluence > putConfluence && (!nearSup || closedBear) && callConfluence < 10) lockReason = "NO SUP/RED";
  1491. if(putConfluence > callConfluence && (!nearRes || closedBull) && putConfluence < 10) lockReason = "NO RES/GRN";
  1492.  
  1493. g_ncpDetailLine1 = (g_ncpMainPattern != "") ? g_ncpMainPattern : "No Pattern";
  1494. g_ncpDetailLine2 = NCPGetSRSummary();
  1495. g_ncpDetailLine3 = "ADX:" + DoubleToString(g_ncpADX,0) + " C:" + IntegerToString(callConfluence) + " P:" + IntegerToString(putConfluence);
  1496.  
  1497. if(lockReason != ""){g_mtgState = "WAIT"; g_mtgReason = lockReason; g_mtgAction = lockReason; g_mtgClr = NEON_YELLOW; g_mtgBullCount = callConfluence; g_mtgBearCount = putConfluence; g_mtgRecovery = NormalizeDouble(atrPips, 1); g_mtgPattern = "LOCK"; g_ncpSignalProcessed = true; return;}
  1498.  
  1499. int minP = 62; double edge = MathAbs(g_smoothCallScore - 50);
  1500. string str = "WEAK"; if(edge >= 28) str = "EXTREME"; else if(edge >= 22) str = "STRONG"; else if(edge >= 15) str = "MEDIUM";
  1501. if(Time[0] != g_ncpLastSignalTime){g_ncpLastSignalTime = Time[0]; g_ncpSignalProcessed = false;}
  1502.  
  1503. if(g_smoothCallScore >= minP && g_smoothCallScore > g_smoothPutScore){g_mtgState = "CALL"; g_mtgReason = g_ncpDetailLine1 + " | " + g_ncpDetailLine2; g_mtgAction = "CALL " + DoubleToString(g_smoothCallScore, 1) + "% [" + str + "]"; g_mtgClr = (str == "EXTREME") ? NEON_GREEN : (str == "STRONG") ? NEON_LIME : NEON_CYAN; if(!g_ncpSignalProcessed){ g_ncpLastSignalType = "CALL"; g_ncpLastSignalTime = Time[0]; }}
  1504. else if(g_smoothPutScore >= minP && g_smoothPutScore > g_smoothCallScore){g_mtgState = "PUT"; g_mtgReason = g_ncpDetailLine1 + " | " + g_ncpDetailLine2; g_mtgAction = "PUT " + DoubleToString(g_smoothPutScore, 1) + "% [" + str + "]"; g_mtgClr = (str == "EXTREME") ? NEON_RED : (str == "STRONG") ? C'255,60,60' : NEON_ORANGE; if(!g_ncpSignalProcessed){ g_ncpLastSignalType = "PUT"; g_ncpLastSignalTime = Time[0]; }}
  1505. else{g_mtgState = "WAIT"; g_mtgReason = g_ncpDetailLine1; string edgeDir = (g_smoothCallScore > g_smoothPutScore) ? ">C" : ">P"; g_mtgAction = edgeDir + " " + DoubleToString(MathMax(g_smoothCallScore, g_smoothPutScore), 0) + "%"; g_mtgClr = NEON_YELLOW; g_ncpSignalProcessed = true;}
  1506.  
  1507. g_mtgBullCount = callConfluence; g_mtgBearCount = putConfluence; g_mtgRecovery = NormalizeDouble(atrPips, 1); g_mtgPattern = str; g_trapScore = 0;
  1508. }
  1509.  
  1510. // ============================================================
  1511. // LEARNING ENGINE v8.0
  1512. // ============================================================
  1513. void LoadBrainMemory(){if(!ENABLE_LEARNING)return;int h=FileOpen(MEMORY_FILE_NAME,FILE_READ|FILE_TXT|FILE_SHARE_READ);if(h!=INVALID_HANDLE){if(FileSize(h)>10){string line=FileReadString(h);StringReplace(line," ","");string parts[];int cnt=StringSplit(line,',',parts);if(cnt>=7){g_totalTrades=(int)StringToInteger(parts[0]);g_callTrades=(int)StringToInteger(parts[1]);g_putTrades=(int)StringToInteger(parts[2]);g_callWins=(int)StringToInteger(parts[3]);g_putWins=(int)StringToInteger(parts[4]);g_callWeight=StringToDouble(parts[5]);g_putWeight=StringToDouble(parts[6]);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;}}FileClose(h);}}
  1514. void SaveBrainMemory(){if(!ENABLE_LEARNING)return;int h=FileOpen(MEMORY_FILE_NAME,FILE_WRITE|FILE_TXT|FILE_SHARE_WRITE);if(h!=INVALID_HANDLE){string line=IntegerToString(g_totalTrades)+","+IntegerToString(g_callTrades)+","+IntegerToString(g_putTrades)+","+IntegerToString(g_callWins)+","+IntegerToString(g_putWins)+","+DoubleToString(g_callWeight,6)+","+DoubleToString(g_putWeight,6);FileWriteString(h,line);FileFlush(h);FileClose(h);}}
  1515. 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;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);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();}
  1516. void CheckPreviousResult(){if(g_ncpSignalProcessed||g_ncpLastSignalType==""||g_ncpLastSignalTime==0)return;if(Time[0]==g_ncpLastSignalTime)return;double sigOpen=iOpen(NULL,PERIOD_M1,1);double sigClose=iClose(NULL,PERIOD_M1,1);bool win=false;if(g_ncpLastSignalType=="CALL")win=(sigClose>sigOpen);else if(g_ncpLastSignalType=="PUT")win=(sigClose<sigOpen);g_ncpSignalProcessed=true;UpdateBrain(g_ncpLastSignalType,win);}
  1517.  
  1518. // ============================================================
  1519. // DASHBOARD DRAWING HELPERS
  1520. // ============================================================
  1521. 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){if(StringFind(g_visualTrapPro.boxStatus, "[") >= 0){Tx("c20_v0",x+8,y+30,g_visualTrapPro.boxStatus,NEON_WHITE,11,true);Tx("c20_v1",x+8,y+52,"GANN BACKGROUND MATCH!",NEON_YELLOW,9,false);return;}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;}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]";bool isCallSig=(g_mtgState=="CALL");bool isPutSig=(g_mtgState=="PUT");bool ncpMatch=((isCallSig&&g_pairSigs[i]=="CALL")||(isPutSig&&g_pairSigs[i]=="PUT"));color dc;string prefix="";if(ncpMatch){dc=NEON_PURPLE;prefix="* ";}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;}}
  1522. 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);double volLast=(double)iVolume(NULL,PERIOD_M1,1);double volPrev=(double)iVolume(NULL,PERIOD_M1,2);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{vColor=NEON_CYAN;vText="UP "+DoubleToString(volRatio,1)+"x LO";}}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{vColor=NEON_PINK;vText="DN "+DoubleToString(volRatio,1)+"x LO";}}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);}
  1523. 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";}
  1524. 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;}
  1525. 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;}
  1526. 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;}
  1527. 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;}
  1528. 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());}
  1529. 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);}
  1530. 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);}
  1531. 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);}
  1532. 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);}
  1533.  
  1534. // ============================================================
  1535. // MAIN DASHBOARD DRAW (UPDATED LAYOUT)
  1536. // ============================================================
  1537. void Draw(){
  1538. HideSPM(); DelDashboard();
  1539. int W=DASH_W,G=8,CW=(W-2*G)/3,CH=110,cx=POS_X+G,yy=POS_Y;
  1540. int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
  1541. g_marketMode=DetectMarketMode(brain,g_rsc,cp,nb);
  1542. if(StringLen(g_prevMode)>0&&g_prevMode!=g_marketMode){g_signalTime=0;g_finalSignal="WAIT";}
  1543. g_prevMode=g_marketMode;
  1544. CalcOTCCrowd();UpdateAccuracy();UpdateWeights();
  1545. double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
  1546. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  1547. UpdateRiskControl();CheckMTFConfirmation();
  1548. double tfaScore=CalcAdvancedTFA(g_tfa_detail);
  1549. color ha1C=(g_haM1=="HA BULLISH 1")?NEON_GREEN:(g_haM1=="HA BEARISH 1")?NEON_RED:NEON_YELLOW;
  1550. color ha5C=(g_haM5=="HA BULLISH 5")?NEON_GREEN:(g_haM5=="HA BEARISH 5")?NEON_RED:NEON_YELLOW;
  1551. color biasClr;string biasStr=CalcAdvancedMarketBias(biasClr,brain,g_rsc);
  1552. string strategyMS=g_finalSignal;
  1553. color stratC=(g_strategyType=="TRAP")?NEON_PURPLE:(g_strategyType=="TREND")?NEON_GREEN:CGR;
  1554. string stratSig="";if(g_strategyType=="TRAP"||g_strategyType=="TREND"){if(StringFind(g_strategyReason,"CALL")>=0)stratSig="CALL";else if(StringFind(g_strategyReason,"PUT")>=0)stratSig="PUT";}
  1555. string stratLabel=(g_strategyType=="TRAP")?"TRAP "+stratSig:(g_strategyType=="TREND")?"TREND "+stratSig:"NO STRATEGY";
  1556. string finalSig=g_finalSignal;color sigC=NEON_YELLOW;
  1557. if(ENABLE_BB_PULLBACK&&g_bbSignal!="--"&&(finalSig=="WAIT"||finalSig=="")){finalSig="BB "+g_bbSignal;sigC=g_bbColor;}
  1558. 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;}
  1559.  
  1560. // ROW 1
  1561. Cube("c1",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"PAIR",NEON_CYAN,Symbol(),NEON_BLUE,13);
  1562. // --- BROKER KILLER CUBE ---
  1563. string trapResult = OTCRoundTrapKiller();
  1564. color killerBorder = (trapResult == "PUT" || trapResult == "CALL") ? g_roundTrapClr : NEON_PURPLE;
  1565. Bx("c2",cx+CW+G,yy,CW,CH,BG_DARK2,killerBorder);
  1566. Tx("c2_l",cx+CW+G+10,yy+4,"BROKER KILLER",NEON_PURPLE,10,true);
  1567.  
  1568. int trapSec = (int)(TimeCurrent() % 60);
  1569. color timerClr = (trapSec >= 10 && trapSec <= 30) ? NEON_RED : CGR;
  1570. Tx("c2_t",cx+CW+G+10,yy+22,"Sec: "+IntegerToString(trapSec)+" | "+(IsSidewaysMarket()?"SIDEWAYS":"TREND"),timerClr,10,true);
  1571.  
  1572. bool jpy = (StringFind(Symbol(), "JPY") >= 0);
  1573. double pip = jpy ? 0.01 : 0.0001;
  1574. string roundTxt = (g_hrn_price > 0) ? ShortPrice(g_hrn_price) : "--";
  1575. bool isNear = (g_hrn_price > 0 && MathAbs(Close[0] - g_hrn_price) < 8*pip);
  1576. color roundClr = isNear ? NEON_LIME : C'100,100,120';
  1577. Tx("c2_r",cx+CW+G+10,yy+40,"Round: "+roundTxt,roundClr,11,true);
  1578.  
  1579. Calc30SecHA();
  1580. string haTxt = Is30SecHABull()?"HA UP":Is30SecHABear()?"HA DOWN":"DOJI";
  1581. color haClr = Is30SecHABull()?NEON_GREEN:Is30SecHABear()?NEON_RED:NEON_YELLOW;
  1582. Tx("c2_h",cx+CW+G+10,yy+58,haTxt,haClr,11,true);
  1583.  
  1584. if(trapResult == "PUT" || trapResult == "CALL") {
  1585. Tx("c2_v",cx+CW+G+10,yy+80,g_roundTrapSig,g_roundTrapClr,14,true);
  1586. } else {
  1587. Tx("c2_v",cx+CW+G+10,yy+80,g_roundTrapSig,g_roundTrapClr,10,false);
  1588. }
  1589.  
  1590. double gP,rP;string rsn;color pClr;CalcAdvancedPrediction(gP,rP,rsn,pClr);
  1591. g_frozen_gProb=gP;g_frozen_rProb=rP;g_frozen_pAction=rsn;g_frozen_pColor=pClr;g_last_freeze_bar=Time[0];
  1592. 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);
  1593. 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;
  1594. 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);
  1595. 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);
  1596. 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;
  1597.  
  1598. // ROW 2
  1599. 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);
  1600. 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);
  1601. color sClr=CGR;string sName=GetCurrentSession(sClr);bool isAct=IsSessionActive();
  1602. 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);
  1603. 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;
  1604.  
  1605. // ROW 3
  1606. DrawOtherPairsCube(cx,yy,CW,CH);DrawOTCQuickCube(cx+CW+G,yy,CW,CH);
  1607. 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;
  1608. Tx("c_brain_r3_v",cx+2*(CW+G)+10,yy+28,(brain>=0?"+":"")+DoubleToString(brain,1),brainClr3,22,true);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;
  1609.  
  1610. // ROW 4
  1611. 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;
  1612. 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);
  1613. 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);
  1614. 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';}
  1615. 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]";
  1616. 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);
  1617. 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);
  1618. 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);
  1619. 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;
  1620.  
  1621. // ROW 5 (EXACT 3PX GAPS & DYNAMIC SR COLORS)
  1622. int CH5=140;
  1623. if(ENABLE_MTG){
  1624. bool isTrap=(g_mtgState=="PUT TRAP"||g_mtgState=="CALL TRAP");color mtgC=g_mtgClr;if(mtgC==CGR||mtgC==clrGray)mtgC=C'55,65,85';color borderC=isTrap?NEON_PURPLE:mtgC;
  1625. Bx("c_mtg",cx,yy,CW,CH5,BG_DARK2,borderC);
  1626. string runStr="";if(g_mtgBullCount>=2)runStr=" +"+IntegerToString(g_mtgBullCount)+"B";else if(g_mtgBearCount>=2)runStr=" +"+IntegerToString(g_mtgBearCount)+"R";
  1627.  
  1628. // NCP PRO EXACT 3PX GAPS (Font 9=11px, Font 10=13px, Font 13=16px)
  1629. Tx("c_mtg_l",cx+10,yy+4,"NCP PRO v8"+runStr,NEON_PURPLE,9,true); // Y=4
  1630. int stateFS=isTrap?11:13;Tx("c_mtg_s",cx+10,yy+18,g_mtgState,mtgC,stateFS,true); // Y=18 (4+11+3)
  1631.  
  1632. 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';
  1633. Bx("c_mtg_cbb",cx+10,yy+37,CW-22,6,BG_DARK4,BG_DARK4);Bx("c_mtg_cbf",cx+10,yy+37,cW,6,cBarC,cBarC); // Y=37 (18+16+3)
  1634. Tx("c_mtg_ct",cx+10,yy+43,"CALL: "+DoubleToString(g_mtgHype,1)+"%",NEON_GREEN,10,true); // Y=43 (37+6)
  1635.  
  1636. 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';
  1637. Bx("c_mtg_pbb",cx+10,yy+59,CW-22,6,BG_DARK4,BG_DARK4);Bx("c_mtg_pbf",cx+10,yy+59,pW,6,pBarC,pBarC); // Y=59 (43+13+3)
  1638. Tx("c_mtg_pt",cx+10,yy+65,"PUT: "+DoubleToString(g_mtgBetrayal,1)+"%",NEON_RED,10,true); // Y=65 (59+6)
  1639.  
  1640. 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;
  1641. Tx("c_mtg_a",cx+10,yy+81,actD,actC,10,true); // Y=81 (65+13+3)
  1642. Tx("c_mtg_r",cx+10,yy+97,"ATR: "+DoubleToString(g_mtgRecovery,1)+"p",CGR,9,false); // Y=97 (81+13+3)
  1643. } else {
  1644. 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);
  1645. }
  1646.  
  1647. 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);
  1648. 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);
  1649. 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);
  1650. Tx("c18_r",cx+2*(CW+G)+10,yy+24,"R: "+(g_nearest_res>0?ShortPrice(g_nearest_res):"--"),NEON_RED,13,true);Tx("c18_s",cx+2*(CW+G)+10,yy+54,"S: "+(g_nearest_sup>0?ShortPrice(g_nearest_sup):"--"),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;
  1651.  
  1652.  
  1653. // ROW 6
  1654. int CH6=120;
  1655. // ===== VISUAL TRAP PRO CUBE =====
  1656. Bx("c15",cx,yy,CW,CH6,BG_DARK2,g_visualTrapPro.verdictColor);
  1657. Tx("c15_l",cx+10,yy+4,"VISUAL TRAP",NEON_PURPLE,10,true);
  1658. Tx("c15_box",cx+10,yy+22,g_visualTrapPro.boxStatus,CGR,10,true);
  1659. Tx("c15_gann",cx+10,yy+38,g_visualTrapPro.gannStatus,g_visualTrapPro.gannColor,10,true);
  1660. Tx("c15_m30",cx+10,yy+54,g_visualTrapPro.m30Dir,(StringFind(g_visualTrapPro.m30Dir,"UP")>=0)?NEON_GREEN:NEON_RED,10,true);
  1661. Tx("c15_m1",cx+10,yy+70,g_visualTrapPro.m1Seq,CGR,9,false);
  1662. Tx("c15_v",cx+10,yy+88,g_visualTrapPro.verdict,g_visualTrapPro.verdictColor,13,true);
  1663. 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);
  1664. 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);
  1665. 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);
  1666.  
  1667. // ===== NCP ANALYSIS CUBE (PURPLE THEME, BIGGER TEXT, EXACT 3PX GAPS, DYNAMIC SR) =====
  1668. Bx("c_reason",cx+2*(CW+G),yy,CW,CH6,BG_DARK2,NEON_PURPLE);
  1669. Tx("c_reason_l",cx+2*(CW+G)+10,yy+4,"NCP ANALYSIS",NEON_PURPLE,11,true); // Y=4
  1670.  
  1671. string patStr2=(g_ncpMainPattern!="")?g_ncpMainPattern:"--";
  1672. if(StringLen(patStr2)>24)patStr2=StringSubstr(patStr2,0,24);
  1673. color patC2=(g_ncpPatternBullScore>g_ncpPatternBearScore)?NEON_GREEN:(g_ncpPatternBearScore>g_ncpPatternBullScore)?NEON_RED:NEON_PURPLE;
  1674. Tx("c_reason_p",cx+2*(CW+G)+10,yy+21,"P: "+patStr2,patC2,11,false); // Y=21 (4+14+3)
  1675.  
  1676. // DYNAMIC S/R COLORS (Green for Support, Red for Resistance)
  1677. string supTxt = (g_nearest_sup > 0) ? "S: "+ShortPrice(g_nearest_sup) : "S: --";
  1678. Tx("c_reason_s",cx+2*(CW+G)+10,yy+38,supTxt,NEON_GREEN,11,false); // Y=38 (21+14+3)
  1679.  
  1680. string resTxt = (g_nearest_res > 0) ? "R: "+ShortPrice(g_nearest_res) : "R: --";
  1681. Tx("c_reason_r",cx+2*(CW+G)+10,yy+55,resTxt,NEON_RED,11,false); // Y=55 (38+14+3)
  1682.  
  1683. string mtfStr2=g_ncpDetailLine3;
  1684. if(StringLen(mtfStr2)>24)mtfStr2=StringSubstr(mtfStr2,0,24);
  1685. color adxTextColor = GetADXColor(g_ncpADX, g_ncpPlusDI, g_ncpMinusDI); // Dynamic ADX Color
  1686. Tx("c_reason_m",cx+2*(CW+G)+10,yy+72,"M: "+mtfStr2,adxTextColor,11,false); // Y=72 (55+14+3)
  1687.  
  1688. string revReason=DetectSuddenReversal();color revColor=NEON_PURPLE;
  1689. if(StringFind(revReason,"BULL")>=0)revColor=NEON_GREEN;
  1690. if(StringFind(revReason,"BEAR")>=0)revColor=NEON_RED;
  1691. Tx("c_reason_v",cx+2*(CW+G)+10,yy+89,(StringLen(revReason)>0?revReason:"--"),revColor,11,false); // Y=89 (72+14+3)
  1692. yy+=CH6+G;
  1693.  
  1694. // BB ROW
  1695. if(ENABLE_BB_PULLBACK){
  1696. 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);
  1697. string ha30Str=Is30SecHABull()?"BULL":Is30SecHABear()?"BEAR":"DOJI";color ha30C2=Is30SecHABull()?NEON_GREEN:Is30SecHABear()?NEON_RED:NEON_YELLOW;
  1698. double adxD=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);double rsiD=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  1699. 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);
  1700. 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...",CGR,9,false);}
  1701. yy+=bbRowH+G;
  1702. }
  1703.  
  1704. // BOTTOM FILTER STATUS (HRN, SPM, STRATEGY CUBES REMOVED)
  1705. 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;
  1706. Bx("c_filter",cx,yy,fsW,22,BG_DARK3,fsC);Tx("c_filter_v",cx+10,yy+4,"FILTER: "+g_filterStatus,fsC,11,true);
  1707. HideSPM();ChartRedraw();
  1708. }
  1709.  
  1710. 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);}
  1711.  
  1712. 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";}}}
  1713. void FinalSignalEngine(double brain,int cp,int mts){
  1714. g_filterStatus="ALL CLEAR";
  1715. 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;}
  1716. 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;}
  1717. 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;}
  1718. 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;}
  1719. 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;}}
  1720. 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;}
  1721. bool reverseSignal=(g_accuracy<45.0&&g_acc_total>20);if(reverseSignal)g_filterStatus="REVERSE MODE";
  1722. string ms=DetectMyStrategy();
  1723. 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;}
  1724. 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";
  1725. 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";}
  1726. 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;}
  1727. 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;if(ENABLE_TELEGRAM)SendTelegramAlert("AIBRAIN\n"+Symbol()+"\n"+sig+"\nConf: "+DoubleToString(conf,0)+"%\n"+g_filterStatus);Print(msg);}
  1728. 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);}
  1729. int CalcPairQuality(string pair,string &outSig,string &outDetail){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||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,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;double m5_o1=iOpen(pair,PERIOD_M5,1),m5_h1=iHigh(pair,PERIOD_M5,1),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),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,m5haO2=(m5_o3+m5_c3)/2.0,m5haO1=(m5haO2+m5haC2)/2.0;haM5Bull=(m5haC1>m5haO1);haM5Bear=(m5haC1<m5haO1);}double rsi=iRSI(pair,PERIOD_M1,14,PRICE_CLOSE,1);double vol1=(double)iVolume(pair,PERIOD_M1,1),vol2=(double)iVolume(pair,PERIOD_M1,2);double volRatio=(vol2>0)?vol1/vol2:1.0;double spread=(double)MarketInfo(pair,MODE_SPREAD);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;}bool bullDir=false,bearDir=false;if(haM1Bull&&haM5Bull)bullDir=true;else if(haM1Bear&&haM5Bear)bearDir=true;else if(haM1Bull&&rsi<45)bullDir=true;else if(haM1Bear&&rsi>55)bearDir=true;else{outSig="WAIT";return 0;}int score=0;string det="";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+";}if(bullDir&&haM5Bull){score+=15;det+="HA5+";}else if(bearDir&&haM5Bear){score+=15;det+="HA5+";}else det+="HA5-";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 ";}}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 ";}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";}if(spread<=3)score+=10;else if(spread<=6)score+=6;else if(spread<=10)score+=3;outSig=bullDir?"CALL":"PUT";outDetail=det;return MathMin(100,score);}
  1730. 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();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));if(conf<60)continue;if(expTime<(int)(now-20))continue;string qSig="WAIT",qDetail="";int qScore=CalcPairQuality(pair,qSig,qDetail);if(qSig!=sig)continue;if(qScore<45)continue;tmpNames[tmpCount]=pair;tmpSigs[tmpCount]=sig;tmpConfs[tmpCount]=conf;tmpScores[tmpCount]=qScore;tmpDetails[tmpCount]=qDetail;tmpCount++;}FileClose(h);for(int i=0;i<tmpCount-1;i++){for(int j=0;j<tmpCount-i-1;j++){if(tmpScores[j]<tmpScores[j+1]){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;}}}g_pairCount=MathMin(5,tmpCount);for(int i=0;i<g_pairCount;i++){g_pairNames[i]=tmpNames[i];g_pairSigs[i]=tmpSigs[i];g_pairConfs[i]=tmpScores[i];}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)+"%";}}
  1731.  
  1732. 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";double atrVal=iATR(NULL,PERIOD_M1,14,0);double offset=(atrVal>0)?atrVal*0.25:Point*30;datetime tPos=Time[0]+8;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);}
  1733.  
  1734. // ============================================================
  1735. // EVENT HANDLERS
  1736. // ============================================================
  1737. int OnInit(){
  1738. InitNW();NuclearDeleteAll();
  1739. g_hrn_price=0;g_hrn_brk_bars=0;g_hrn_scan_bar=0;g_hrn_score=0;g_hrn_confirmed_break=false;
  1740. g_nearest_res=0;g_nearest_sup=0;g_rj_cnt=0;g_pairCount=0;
  1741. g_marketMode="RANGE";g_prevMode="";g_last_freeze_bar=0;g_lastNotified="";
  1742. g_accuracy=ValidateHistoricalAccuracy();g_acc_correct=0;g_acc_total=0;g_acc_lastBar=0;
  1743. g_lastPredGreen=50.0;g_lastPredBar=0;g_lossStreak=0;g_tradingStopped=false;
  1744. g_strategyType="NONE";g_frozen_gProb=50;g_frozen_rProb=50;g_calc_gProb=50;g_calc_rProb=50;
  1745. g_commonCount=0;g_wickLineCount=0;g_tfa_detail="";g_htfLevelCount=0;g_mtfConfirmed=true;
  1746. g_filterStatus="ALL CLEAR";g_symbolKey="";g_brokerBias=0.0;
  1747. g_bbSignal="--";g_bbColor=NEON_YELLOW;g_bbTouchPrice=0.0;g_bbSignalTime=0;g_bbSignalBars=0;g_bbDetail="";g_bbLineCount=0;
  1748. 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_ncpADX=0;g_ncpPlusDI=0;g_ncpMinusDI=0;
  1749. g_smoothCallScore=50.0;g_smoothPutScore=50.0;g_callWeight=1.0;g_putWeight=1.0;
  1750. g_totalTrades=0;g_callTrades=0;g_putTrades=0;g_callWins=0;g_putWins=0;
  1751. g_ncpLastSignalTime=0;g_ncpLastSignalType="";g_ncpLastEntryPrice=0.0;g_ncpSignalProcessed=true;
  1752. g_ncpTrend.m15Direction="FLAT";g_ncpTrend.m15Strength=0;g_ncpTrend.aligned=false;
  1753. g_ncpSRCount=0;g_ncpDetailLine1="";g_ncpDetailLine2="";g_ncpDetailLine3="";
  1754. g_ncpPatternBullScore=0;g_ncpPatternBearScore=0;g_ncpMainPattern="";
  1755. g_stableResCount=0;g_stableSupCount=0;g_lastSRScan=0;
  1756. g_ha30_open=0;g_ha30_close=0;g_ha30_high=0;g_ha30_low=0;g_ha30_bar=0;
  1757. g_rsc=0; // SPM Disabled
  1758. if(ENABLE_LEARNING)LoadBrainMemory();
  1759. LoadMLWeights();
  1760. EventSetTimer(1);
  1761. Print("===========================================");
  1762. Print("AIBRAIN v46.3 - NCP PRO v8.0 ADVANCED");
  1763. Print("Removed: HRN/SPM/Strategy Cubes | SPM Disabled");
  1764. Print("Added: ShortPrice S/R, Purple NCP, 3px Gaps");
  1765. Print("Fixed: NCPCheckDualPattern bear1 Bug");
  1766. Print("===========================================");
  1767. return INIT_SUCCEEDED;
  1768. }
  1769.  
  1770. void OnDeinit(const int r){
  1771. EventKillTimer();Comment("");
  1772. for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);if(StringFind(nm,PFX)==0)ObjectDelete(nm);}
  1773. }
  1774.  
  1775. void OnTimer(){
  1776. if(Bars<50)return;
  1777. static datetime last5min=0;
  1778. if(Time[0]/300!=last5min/300){DetectHiddenLevels();last5min=Time[0];}
  1779. CalcVisualTrapPro();
  1780. // ReadSPM() CALLED REMOVED COMPLETELY AS REQUESTED
  1781.  
  1782. CalcHA();UpdateHRN();UpdateSR();DetectCommonPoints();DetectWickRejections();
  1783. DrawCommonPoints();DrawWickRejectLines();DrawHiddenLevels();
  1784. if(ENABLE_BB_PULLBACK)DetectBBPullback();
  1785. if(ENABLE_MTG)CalculateMTG();
  1786.  
  1787. int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
  1788. double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
  1789. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  1790. ScanSignals();FinalSignalEngine(brain,cp,mts);BroadcastSignal();UpdateTimer();Draw();
  1791. }
  1792. // ============================================================
  1793. // OTC BROKER KILLER LOGIC v3 (FIXED REFRESH & VOLUME SPIKE)
  1794. // ============================================================
  1795. string g_roundTrapSig = "--";
  1796. color g_roundTrapClr = CGR;
  1797.  
  1798. string OTCRoundTrapKiller() {
  1799. int sec = (int)(TimeCurrent() % 60);
  1800.  
  1801. // FIX 1: Dynamic Time Window (10-35 sec) - Extended for delayed traps
  1802. if(sec < 10 || sec > 35) {
  1803. g_roundTrapSig = "WAIT ("+IntegerToString(sec)+"s)";
  1804. g_roundTrapClr = CGR;
  1805. return "WAIT";
  1806. }
  1807.  
  1808. // FIX 2: Sideways Check
  1809. bool isSideways = IsSidewaysMarket();
  1810. if(!isSideways) {
  1811. g_roundTrapSig = "NO SIDEWAYS";
  1812. g_roundTrapClr = NEON_ORANGE;
  1813. return "WAIT";
  1814. }
  1815.  
  1816. // FIX 3: Round Number Check (Using advanced HRN)
  1817. bool jpy = (StringFind(Symbol(), "JPY") >= 0);
  1818. double pip = jpy ? 0.01 : 0.0001;
  1819. bool nearRound = false;
  1820. if(g_hrn_price > 0 && MathAbs(Close[0] - g_hrn_price) < 8*pip) nearRound = true;
  1821.  
  1822. if(!nearRound) {
  1823. g_roundTrapSig = "NO ROUND";
  1824. g_roundTrapClr = NEON_ORANGE;
  1825. return "WAIT";
  1826. }
  1827.  
  1828. // ====================================================
  1829. // FIX 4: LIVE M1 HA CALCULATION (No Refresh Lag)
  1830. // ====================================================
  1831. double m1_o = Open[0], m1_c = Close[0], m1_h = High[0], m1_l = Low[0];
  1832. double m1_o1 = Open[1], m1_c1 = Close[1], m1_h1 = High[1], m1_l1 = Low[1];
  1833. double m1_o2 = Open[2], m1_c2 = Close[2];
  1834.  
  1835. // Previous HA (Closed)
  1836. double ha_c_prev = (m1_o1 + m1_h1 + m1_l1 + m1_c1) / 4.0;
  1837. double ha_o_prev = (m1_o2 + m1_c2) / 2.0;
  1838.  
  1839. // Current Live HA (Real-time refresh, no lag)
  1840. double ha_c_curr = (m1_o + m1_h + m1_l + m1_c) / 4.0;
  1841. double ha_o_curr = (ha_o_prev + ha_c_prev) / 2.0;
  1842.  
  1843. bool haLiveBull = (ha_c_curr > ha_o_curr);
  1844. bool haLiveBear = (ha_c_curr < ha_o_curr);
  1845.  
  1846. // ====================================================
  1847. // FIX 5: VOLUME SPIKE CONFIRMATION (The real trigger)
  1848. // ====================================================
  1849. double curVol = (double)iVolume(NULL, PERIOD_M1, 0);
  1850. double avgVol = 0;
  1851. for(int v = 2; v <= 11; v++) avgVol += (double)iVolume(NULL, PERIOD_M1, v);
  1852. avgVol /= 10.0;
  1853.  
  1854. bool volumeSpike = false;
  1855. if(avgVol > 0 && curVol > avgVol * 1.8) volumeSpike = true;
  1856.  
  1857. // FINAL TRAP LOGIC
  1858. if(haLiveBull && volumeSpike) {
  1859. g_roundTrapSig = "CALL TRAP!";
  1860. g_roundTrapClr = NEON_GREEN;
  1861. Print("VOL+GREEN = CALL! Sec:", sec);
  1862. return "CALL";
  1863. }
  1864. else if(haLiveBear && volumeSpike) {
  1865. g_roundTrapSig = "PUT TRAP!";
  1866. g_roundTrapClr = NEON_RED;
  1867. Print("VOL+RED = PUT! Sec:", sec);
  1868. return "PUT";
  1869. }
  1870.  
  1871. // If HA changed but no volume, show as forming
  1872. if(haLiveBull || haLiveBear) {
  1873. g_roundTrapSig = "FORMING...";
  1874. g_roundTrapClr = NEON_YELLOW;
  1875. return "WAIT";
  1876. }
  1877.  
  1878. g_roundTrapSig = "HA DOJI";
  1879. g_roundTrapClr = NEON_YELLOW;
  1880. return "WAIT";
  1881. }
  1882. 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);}
  1883. //+------------------------------------------------------------------+
RAW Paste Data Copied