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. //| Updated: MTF ANALYSIS replaced with PSYCHE BREAKER v3.0 |
  6. //| ALL ERRORS FIXED - CLEAN VERSION |
  7. //+------------------------------------------------------------------+
  8. #property copyright "AIBRAIN ULTIMATE - KM RANA"
  9. #property version "46.3"
  10. #property strict
  11. #property indicator_chart_window
  12.  
  13. #define PFX "AIB9_"
  14. #define VER "v46.3"
  15. #define LB 18
  16. #define MAX_LEVELS 5
  17. #define MAX_REJ 50
  18. #define LOOKBACK 50
  19.  
  20. // ============================================================
  21. // WEIGHTED PATTERN STRUCT & LOGIC (PRO FORMULA)
  22. // ============================================================
  23. struct WPattern {
  24. string sig; // CALL, PUT, 50/50, WAIT
  25. double conf; // 0 - 100
  26. bool isTrap; // Broker trap detected?
  27. string pat; // Current Pattern e.g. GGR
  28. string str; // STRONG, WEAK, MEDIUM
  29. double trapScr;// 0 - 100
  30. };
  31.  
  32. WPattern GetWeightedPattern(int pSize, int &colArr[], int totalCandles) {
  33. WPattern r;
  34. r.sig="WAIT"; r.conf=50; r.isTrap=false; r.pat=""; r.str="NONE"; r.trapScr=0;
  35. if(totalCandles < 30) return r;
  36.  
  37. r.pat = "";
  38. for(int j=0; j<pSize; j++) r.pat += (colArr[j]==1) ? "G" : "R";
  39.  
  40. int cw=0, pw=0, tw=0, cm=0, pm=0, tm=0;
  41.  
  42. for(int i=2; i<=totalCandles-pSize; i++) {
  43. string hp="";
  44. for(int j=0; j<pSize; j++) hp += (colArr[i+j]==1) ? "G" : "R";
  45.  
  46. if(hp == r.pat) {
  47. double rw = 1.0 + ((double)(totalCandles - i) / totalCandles) * 3.0;
  48. double sw = 1.0;
  49. if(i-1 >= 0) {
  50. double nb = MathAbs(Close[i-1]-Open[i-1]);
  51. double nr = High[i-1]-Low[i-1];
  52. if(nr>0) {
  53. double br = nb/nr;
  54. if(br>0.65) sw=2.0;
  55. else if(br>0.40) sw=1.5;
  56. else if(br>0.15) sw=1.0;
  57. else sw=0.5;
  58. }
  59. }
  60. double fw = rw * sw;
  61. tm++; tw += (int)fw;
  62. if(colArr[i-1]==1) { cm++; cw+=(int)fw; }
  63. else { pm++; pw+=(int)fw; }
  64. }
  65. }
  66.  
  67. if(tw > 0) {
  68. double domPct = (double)MathMax(cw, pw) / tw * 100.0;
  69. int wk=0;
  70. for(int i=0; i<MathMin(3, totalCandles); i++) {
  71. double b=MathAbs(Close[i]-Open[i]), rng=High[i]-Low[i];
  72. if(rng>0 && (b/rng)<0.35) wk++;
  73. }
  74. r.trapScr = domPct * 0.6 + ((double)wk/3.0)*100.0*0.4;
  75. if(r.trapScr > 100) r.trapScr = 100;
  76. r.isTrap = (domPct > 78.0 && wk >= 2);
  77. }
  78.  
  79. if(tm < 3) return r;
  80. double cP = (tw>0) ? ((double)cw/tw)*100.0 : 50.0;
  81. double pP = (tw>0) ? ((double)pw/tw)*100.0 : 50.0;
  82.  
  83. if(r.isTrap && cP > 80.0 && cP > pP) { r.sig="PUT"; r.conf=MathMin(95.0, cP); }
  84. else if(r.isTrap && pP > 80.0 && pP > cP) { r.sig="CALL"; r.conf=MathMin(95.0, pP); }
  85. else if(cP >= 55.0 && cP > pP) { r.sig="CALL"; r.conf=cP; }
  86. else if(pP >= 55.0 && pP > cP) { r.sig="PUT"; r.conf=pP; }
  87. else { r.sig="50/50"; r.conf=50.0; }
  88.  
  89. if(r.conf >= 85.0) r.str="V.STRONG";
  90. else if(r.conf >= 72.0) r.str="STRONG";
  91. else if(r.conf >= 60.0) r.str="MEDIUM";
  92. else r.str="WEAK";
  93.  
  94. return r;
  95. }
  96.  
  97. input string SPM_FILE = "KM RANA";
  98. input int HOLD_SEC = 60;
  99. input int POS_X = 4;
  100. input int POS_Y = 20;
  101. input int DASH_W = 660;
  102. input bool SHOW_TIMER = true;
  103. input bool SHOW_SR_LINES = true;
  104. input string ENTRY_MODE = "TIME";
  105. input int FLAG_MIN_SEC = 10;
  106. input int FLAG_MAX_SEC = 35;
  107. input int TIME_MIN_SEC = 10;
  108. input int TIME_MAX_SEC = 35;
  109. input int MIN_REMAINING_SEC = 15;
  110. input double REVERSAL_PCT = 30.0;
  111. input double WICK_PCT = 0.65;
  112. input int HRN_CONFIRM_BARS = 2;
  113. input bool HA_ALIGN_FILTER = false;
  114. input bool CONSENSUS_FILTER = false;
  115. input bool ENABLE_NOTIFY = true;
  116. input bool FAST_MODE = false;
  117. input int BROKER_SPREAD_THRESHOLD= 6;
  118. input double OTC_TRAP_WEIGHT = 15.0;
  119. input int CROWD_EXTREME_PCT = 70;
  120. input bool ENABLE_BROKER_KILLER = true;
  121. input bool ENABLE_SESSION_FILTER = true;
  122. input bool ENABLE_SPIKE_FILTER = true;
  123. input bool ENABLE_LAST_SEC_BLOCK = true;
  124. input bool ENABLE_RISK_CONTROL = true;
  125. input bool ENABLE_ENTRY_ZONE = true;
  126. input bool ML_ADAPTIVE = true;
  127. input bool VOLUME_PROFILE_TRAP = true;
  128. input bool MTF_CONFIRM = false;
  129. input bool ENABLE_TELEGRAM = false;
  130. input string TELEGRAM_TOKEN = "";
  131. input string TELEGRAM_CHAT_ID = "";
  132. input string TRADE_MODE = "NORMAL";
  133. input string STRATEGY_MODE = "TRAP_ONLY";
  134. input int STRATEGY_THRESHOLD = 75;
  135. input int MAX_LOSS_STREAK = 2;
  136. input double MIN_CONFIDENCE = 75.0;
  137. input bool ENABLE_RISK_LOCK = true;
  138. input double PATTERN_TOLERANCE_PIPS = 8.0;
  139. input int MIN_PATTERN_SEPARATION = 5;
  140. input bool SHOW_COMMON_POINTS = true;
  141. input double COMMON_POINT_TOL_PIPS = 15.0;
  142. input bool SHOW_WICK_REJECT_LINES = true;
  143. input int WICK_MIN_TOUCHES = 1;
  144. input double WICK_ZONE_PIPS = 15.0;
  145. input int WICK_EXPIRE_BARS = 60;
  146.  
  147. // ============================================================
  148. // BB PULLBACK SETTINGS
  149. // ============================================================
  150. input bool ENABLE_BB_PULLBACK = true;
  151. input int BB_PERIOD = 20;
  152. input double BB_DEVIATION = 2.0;
  153. input int BB_SIGNAL_EXPIRE_BARS = 5;
  154.  
  155. // ============================================================
  156. // NCP PRO v8.0 ADVANCED SETTINGS
  157. // ============================================================
  158. input bool ENABLE_MTG = true;
  159. input int NCP_OpenNoiseSeconds = 3;
  160. input int NCP_KillZoneSeconds = 55;
  161. input double NCP_MaxSpreadPips = 4.0;
  162. input int NCP_ATRPeriod = 14;
  163. input double NCP_MinATRPips = 0.4;
  164. input int NCP_FastEMA = 3;
  165. input int NCP_MidEMA = 7;
  166. input int NCP_SlowEMA = 15;
  167. input bool NCP_UseM5Confirm = true;
  168. input bool NCP_UseVolume = true;
  169. input double NCP_RoundStepPips = 10.0;
  170. input double NCP_RoundTolPips = 4.0;
  171. input int NCP_MinProbMedium = 57;
  172. input int NCP_MinProbStrong = 63;
  173. input int NCP_MinProbExtreme = 70;
  174. input bool NCP_UseRSINorm = true;
  175. input int NCP_RSIPeriod = 10;
  176. input double NCP_RSIBase = 50.0;
  177. input double NCP_RSIM5Target = 45.0;
  178. input double NCP_RSIM15Target = 40.0;
  179. input bool ENABLE_LEARNING = true;
  180. input string MEMORY_FILE_NAME = "NCP_Brain_v8.csv";
  181. input int MIN_TRADES_TO_LEARN = 15;
  182. input double LEARNING_STEP = 0.025;
  183. input bool ENABLE_TRAP_DETECTION = true;
  184. input int TRAP_LOOKBACK = 30;
  185.  
  186. double GetUniversalPip(){
  187. double pt=MarketInfo(Symbol(),MODE_POINT);
  188. if(pt<=0) pt=0.00001;
  189. int dg=(int)MarketInfo(Symbol(),MODE_DIGITS);
  190. if(dg==6) return pt*100;
  191. if(dg==5||dg==3||dg==1) return pt*10;
  192. return pt;
  193. }
  194. double GetAutoBoxMin(){double a=iATR(Symbol(),0,14,1);double p=GetUniversalPip();return p>0?MathMax(3.0,a/p*0.3):4.0;}
  195. double GetAutoBoxMax(){double a=iATR(Symbol(),0,14,1);double p=GetUniversalPip();return p>0?MathMax(20.0,a/p*3.0):30.0;}
  196.  
  197. // ===== NEW NCP v8.0 ADVANCED SETTINGS =====
  198. input string NCP8_SECTION = "=== NCP v8.0 ADVANCED ===";
  199. input bool NCP8_UseM15Trend = true;
  200. input bool NCP8_UseDynamicSR = true;
  201. input bool NCP8_UsePatterns = true;
  202. input bool NCP8_UseMultiTF = true;
  203. input bool NCP8_UseColorPattern = true;
  204. input bool NCP8_UseHRNReject = true;
  205. input bool NCP8_UseOrderBlocks = true;
  206. input bool NCP8_UseDivergence = true;
  207. input int NCP8_MinConfidence = 65;
  208. input int NCP8_StrongConfidence = 78;
  209. input int NCP8_ExtremeConfidence = 88;
  210.  
  211. static bool g_m30Bull = false;
  212.  
  213. // ============================================================
  214. // PSYCHE BREAKER CONSTANTS
  215. // ============================================================
  216. #define PSYCHE_DOJI_THRESHOLD 0.10
  217. #define PSYCHE_WICK_THRESHOLD 0.55
  218. #define PSYCHE_WICK_CANDLES 12
  219. #define PSYCHE_VOL_SPIKE_MULT 3.0
  220. #define PSYCHE_SR_CLOSE_PIPS 3.0
  221. #define PSYCHE_SR_NEAR_PIPS 8.0
  222. #define PSYCHE_SR_FAR_PIPS 15.0
  223. #define PSYCHE_STRONG_THRESHOLD 80
  224.  
  225. #define NEON_GREEN C'0,255,100'
  226. #define NEON_RED C'255,40,80'
  227. #define NEON_YELLOW C'255,220,0'
  228. #define NEON_ORANGE C'255,120,0'
  229. #define NEON_CYAN C'0,255,200'
  230. #define NEON_PURPLE C'200,0,255'
  231. #define NEON_PINK C'255,80,180'
  232. #define NEON_BLUE C'0,200,255'
  233. #define NEON_LIME C'80,255,80'
  234. #define NEON_GOLD C'255,180,0'
  235. #define DARK_BLUE_NEON C'0,100,255'
  236. #define NEON_WHITE C'220,230,255'
  237. #define CGR C'160,170,190'
  238. #define BB_GREY C'180,180,190'
  239. #define BG_DARK1 C'6,8,16'
  240. #define BG_DARK2 C'10,14,24'
  241. #define BG_DARK3 C'14,20,32'
  242. #define BG_DARK4 C'18,26,40'
  243.  
  244. struct HTFLevel{ double price; string timeframe; string type; datetime time; int strength; bool isRoundNumber; };
  245.  
  246. struct NCPPatternResult {
  247. string name;
  248. int type;
  249. int strength;
  250. string category;
  251. };
  252.  
  253. struct NCPSRZone {
  254. double price;
  255. string type;
  256. int touches;
  257. int strength;
  258. bool isRoundNum;
  259. bool isOrderBlock;
  260. datetime lastTouch;
  261. };
  262.  
  263. struct NCPTrendInfo {
  264. string m15Direction;
  265. int m15Strength;
  266. int m1Bias;
  267. string m5Direction;
  268. int m5Strength;
  269. bool aligned;
  270. };
  271.  
  272. struct NCPMultiTF {
  273. double rsi_m1;
  274. double rsi_m5;
  275. double rsi_m15;
  276. int cci_m1;
  277. int cci_m5;
  278. int macd_m1_dir;
  279. int macd_m5_dir;
  280. double atr_m1;
  281. double atr_m5;
  282. bool ha_m1_bull;
  283. bool ha_m1_bear;
  284. bool ha_m5_bull;
  285. bool ha_m5_bear;
  286. int bullCount;
  287. int bearCount;
  288. };
  289.  
  290. //+------------------------------------------------------------------+
  291. // GLOBAL VARIABLES
  292. //+------------------------------------------------------------------+
  293. string g_haM1="",g_haM5="",g_haBoth="";
  294. color g_haM1Color=clrGray,g_haM5Color=clrGray;
  295. static double NW[36];
  296. static double g_rsc=0,g_tfa=3;
  297. static datetime g_spm_t=0,g_last_bar=0;
  298. static double g_nearest_res=0,g_nearest_sup=0;
  299. static string g_brk_str="NO BRK";
  300. static color g_brk_color=CGR;
  301. struct RejLevel{double price;int touches;};
  302. static RejLevel g_rj[MAX_REJ];
  303. static int g_rj_cnt=0;
  304.  
  305. static double g_hrn_price=0;
  306. static bool g_hrn_is_sup=true;
  307. static int g_hrn_brk_bars=0;
  308. static datetime g_hrn_scan_bar=0;
  309. static string g_hrn_str="--";
  310. static double g_hrn_score=0;
  311. static bool g_hrn_confirmed_break=false;
  312.  
  313. static int g_otcCallPct=50,g_otcPutPct=50;
  314. static string g_pairNames[8],g_pairSigs[8];
  315. static double g_pairConfs[8];
  316. static int g_pairCount=0;
  317. static double g_frozen_gProb=50,g_frozen_rProb=50;
  318. static string g_frozen_pAction="UNCERTAIN";
  319. static color g_frozen_pColor=NEON_YELLOW;
  320. static double g_calc_gProb=50,g_calc_rProb=50;
  321. static string g_calc_pAction="UNCERTAIN";
  322. static color g_calc_pColor=NEON_YELLOW;
  323. static double g_gProb=50,g_rProb=50;
  324. static string g_pAction="UNCERTAIN";
  325. static color g_pColor=NEON_YELLOW;
  326. static datetime g_last_freeze_bar=0;
  327. static double g_accuracy=65.0;
  328. static int g_acc_correct=0,g_acc_total=0;
  329. static datetime g_acc_lastBar=0;
  330. static double g_lastPredGreen=50.0;
  331. static datetime g_lastPredBar=0;
  332. static string g_finalSignal="WAIT";
  333. static color g_finalColor=NEON_YELLOW;
  334. static datetime g_signalTime=0;
  335. static string g_lastNotified="";
  336. static string g_marketMode="RANGE",g_prevMode="";
  337. static int g_lossStreak=0;
  338. static bool g_tradingStopped=false;
  339. static string g_strategyType="NONE";
  340. static string g_strategyReason="";
  341. static double qmrA=0,qmrB=0,qmrC=0,qmrD=0;
  342. static bool qmrActive=false;
  343. static datetime qmrExpire=0;
  344. #define MAX_COMMON_PTS 5
  345. static double g_commonPrice[MAX_COMMON_PTS];
  346. static datetime g_commonTime[MAX_COMMON_PTS];
  347. static int g_commonCount=0;
  348. static datetime g_commonExpire[MAX_COMMON_PTS];
  349. static string g_commonType[MAX_COMMON_PTS];
  350. static datetime g_lastCommonScan=0;
  351. #define MAX_WICK_LINES 5
  352. static double g_wickLinePrice[MAX_WICK_LINES];
  353. static int g_wickLineTouches[MAX_WICK_LINES];
  354. static datetime g_wickLineExpire[MAX_WICK_LINES];
  355. static int g_wickLineCount=0;
  356. static datetime g_lastWickScan=0;
  357. static bool g_isSideways=false;
  358. static string g_tfa_detail="";
  359. static HTFLevel g_htfLevels[50];
  360. static int g_htfLevelCount=0;
  361. static bool g_mtfConfirmed=true;
  362. static string g_filterStatus="ALL CLEAR";
  363. static string g_adv1="WAIT KAR";
  364. static string g_symbolKey="";
  365. static double g_brokerBias=0.0;
  366.  
  367. double g_stableRes[10];
  368. double g_stableSup[10];
  369. int g_stableResCount = 0;
  370. int g_stableSupCount = 0;
  371. datetime g_lastSRScan = 0;
  372. int g_srScanInterval = 5;
  373.  
  374. static double g_fibBestScore = 0;
  375. static double g_fibBestProb = 0;
  376. static string g_fibBestDir = "WAIT";
  377. static int g_fibConfidence = 0;
  378. static double g_fibBestPrice = 0;
  379. static string g_fibPattern = "";
  380. static string g_fibFibLevel = "";
  381. static string g_bbSignal = "--";
  382. static color g_bbColor = CGR;
  383. static double g_bbTouchPrice = 0.0;
  384. static datetime g_bbSignalTime = 0;
  385. static int g_bbSignalBars = 0;
  386. static string g_bbDetail = "";
  387.  
  388. static double g_ha30_open = 0.0;
  389. static double g_ha30_close = 0.0;
  390. static double g_ha30_high = 0.0;
  391. static double g_ha30_low = 0.0;
  392. static datetime g_ha30_bar = 0;
  393.  
  394. // === OTC FIB v3.0 NEW GLOBALS ===
  395. static double g_otcFibPrice = 0;
  396. static string g_otcFibDir = "WAIT";
  397. static int g_otcFibStrength = 0;
  398. static string g_otcFibPattern = "--";
  399. static string g_otcFibLevel = "--";
  400. static datetime g_otcFibSignalTime = 0;
  401. static bool g_otcHasSignal = false;
  402. double g_gannBoxHigh = 0;
  403. double g_gannBoxLow = 0;
  404.  
  405. static int g_buyCountCache = 0;
  406. static int g_sellCountCache = 0;
  407. static datetime g_cacheConfluenceTime = 0;
  408.  
  409.  
  410.  
  411. static int g_otcPreCloseWindow = 3; // 3 seconds before close
  412.  
  413.  
  414.  
  415. static datetime g_last_m5_bar = 0; // FOR STABLE M5 S/R
  416.  
  417. #define MAX_BB_LINES 8
  418. static double g_bbLinePrice[MAX_BB_LINES];
  419. static datetime g_bbLineExpire[MAX_BB_LINES];
  420. static string g_bbLineType[MAX_BB_LINES];
  421. static int g_bbLineCount=0;
  422.  
  423. // NCP PRO v8.0 GLOBALS
  424. static string g_mtgState = "INIT";
  425. static string g_mtgReason = "";
  426. static string g_mtgAction = "";
  427. static color g_mtgClr = CGR;
  428. static double g_mtgHype = 50.0;
  429. static double g_mtgBetrayal = 50.0;
  430. static string g_mtgPattern = "";
  431. static int g_mtgBullCount = 0;
  432. static int g_mtgBearCount = 0;
  433. static double g_mtgRecovery = 0.0;
  434. static datetime g_mtg_lastBar = 0;
  435. static double g_trapScore = 0;
  436. static double g_ncpADX = 0.0;
  437. static double g_ncpPlusDI = 0.0;
  438. static double g_ncpMinusDI = 0.0;
  439.  
  440. static double g_callWeight = 1.0;
  441. static double g_putWeight = 1.0;
  442. static int g_totalTrades = 0;
  443. static int g_callTrades = 0;
  444. static int g_putTrades = 0;
  445. static int g_callWins = 0;
  446. static int g_putWins = 0;
  447. static datetime g_ncpLastSignalTime = 0;
  448. static string g_ncpLastSignalType = "";
  449. static double g_ncpLastEntryPrice = 0.0;
  450. static bool g_ncpSignalProcessed = true;
  451. static double g_smoothCallScore = 50.0;
  452. static double g_smoothPutScore = 50.0;
  453.  
  454. static NCPTrendInfo g_ncpTrend;
  455. static NCPMultiTF g_ncpMultiTF;
  456. static NCPSRZone g_ncpSRZones[20];
  457. static int g_ncpSRCount = 0;
  458. static string g_ncpDetailLine1 = "";
  459. static string g_ncpDetailLine2 = "";
  460. static string g_ncpDetailLine3 = "";
  461. static int g_ncpPatternBullScore = 0;
  462. static int g_ncpPatternBearScore = 0;
  463. static string g_ncpMainPattern = "";
  464.  
  465. // ============================================================
  466. // OTC NEXT CANDLE PREDICTOR (REPLACES PSYCHE BREAKER)
  467. // ============================================================
  468. static string g_otpSignal = "WAIT";
  469. static double g_otpConf = 50.0;
  470. static string g_otpRsi = "--";
  471. static string g_otpWick = "--";
  472. static string g_otpReason = "";
  473. static color g_otpColor = NEON_YELLOW;
  474.  
  475. // ============================================================
  476. // MHI-QUANTUM v9.1 PRO GLOBALS
  477. // ============================================================
  478. static string g_qSignal = "WAIT";
  479. static double g_qConf = 50.0;
  480. static string g_qPattern = "---";
  481. static string g_qStatus = "SCANNING";
  482. static color g_qColor = NEON_YELLOW;
  483. static string g_qReason = "";
  484. static bool g_qIsTrap = false;
  485. static double g_qCallScore = 50.0;
  486. static double g_qPutScore = 50.0;
  487. static string g_qConfluence = "";
  488. static int g_qHistoryScore = 0;
  489. static double g_qTimeProb = 50.0;
  490. static double g_qSpreadPenalty = 0.0;
  491.  
  492. // Auto-learning globals
  493. static double g_qWeightMHI = 0.25;
  494. static double g_qWeightNCP = 0.20;
  495. static double g_qWeightTrap = 0.15;
  496. static double g_qWeightFib = 0.15;
  497. static double g_qWeightBB = 0.10;
  498. static double g_qWeightNeural = 0.10;
  499. static double g_qWeightHA = 0.05;
  500. static int g_qTotalTrades = 0;
  501. static int g_qWinTrades = 0;
  502. static string g_qLearnFile = "Quantum_Learn_v91.dat";
  503.  
  504. // 150-candle history
  505. static int g_histPatterns[150];
  506. static int g_histResults[150];
  507. static int g_histCount = 0;
  508.  
  509. // Multi-pair MHI
  510. static string g_bgMHI_Signal[8];
  511. static double g_bgMHI_Conf[8];
  512. static int g_bgMHI_Count = 0;
  513.  
  514. static string g_bgMHI_Pair[8];
  515.  
  516.  
  517. // Time phase
  518. static string g_qTimePhase = "EARLY";
  519.  
  520. // Tracking
  521. static string g_qLastSignal = "";
  522. static datetime g_qLastSignalBar = 0;
  523.  
  524.  
  525. // BACKGROUND PAIRS NEXT CANDLE DATA
  526. static string g_bgOtpSignal[8];
  527. static int g_bgOtpCount = 0;
  528.  
  529.  
  530. // ============================================================
  531. // PSYCHE BREAKER v3.0 GLOBALS
  532. // ============================================================
  533. static double g_psycheScore = 0;
  534. static string g_psycheDir = "NONE";
  535. static string g_psycheWick = "--";
  536. static string g_psycheVol = "--";
  537. static string g_psycheHA = "--";
  538. static string g_psycheSR = "--";
  539. static string g_psycheSignal = "SCANNING";
  540. static color g_psycheClr = CGR;
  541. static int g_psycheUpperWick= 0;
  542. static int g_psycheLowerWick= 0;
  543.  
  544. // ============================================================
  545. // OTC BROKER KILLER v4.0 - PROFESSIONAL TRAP ENGINE
  546. // ============================================================
  547. struct VisualTrapPro {
  548. string boxStatus, gannStatus, m30Dir, m1Seq, verdict;
  549. color gannColor, verdictColor;
  550. double callBias, putBias, trapScore;
  551. bool buySignal, sellSignal;
  552. };
  553. VisualTrapPro g_visualTrapPro;
  554. static datetime g_lastTrapArrowTime = 0;
  555.  
  556. //+------------------------------------------------------------------+
  557. // SHORT PRICE FUNCTION - For chart S/R labels
  558. //+------------------------------------------------------------------+
  559. string ShortPrice(double price){
  560. int dg = (int)MarketInfo(Symbol(), MODE_DIGITS);
  561. if(dg < 2) dg = 5;
  562. return DoubleToString(price, dg);
  563. }
  564. string SRPrice(double price){ return ShortPrice(price); }
  565.  
  566. //+------------------------------------------------------------------+
  567. // DYNAMIC ADX COLOR FUNCTION
  568. //+------------------------------------------------------------------+
  569. color GetADXColor(double adx, double plusDI, double minusDI){
  570. if(adx < 15) return CGR;
  571. if(adx < 22) return NEON_ORANGE;
  572. double diDiff = plusDI - minusDI;
  573. if(diDiff > 10) return NEON_GREEN;
  574. if(diDiff > 5) return NEON_LIME;
  575. if(diDiff < -10) return NEON_RED;
  576. if(diDiff < -5) return C'255,100,100';
  577. return NEON_YELLOW;
  578. }
  579.  
  580. //+------------------------------------------------------------------+
  581. // M30 HA CANDLE (FIXED NAME)
  582. //+------------------------------------------------------------------+
  583. void CalcM30HACandle(){
  584. if(Bars < 5) return;
  585. if(iBars(NULL, PERIOD_M30) >= 2){
  586. g_ha30_open = iOpen(NULL, PERIOD_M30, 1);
  587. g_ha30_close = iClose(NULL, PERIOD_M30, 1);
  588. g_ha30_high = iHigh(NULL, PERIOD_M30, 1);
  589. g_ha30_low = iLow(NULL, PERIOD_M30, 1);
  590. g_ha30_bar = iTime(NULL, PERIOD_M30, 1);
  591. }
  592. else {
  593. g_ha30_open = Open[0];
  594. g_ha30_close = Close[0];
  595. g_ha30_high = High[0];
  596. g_ha30_low = Low[0];
  597. g_ha30_bar = Time[0];
  598. }
  599. }
  600.  
  601. bool IsM30HABull(){ return (g_ha30_close > g_ha30_open); }
  602. bool IsM30HABear(){ return (g_ha30_close < g_ha30_open); }
  603.  
  604. //+------------------------------------------------------------------+
  605. // UPGRADED BB PULLBACK - M30 HA PHOOLBAG ENGINE (FIXED REFS)
  606. //+------------------------------------------------------------------+
  607. void DetectBBPullback(){
  608. if(!ENABLE_BB_PULLBACK || Bars < BB_PERIOD + 5) return;
  609. CalcM30HACandle();
  610. double bbUpper0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 0);
  611. double bbLower0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 0);
  612. double bbMid0 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_MAIN, 0);
  613. double bbUpper1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_UPPER, 1);
  614. double bbLower1 = iBands(NULL, PERIOD_M1, BB_PERIOD, BB_DEVIATION, 0, PRICE_CLOSE, MODE_LOWER, 1);
  615. if(bbUpper1 <= 0 || bbLower1 <= 0) return;
  616.  
  617. bool isHaM30Bull = IsM30HABull();
  618. bool isHaM30Bear = IsM30HABear();
  619. bool topPhoolbag = (g_ha30_high >= bbUpper0 * 0.9998) && (g_ha30_close < bbUpper0) && isHaM30Bear;
  620. bool bottomPhoolbag = (g_ha30_low <= bbLower0 * 1.0002) && (g_ha30_close > bbLower0) && isHaM30Bull;
  621.  
  622. double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  623. double plusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
  624. double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
  625. double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  626. bool adxValid = (adx >= 18);
  627. bool diBull = (plusDI > minusDI);
  628. bool diBear = (minusDI > plusDI);
  629.  
  630. double ha30Range = g_ha30_high - g_ha30_low;
  631. double topWick = (ha30Range > 0) ? (g_ha30_high - MathMax(g_ha30_open, g_ha30_close)) / ha30Range : 0;
  632. double bottomWick = (ha30Range > 0) ? (MathMin(g_ha30_open, g_ha30_close) - g_ha30_low) / ha30Range : 0;
  633.  
  634. bool isStrongTopPhoolbag = topPhoolbag && (topWick > 0.50);
  635. bool isStrongBottomPhoolbag = bottomPhoolbag && (bottomWick > 0.50);
  636.  
  637. int putConfirm = 0;
  638. if(isStrongTopPhoolbag) putConfirm += 3;
  639. else if(topPhoolbag) putConfirm += 2;
  640. if(diBear) putConfirm++;
  641. if(rsi > 55) putConfirm++;
  642. if(rsi > 65) putConfirm++;
  643.  
  644. int callConfirm = 0;
  645. if(isStrongBottomPhoolbag) callConfirm += 3;
  646. else if(bottomPhoolbag) callConfirm += 2;
  647. if(diBull) callConfirm++;
  648. if(rsi < 45) callConfirm++;
  649. if(rsi < 35) callConfirm++;
  650.  
  651. if(!adxValid) { putConfirm = 0; callConfirm = 0; }
  652.  
  653. string adxStr = "ADX:"+DoubleToString(adx,0)+(adxValid?"*":"");
  654. string rsiStr = "RSI:"+DoubleToString(rsi,0);
  655. string diStr = (diBull?"DI^":diBear?"DIv":"DI=");
  656. string haStr = isHaM30Bull?"HA30:BULL":isHaM30Bear?"HA30:BEAR":"HA30:DOJI";
  657.  
  658. if(g_bbSignal != "--" && g_bbSignalTime > 0){
  659. int barsElapsed = (int)((TimeCurrent() - g_bbSignalTime) / (Period() * 60));
  660. if(barsElapsed > BB_SIGNAL_EXPIRE_BARS){
  661. g_bbSignal = "--"; g_bbColor = NEON_YELLOW;
  662. g_bbDetail = ""; g_bbTouchPrice = 0.0;
  663. }
  664. }
  665.  
  666. string newSignal = "--";
  667. double touchPriceNew = 0.0;
  668. string detailNew = "";
  669. color newColor = NEON_YELLOW;
  670.  
  671. if(putConfirm >= 2){
  672. newSignal = "PUT";
  673. touchPriceNew = bbUpper0;
  674. string conf = (putConfirm>=4)?"STRONG PB":(putConfirm>=3)?"GOOD PB":"WEAK PB";
  675. detailNew = "PB UP|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr+"|"+haStr;
  676. newColor = (putConfirm >= 3) ? NEON_RED : NEON_ORANGE;
  677. }
  678. else if(callConfirm >= 2){
  679. newSignal = "CALL";
  680. touchPriceNew = bbLower0;
  681. string conf = (callConfirm>=4)?"STRONG PB":(callConfirm>=3)?"GOOD PB":"WEAK PB";
  682. detailNew = "PB LO|"+conf+"|"+adxStr+"|"+rsiStr+"|"+diStr+"|"+haStr;
  683. newColor = (callConfirm >= 3) ? NEON_GREEN : NEON_CYAN;
  684. }
  685.  
  686. if(newSignal != "--"){
  687. bool isNew = (newSignal != g_bbSignal || touchPriceNew != g_bbTouchPrice);
  688. if(isNew){
  689. g_bbSignal = newSignal;
  690. g_bbTouchPrice = touchPriceNew;
  691. g_bbSignalTime = TimeCurrent();
  692. g_bbDetail = detailNew;
  693. g_bbColor = newColor;
  694. AddBBLine(touchPriceNew, newSignal);
  695. Print("BB PHOOLBAG: ",newSignal," | ",detailNew," Conf:",(newSignal=="PUT"?putConfirm:callConfirm),"/5");
  696. }
  697. } else if(g_bbSignal == "--"){
  698. g_bbColor = NEON_YELLOW;
  699. }
  700. DrawBBLines(bbUpper0, bbLower0, bbMid0);
  701. }
  702.  
  703. void DrawBBLines(double upper, double lower, double mid){
  704. if(!ENABLE_BB_PULLBACK) return;
  705. string nmU = PFX+"BB_UPPER"; SafeDel(nmU);
  706. 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); }
  707. string nmL = PFX+"BB_LOWER"; SafeDel(nmL);
  708. 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); }
  709. string nmM = PFX+"BB_MID"; SafeDel(nmM);
  710. 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); }
  711. int dg = (int)MarketInfo(Symbol(), MODE_DIGITS); if(dg <= 0) dg = 5;
  712. string lblU = PFX+"BB_U_LBL"; SafeDel(lblU);
  713. 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); }
  714. }
  715.  
  716. void AddBBLine(double price, string sigType){
  717. if(price <= 0) return;
  718. for(int i = 0; i < MAX_BB_LINES; i++){ SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i)); SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i)); }
  719. g_bbLineCount = 0; g_bbLinePrice[0] = price; g_bbLineExpire[0] = TimeCurrent() + 60 * BB_SIGNAL_EXPIRE_BARS; g_bbLineType[0] = sigType; g_bbLineCount = 1;
  720. DrawAllBBTouchLines();
  721. }
  722.  
  723. void DrawAllBBTouchLines(){
  724. for(int i = 0; i < MAX_BB_LINES; i++){ SafeDel(PFX+"BB_TOUCH_"+IntegerToString(i)); SafeDel(PFX+"BB_TOUCH_LBL_"+IntegerToString(i)); }
  725. if(g_bbLineCount > 0 && TimeCurrent() > g_bbLineExpire[0]){ g_bbLineCount = 0; return; }
  726. if(g_bbLineCount <= 0) return;
  727. string nm = PFX+"BB_TOUCH_0";
  728. string lbl = PFX+"BB_TOUCH_LBL_0";
  729. color lineColor = (g_bbLineType[0]=="CALL") ? NEON_GREEN : NEON_RED;
  730. ObjectCreate(0, nm, OBJ_HLINE, 0, 0, g_bbLinePrice[0]);
  731. ObjectSetInteger(0, nm, OBJPROP_COLOR, lineColor);
  732. ObjectSetInteger(0, nm, OBJPROP_WIDTH, 2);
  733. ObjectSetInteger(0, nm, OBJPROP_STYLE, STYLE_SOLID);
  734. ObjectSetInteger(0, nm, OBJPROP_BACK, false);
  735. if(Bars > 3){
  736. string txt = (g_bbLineType[0]=="CALL") ? "PB^ CALL" : "PBv PUT";
  737. ObjectCreate(0, lbl, OBJ_TEXT, 0, Time[3], g_bbLinePrice[0]);
  738. ObjectSetText(lbl, txt, 8, "Arial Bold", lineColor);
  739. ObjectSetInteger(0, lbl, OBJPROP_BACK, false);
  740. }
  741. }
  742.  
  743. // ============================================================
  744. // BROKER TRAP CALCULATOR
  745. // ============================================================
  746. double CalculateBrokerTrap(double callBias,double putBias){
  747. if(!ENABLE_TRAP_DETECTION||Bars<20) return 0;
  748. double trapScore=0;
  749. bool jpy=(StringFind(Symbol(),"JPY")>=0);
  750. double pip=jpy?0.01:0.0001;
  751. for(int i=1;i<=15&&i<Bars-1;i++){
  752. bool bullEngulf=(Close[i]>Open[i])&&(Close[i-1]<Open[i-1])&&(Close[i]>=Open[i-1])&&(Open[i]<=Close[i-1]);
  753. bool bearEngulf=(Close[i]<Open[i])&&(Close[i-1]>Open[i-1])&&(Close[i]<=Open[i-1])&&(Open[i]>=Close[i-1]);
  754. if(i>=2){
  755. bool mornStar=(Close[i-2]<Open[i-2])&&(MathAbs(Close[i-1]-Open[i-1])<pip*3)&&(Close[i]>Open[i]);
  756. bool eveStar =(Close[i-2]>Open[i-2])&&(MathAbs(Close[i-1]-Open[i-1])<pip*3)&&(Close[i]<Open[i]);
  757. if(i>=3){
  758. if(bullEngulf&&Close[i-3]<Close[i-2]) trapScore+=3.5;
  759. if(bearEngulf&&Close[i-3]>Close[i-2]) trapScore+=3.5;
  760. if(mornStar&&Close[i-3]<Close[i-2]) trapScore+=3.0;
  761. if(eveStar&&Close[i-3]>Close[i-2]) trapScore+=3.0;
  762. }
  763. }
  764. double rng=High[i]-Low[i];
  765. if(rng<=0) continue;
  766. double uw=(High[i]-MathMax(Open[i],Close[i]))/rng;
  767. double lw=(MathMin(Open[i],Close[i])-Low[i])/rng;
  768. if(uw>0.55&&Close[i]<Open[i]) trapScore+=2.0;
  769. if(lw>0.55&&Close[i]>Open[i]) trapScore+=2.0;
  770. }
  771. double rng0=High[0]-Low[0];
  772. if(rng0>0){
  773. double uw0=(High[0]-MathMax(Open[0],Close[0]))/rng0;
  774. double lw0=(MathMin(Open[0],Close[0])-Low[0])/rng0;
  775. if(uw0>0.65&&Close[0]<Open[0]) trapScore+=4.0;
  776. if(lw0>0.65&&Close[0]>Open[0]) trapScore+=4.0;
  777. if(Close[0]>Open[0]&&Close[1]<Open[1]){
  778. if(Close[0]>Open[1]&&Open[0]<Close[1]) trapScore+=3.0;
  779. }
  780. if(Close[0]<Open[0]&&Close[1]>Open[1]){
  781. if(Close[0]<Open[1]&&Open[0]>Close[1]) trapScore+=3.0;
  782. }
  783. }
  784. double biasStr=MathMax(callBias,putBias)-50;
  785. double biasMul=1.0+biasStr/150.0;
  786. if(biasMul>1.5) biasMul=1.5;
  787. if(biasMul<0.5) biasMul=0.5;
  788. trapScore*=biasMul;
  789. return MathMin(100,trapScore);
  790. }
  791.  
  792. // ============================================================
  793. // HA CANDLE CALCULATION (FIXED ARRAY BOUNDS)
  794. // ============================================================
  795. void CalcHA(){
  796. if(Bars<10) return;
  797. bool wasOpenSeries=ArrayGetAsSeries(Open), wasHighSeries=ArrayGetAsSeries(High),
  798. wasLowSeries=ArrayGetAsSeries(Low), wasCloseSeries=ArrayGetAsSeries(Close);
  799. ArraySetAsSeries(Open,true); ArraySetAsSeries(High,true);
  800. ArraySetAsSeries(Low,true); ArraySetAsSeries(Close,true);
  801.  
  802. static double haO1[500], haC1[500];
  803. static datetime lb1=0;
  804. ArraySetAsSeries(haO1,true); ArraySetAsSeries(haC1,true);
  805. datetime c1=iTime(NULL,PERIOD_M1,0);
  806. if(c1!=lb1){
  807. lb1=c1;
  808. int lim=MathMin(iBars(NULL,PERIOD_M1), 499); // FIX: Use 499
  809. for(int i=lim; i>=0; i--){ // FIX: Start from lim
  810. haC1[i] = (Open[i]+High[i]+Low[i]+Close[i])/4.0;
  811. if(i==lim) haO1[i] = (Open[i]+Close[i])/2.0; // FIX: Use lim
  812. else haO1[i] = (haO1[i+1] + haC1[i+1])/2.0;
  813. }
  814. }
  815.  
  816. double d1=MathAbs(haC1[1]-haO1[1]), r1=High[1]-Low[1];
  817. bool dz=(r1>0 && d1<r1*0.1), b1=(!dz && haC1[1]>haO1[1]), be1=(!dz && haC1[1]<haO1[1]);
  818. if(b1){ g_haM1="HA BULLISH 1"; g_haM1Color=clrLime; }
  819. else if(be1){ g_haM1="HA BEARISH 1"; g_haM1Color=clrRed; }
  820. else{ g_haM1="HA DOJI 1"; g_haM1Color=clrYellow; }
  821.  
  822. if(iBars(NULL,PERIOD_M5)>=10){
  823. static double haO5[200], haC5[200];
  824. static datetime lb5=0;
  825. ArraySetAsSeries(haO5,true); ArraySetAsSeries(haC5,true);
  826. datetime c5=iTime(NULL,PERIOD_M5,0);
  827. if(c5!=lb5){
  828. lb5=c5;
  829. int lim5=MathMin(iBars(NULL,PERIOD_M5), 199); // FIX: Use 199
  830. for(int i=lim5; i>=0; i--){ // FIX: Start from lim5
  831. double o=iOpen(NULL,PERIOD_M5,i), h=iHigh(NULL,PERIOD_M5,i),
  832. l=iLow(NULL,PERIOD_M5,i), c=iClose(NULL,PERIOD_M5,i);
  833. haC5[i]=(o+h+l+c)/4.0;
  834. if(i==lim5) haO5[i]=(o+c)/2.0; // FIX: Use lim5
  835. else haO5[i]=(haO5[i+1]+haC5[i+1])/2.0;
  836. }
  837. }
  838. double d5=MathAbs(haC5[1]-haO5[1]), r5=iHigh(NULL,PERIOD_M5,1)-iLow(NULL,PERIOD_M5,1);
  839. bool dz5=(r5>0 && d5<r5*0.1), b5=(!dz5 && haC5[1]>haO5[1]), be5=(!dz5 && haC5[1]<haO5[1]);
  840. if(b5){ g_haM5="HA BULLISH 5"; g_haM5Color=clrLime; }
  841. else if(be5){ g_haM5="HA BEARISH 5"; g_haM5Color=clrRed; }
  842. else{ g_haM5="HA DOJI 5"; g_haM5Color=clrYellow; }
  843. if(b1&&b5) g_haBoth="BOTH BULL";
  844. else if(be1&&be5) g_haBoth="BOTH BEAR";
  845. else g_haBoth="MIXED";
  846. } else {
  847. g_haM5="5 --"; g_haM5Color=clrGray; g_haBoth="HA --";
  848. }
  849.  
  850. if(!wasOpenSeries) ArraySetAsSeries(Open,false);
  851. if(!wasHighSeries) ArraySetAsSeries(High,false);
  852. if(!wasLowSeries) ArraySetAsSeries(Low,false);
  853. if(!wasCloseSeries) ArraySetAsSeries(Close,false);
  854. }
  855.  
  856. // ============================================================
  857. // HELPERS
  858. // ============================================================
  859. bool IsLineNearby(double price,double pipTol=3.0){
  860. bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=pipTol*pip;
  861. for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i);
  862. if((int)ObjectGetInteger(0,nm,OBJPROP_TYPE)==OBJ_HLINE){
  863. double lp=ObjectGetDouble(0,nm,OBJPROP_PRICE); if(MathAbs(lp-price)<tol) return true; }}
  864. return false;
  865. }
  866.  
  867. string GetCurrentSession(color &sC){
  868. int h=TimeHour(TimeGMT());
  869. if(h>=12&&h<16){sC=NEON_GOLD;return "LON+NY";}
  870. if(h>=7&&h<9){sC=NEON_CYAN;return "ASI+LON";}
  871. if(h>=7&&h<16){sC=NEON_GREEN;return "LONDON";}
  872. if(h>=12&&h<21){sC=NEON_BLUE;return "NEW YORK";}
  873. if(h>=0&&h<9){sC=NEON_ORANGE;return "ASIA";}
  874. sC=C'100,100,120'; return "SYDNEY";
  875. }
  876.  
  877. bool IsSessionActive(){int h=TimeHour(TimeGMT());return(h>=7&&h<=21);}
  878. 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);}
  879.  
  880. bool CheckMTFConfirmation(){
  881. if(!MTF_CONFIRM) return true;
  882. bool m1Bull=(Close[1]>Open[1]);
  883. bool m5Bull=false,m15Bull=false;
  884. if(iBars(NULL,PERIOD_M5)>=3) m5Bull=(iClose(NULL,PERIOD_M5,1)>iOpen(NULL,PERIOD_M5,1));
  885. if(iBars(NULL,PERIOD_M15)>=3) m15Bull=(iClose(NULL,PERIOD_M15,1)>iOpen(NULL,PERIOD_M15,1));
  886. int bullCount=0,bearCount=0;
  887. if(m1Bull) bullCount++; else bearCount++;
  888. if(m5Bull) bullCount++; else bearCount++;
  889. if(m15Bull) bullCount++; else bearCount++;
  890. g_mtfConfirmed=(bullCount>=2 || bearCount>=2);
  891. return g_mtfConfirmed;
  892. }
  893.  
  894. double Tanh(double x){double e=MathExp(2.0*x);return(e-1.0)/(e+1.0);}
  895.  
  896. double CalcAdvancedMicroAI(){
  897. if(Bars<20) return 50.0;
  898. double score=50.0;
  899. bool jpy=(StringFind(Symbol(),"JPY")>=0);
  900. double pip=jpy?0.01:0.0001;
  901. for(int i=1;i<=5;i++){
  902. double r=High[i]-Low[i]; if(r<=0) continue;
  903. double uw=(High[i]-MathMax(Open[i],Close[i]))/r;
  904. double lw=(MathMin(Open[i],Close[i])-Low[i])/r;
  905. double w=(6.0-i)/5.0;
  906. if(uw>0.65) score-=w*18; else if(uw>0.50) score-=w*10;
  907. if(lw>0.65) score+=w*18; else if(lw>0.50) score+=w*10;
  908. }
  909. double pos5=0;
  910. for(int i=1;i<=5;i++){double r=High[i]-Low[i]; if(r<=0) continue; pos5+=(Close[i]-Low[i])/r; }
  911. score+=(pos5/5.0-0.5)*25.0;
  912. double gc=0,rc=0;
  913. 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;}
  914. score+=(gc-rc)*4.0;
  915. double vl1=(double)iVolume(NULL,PERIOD_M1,1),vA=0;
  916. for(int i=2;i<=6;i++) vA+=iVolume(NULL,PERIOD_M1,i);
  917. vA/=5.0;
  918. 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;}
  919. double r1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  920. double r5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
  921. if(r1<30) score+=15; else if(r1<40) score+=7;
  922. if(r1>70) score-=15; else if(r1>60) score-=7;
  923. if(r1>r5&&Close[1]<Close[5]) score+=8;
  924. if(r1<r5&&Close[1]>Close[5]) score-=8;
  925. if(g_nearest_res>0){double distR=(g_nearest_res-Close[0])/pip; if(distR<5) score-=12; else if(distR<10) score-=6;}
  926. if(g_nearest_sup>0){double distS=(Close[0]-g_nearest_sup)/pip; if(distS<5) score+=12; else if(distS<10) score+=6;}
  927. if(Close[0]>Open[0]&&Close[1]>Open[1]) score+=5;
  928. if(Close[0]<Open[0]&&Close[1]<Open[1]) score-=5;
  929. return MathMax(5.0,MathMin(95.0,score));
  930. }
  931.  
  932. // ============================================================
  933. // BAYESIAN PROBABILITY ENGINE (MQL4)
  934. // ============================================================
  935. struct BayesianResult
  936. {
  937. double posteriorReal;
  938. double posteriorTrap;
  939. bool isTrap;
  940. string recommendation;
  941. };
  942.  
  943. BayesianResult CalcBayesianProbability(
  944. int direction,
  945. double priorReal,
  946. double priorTrap,
  947. bool hasPinBar,
  948. bool hasDoji,
  949. bool hasEngulf,
  950. bool hasFakeBreakout,
  951. bool hasWickReversal,
  952. bool hasLiquiditySweep
  953. )
  954. {
  955. BayesianResult result;
  956.  
  957. double pinBarLikelyReal, pinBarLikelyTrap;
  958. double dojiLikelyReal, dojiLikelyTrap;
  959. double engulfLikelyReal, engulfLikelyTrap;
  960. double fakeLikelyReal, fakeLikelyTrap;
  961. double wickLikelyReal, wickLikelyTrap;
  962. double liqLikelyReal, liqLikelyTrap;
  963.  
  964. if(direction == 0) // CALL
  965. {
  966. pinBarLikelyReal = 0.15; pinBarLikelyTrap = 0.55;
  967. dojiLikelyReal = 0.08; dojiLikelyTrap = 0.42;
  968. engulfLikelyReal = 0.32; engulfLikelyTrap = 0.12;
  969. fakeLikelyReal = 0.05; fakeLikelyTrap = 0.35;
  970. wickLikelyReal = 0.22; wickLikelyTrap = 0.52;
  971. liqLikelyReal = 0.18; liqLikelyTrap = 0.62;
  972. }
  973. else // PUT
  974. {
  975. pinBarLikelyReal = 0.18; pinBarLikelyTrap = 0.58;
  976. dojiLikelyReal = 0.10; dojiLikelyTrap = 0.45;
  977. engulfLikelyReal = 0.30; engulfLikelyTrap = 0.10;
  978. fakeLikelyReal = 0.06; fakeLikelyTrap = 0.38;
  979. wickLikelyReal = 0.25; wickLikelyTrap = 0.55;
  980. liqLikelyReal = 0.20; liqLikelyTrap = 0.65;
  981. }
  982.  
  983. double likeReal = 1.0;
  984. double likeTrap = 1.0;
  985.  
  986. likeReal *= hasPinBar ? pinBarLikelyReal : (1 - pinBarLikelyReal);
  987. likeTrap *= hasPinBar ? pinBarLikelyTrap : (1 - pinBarLikelyTrap);
  988.  
  989. likeReal *= hasDoji ? dojiLikelyReal : (1 - dojiLikelyReal);
  990. likeTrap *= hasDoji ? dojiLikelyTrap : (1 - dojiLikelyTrap);
  991.  
  992. likeReal *= hasEngulf ? engulfLikelyReal : (1 - engulfLikelyReal);
  993. likeTrap *= hasEngulf ? engulfLikelyTrap : (1 - engulfLikelyTrap);
  994.  
  995. likeReal *= hasFakeBreakout ? fakeLikelyReal : (1 - fakeLikelyReal);
  996. likeTrap *= hasFakeBreakout ? fakeLikelyTrap : (1 - fakeLikelyTrap);
  997.  
  998. likeReal *= hasWickReversal ? wickLikelyReal : (1 - wickLikelyReal);
  999. likeTrap *= hasWickReversal ? wickLikelyTrap : (1 - wickLikelyTrap);
  1000.  
  1001. likeReal *= hasLiquiditySweep ? liqLikelyReal : (1 - liqLikelyReal);
  1002. likeTrap *= hasLiquiditySweep ? liqLikelyTrap : (1 - liqLikelyTrap);
  1003.  
  1004. double evidence = (likeReal * priorReal) + (likeTrap * priorTrap);
  1005.  
  1006. if(evidence <= 0)
  1007. {
  1008. result.posteriorReal = 0.5;
  1009. result.posteriorTrap = 0.5;
  1010. result.isTrap = false;
  1011. result.recommendation = "WAIT";
  1012. return result;
  1013. }
  1014.  
  1015. result.posteriorReal = (likeReal * priorReal) / evidence;
  1016. result.posteriorTrap = (likeTrap * priorTrap) / evidence;
  1017.  
  1018. if(result.posteriorReal < 0.30)
  1019. {
  1020. result.isTrap = true;
  1021. result.recommendation = (direction == 0) ? "PUT" : "CALL";
  1022. }
  1023. else if(result.posteriorReal > 0.70)
  1024. {
  1025. result.isTrap = false;
  1026. result.recommendation = (direction == 0) ? "CALL" : "PUT";
  1027. }
  1028. else
  1029. {
  1030. result.isTrap = false;
  1031. result.recommendation = "WAIT";
  1032. }
  1033.  
  1034. return result;
  1035. }
  1036.  
  1037. double g_priorReal = 0.35;
  1038. double g_priorTrap = 0.65;
  1039.  
  1040. void UpdateBayesianPrior(bool tradeWon, bool wasTrapSignal)
  1041. {
  1042. if(wasTrapSignal)
  1043. {
  1044. g_priorTrap = tradeWon ? MathMin(g_priorTrap + 0.02, 0.90) : MathMax(g_priorTrap - 0.02, 0.10);
  1045. g_priorReal = 1.0 - g_priorTrap;
  1046. }
  1047. else
  1048. {
  1049. g_priorReal = tradeWon ? MathMin(g_priorReal + 0.02, 0.90) : MathMax(g_priorReal - 0.02, 0.10);
  1050. g_priorTrap = 1.0 - g_priorReal;
  1051. }
  1052. }
  1053.  
  1054. // === FIB v2.0 GLOBALS ===
  1055. static double g_fibV2_BestScore = 0;
  1056. static double g_fibV2_BestProb = 0;
  1057. static string g_fibV2_BestDir = "WAIT";
  1058. static int g_fibV2_Confidence = 0;
  1059. static double g_fibV2_BestPrice = 0;
  1060. static string g_fibV2_Pattern = "--";
  1061. static string g_fibV2_FibLevel = "--";
  1062. static string g_fibV2_Reason = "";
  1063. static datetime g_fibV2_SignalTime = 0;
  1064. static int g_fibV2_SignalBars = 0;
  1065.  
  1066. struct SwingPoint {
  1067. double price;
  1068. int index;
  1069. bool isHigh;
  1070. int strength;
  1071. };
  1072.  
  1073. struct FibSignal {
  1074. string direction;
  1075. double price;
  1076. double score;
  1077. string pattern;
  1078. string level;
  1079. double confidence;
  1080. string reason;
  1081. int swingPair;
  1082. };
  1083.  
  1084. int CalcSwingStrength(int index, bool isHigh)
  1085. {
  1086. if(index < 2 || index >= Bars - 2) return 1;
  1087. int strength = 5;
  1088. double range = High[index] - Low[index];
  1089. if(range <= 0) return 1;
  1090. int startIdx = MathMax(0, index - 4);
  1091. if(isHigh) {
  1092. double leftRange = High[index] - MathMax(High[index-1], High[index-2]);
  1093. double rightRange = High[index] - MathMax(High[index+1], High[index+2]);
  1094. if(leftRange > range * 0.3) strength += 2;
  1095. if(rightRange > range * 0.3) strength += 2;
  1096. if(index == iHighest(NULL, PERIOD_M1, MODE_HIGH, 10, startIdx)) strength += 3;
  1097. } else {
  1098. double leftRange = MathMin(Low[index-1], Low[index-2]) - Low[index];
  1099. double rightRange = MathMin(Low[index+1], Low[index+2]) - Low[index];
  1100. if(leftRange > range * 0.3) strength += 2;
  1101. if(rightRange > range * 0.3) strength += 2;
  1102. if(index == iLowest(NULL, PERIOD_M1, MODE_LOW, 10, startIdx)) strength += 3;
  1103. }
  1104. return MathMin(10, strength);
  1105. }
  1106.  
  1107. double GetPatternWeight(string pattern)
  1108. {
  1109. if(pattern == "PIN") return 1.0;
  1110. if(pattern == "ENGULF") return 1.2;
  1111. if(pattern == "FAKE") return 1.1;
  1112. if(pattern == "EXHAUST") return 0.9;
  1113. if(pattern == "DOJI") return 0.7;
  1114. if(pattern == "WICK") return 0.6;
  1115. if(pattern == "LIQSWEEP") return 1.3;
  1116. return 0.8;
  1117. }
  1118.  
  1119. //+------------------------------------------------------------------+
  1120. //| OTC FIB REJECTION v4.3 - HIGH SIGNAL FREQUENCY EDITION |
  1121. //| Relaxed Timing + Gann Buffer + Better Swing Detection |
  1122. //+------------------------------------------------------------------+
  1123. void CalcFibRejectionHunter()
  1124. {
  1125. // ==========================================================
  1126. // SECTION 1: RESET ALL GLOBALS
  1127. // ==========================================================
  1128. g_fibV2_BestScore = 0; g_fibV2_BestProb = 0; g_fibV2_BestDir = "WAIT";
  1129. g_fibV2_Confidence = 0; g_fibV2_BestPrice = 0; g_fibV2_Pattern = "--";
  1130. g_fibV2_FibLevel = "--"; g_fibV2_Reason = "";
  1131.  
  1132. g_fibBestScore = 0; g_fibBestDir = "WAIT"; g_fibBestPrice = 0;
  1133. g_fibPattern = "--"; g_fibFibLevel = "--"; g_fibConfidence = 0;
  1134.  
  1135. // ==========================================================
  1136. // SECTION 2: EXPIRE OLD SIGNAL (60 seconds max life)
  1137. // ==========================================================
  1138. if(g_otcFibSignalTime > 0) {
  1139. int secElapsed = (int)(TimeCurrent() - g_otcFibSignalTime);
  1140. if(secElapsed > 60) { // 50 -> 60
  1141. g_otcFibSignalTime = 0;
  1142. g_otcHasSignal = false;
  1143. DeleteOTCFibLine();
  1144. }
  1145. }
  1146.  
  1147. // ==========================================================
  1148. // SECTION 3: TIMING WINDOW (FIX: 20 seconds before close)
  1149. // ==========================================================
  1150. int candleAge = (int)(TimeCurrent() - Time[0]);
  1151. int candleTotal = Period() * 60;
  1152. int remaining = candleTotal - candleAge;
  1153.  
  1154. // ✅ FIX: 3 second ki jagah 20 second ki window rakh di
  1155. if(remaining > 20 || remaining < 0) {
  1156. if(g_otcHasSignal) DrawOTCFibLine();
  1157. return;
  1158. }
  1159.  
  1160. if(Bars < 15) return;
  1161.  
  1162. // ==========================================================
  1163. // SECTION 4: BASIC CALCULATIONS
  1164. // ==========================================================
  1165. double pip = GetUniversalPip();
  1166. if(pip <= 0) pip = 0.0001;
  1167.  
  1168. double atrVal = iATR(NULL, 0, 14, 1);
  1169. if(atrVal <= 0) atrVal = pip * 8;
  1170.  
  1171. // ==========================================================
  1172. // SECTION 5: GANN BOX OR FRACTAL SWING COLLECTION
  1173. // ==========================================================
  1174. double sHighs[3]; sHighs[0]=0; sHighs[1]=0; sHighs[2]=0;
  1175. double sLows[3]; sLows[0]=0; sLows[1]=0; sLows[2]=0;
  1176. int hIdx[3]; hIdx[0]=0; hIdx[1]=0; hIdx[2]=0;
  1177. int lIdx[3]; lIdx[0]=0; lIdx[1]=0; lIdx[2]=0;
  1178. int hCnt = 0, lCnt = 0;
  1179.  
  1180. bool useGannBox = false;
  1181.  
  1182. // ✅ FIX: Minimum Box Size Filter (Chhote box = Noise, Fib nahi banani chahiye)
  1183. double gannBuffer = pip * 3;
  1184. double boxRange = g_gannBoxHigh - g_gannBoxLow;
  1185. double minBoxSizeForFib = pip * 12; // Box kam se kam 12 pips ka hona chahiye
  1186.  
  1187. if(g_gannBoxHigh > 0 && g_gannBoxLow > 0 && boxRange >= minBoxSizeForFib) {
  1188. // Box bada hai, aur candle andar hai
  1189. if(Close[0] <= (g_gannBoxHigh + gannBuffer) && Close[0] >= (g_gannBoxLow - gannBuffer)) {
  1190. useGannBox = true;
  1191. }
  1192. }
  1193.  
  1194. if(useGannBox) {
  1195. sHighs[0] = g_gannBoxHigh;
  1196. sLows[0] = g_gannBoxLow;
  1197. hIdx[0] = iHighest(Symbol(), PERIOD_M1, MODE_HIGH, 25, 1);
  1198. lIdx[0] = iLowest(Symbol(), PERIOD_M1, MODE_LOW, 25, 1);
  1199. hCnt = 1;
  1200. lCnt = 1;
  1201. }
  1202. else {
  1203. // Box chhota hai ya candle bahar hai, toh Fractal/Swing logic use karo
  1204. int maxLB = MathMin(60, Bars - 3);
  1205. double swingDupTol = atrVal * 0.4;
  1206. int i;
  1207.  
  1208. for(i = 2; i < maxLB && hCnt < 3; i++) {
  1209. if(High[i] > High[i-1] && High[i] > High[i-2] &&
  1210. High[i] > High[i+1] && High[i] > High[i+2]) {
  1211.  
  1212. bool dup = false;
  1213. for(int k = 0; k < hCnt; k++) {
  1214. if(MathAbs(High[i] - sHighs[k]) < swingDupTol) { dup = true; break; }
  1215. }
  1216.  
  1217. if(!dup && (High[i] - Low[i]) > atrVal * 0.3) {
  1218. sHighs[hCnt] = High[i]; hIdx[hCnt] = i; hCnt++;
  1219. }
  1220. }
  1221. }
  1222.  
  1223. for(i = 2; i < maxLB && lCnt < 3; i++) {
  1224. if(Low[i] < Low[i-1] && Low[i] < Low[i-2] &&
  1225. Low[i] < Low[i+1] && Low[i] < Low[i+2]) {
  1226.  
  1227. bool dup2 = false;
  1228. for(int k2 = 0; k2 < lCnt; k2++) {
  1229. if(MathAbs(Low[i] - sLows[k2]) < swingDupTol) { dup2 = true; break; }
  1230. }
  1231.  
  1232. if(!dup2 && (High[i] - Low[i]) > pip * 2) {
  1233. sLows[lCnt] = Low[i]; lIdx[lCnt] = i; lCnt++;
  1234. }
  1235. }
  1236. }
  1237. }
  1238.  
  1239. if(hCnt < 1 || lCnt < 1) return;
  1240.  
  1241. // ==========================================================
  1242. // SECTION 6: INDICATORS
  1243. // ==========================================================
  1244. double ema10 = iMA(NULL, 0, 10, 0, MODE_EMA, PRICE_CLOSE, 0);
  1245. double ema20 = iMA(NULL, 0, 20, 0, MODE_EMA, PRICE_CLOSE, 0);
  1246. bool emaBull = (ema10 > ema20);
  1247. bool emaBear = (ema10 < ema20);
  1248. bool emaFlat = (MathAbs(ema10 - ema20) < atrVal * 0.15);
  1249.  
  1250. double rsi0 = iRSI(NULL, 0, 14, PRICE_CLOSE, 0);
  1251. double rsi1 = iRSI(NULL, 0, 14, PRICE_CLOSE, 1);
  1252.  
  1253. double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  1254. double pDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
  1255. double mDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
  1256. double diGap = MathAbs(pDI - mDI);
  1257.  
  1258. // ==========================================================
  1259. // SECTION 7: FIB LEVELS SETUP
  1260. // ==========================================================
  1261. double touchTol = MathMax(atrVal * 0.25, pip * 8); // ✅ FIX: 0.20->0.25 | 6->8 pips (Wider touch)
  1262. double fibLvls[4];
  1263. fibLvls[0] = 0.886; fibLvls[1] = 0.500; fibLvls[2] = 0.618; fibLvls[3] = 0.786;
  1264.  
  1265. string fibNms[4];
  1266. fibNms[0] = "88.6%"; fibNms[1] = "50.0%"; fibNms[2] = "61.8%"; fibNms[3] = "78.6%";
  1267.  
  1268. // ==========================================================
  1269. // SECTION 8: BEST SIGNAL TRACKER
  1270. // ==========================================================
  1271. double bestScore = 0;
  1272. double bestPrice = 0;
  1273. string bestPat = "NONE";
  1274. string bestLvl = "--";
  1275. string bestDir = "WAIT";
  1276.  
  1277. // ==========================================================
  1278. // SECTION 9: MAIN COMBINATION LOOP
  1279. // ==========================================================
  1280. for(int h = 0; h < hCnt; h++) {
  1281. for(int l = 0; l < lCnt; l++) {
  1282.  
  1283. double swingH = sHighs[h];
  1284. double swingL = sLows[l];
  1285. int idxH = hIdx[h];
  1286. int idxL = lIdx[l];
  1287.  
  1288. if(idxH == idxL && !useGannBox) continue;
  1289.  
  1290. double range = MathAbs(swingH - swingL);
  1291. if(range <= pip * 2 || range > pip * 500) continue; // 3->2 min, 400->500 max
  1292.  
  1293. string dir;
  1294. // ✅ FIX: Use Close[1] instead of Close[0] to lock direction.
  1295. // Close[0] changes every tick causing flicker. Close[1] is stable.
  1296. double refPrice = Close[1];
  1297. double pricePos = (refPrice - MathMin(swingH, swingL)) / range;
  1298. pricePos = MathMax(0.0, MathMin(1.0, pricePos));
  1299.  
  1300. bool highFirst = (idxH < idxL);
  1301.  
  1302. if(useGannBox) {
  1303. // ✅ FIX: Direction locked based on last completed candle
  1304. if(Close[1] > Open[1]) dir = "CALL"; // Pichli candle Green thi toh CALL pullback
  1305. else if(Close[1] < Open[1]) dir = "PUT"; // Pichli candle Red thi toh PUT pullback
  1306. else dir = (pricePos < 0.50) ? "CALL" : "PUT"; // Doji ho toh price position se
  1307. } else {
  1308. if(highFirst) {
  1309. dir = (pricePos < 0.65) ? "CALL" : "PUT";
  1310. } else {
  1311. dir = (pricePos > 0.35) ? "PUT" : "CALL";
  1312. }
  1313. }
  1314.  
  1315. if(!emaFlat) {
  1316. if(emaBull && dir == "PUT" && pricePos < 0.25) dir = "CALL";
  1317. if(emaBear && dir == "CALL" && pricePos > 0.75) dir = "PUT";
  1318. }
  1319.  
  1320. if(adx > 25) {
  1321. if(emaBull && dir == "PUT" && pricePos < 0.35) dir = "CALL";
  1322. if(emaBear && dir == "CALL" && pricePos > 0.65) dir = "PUT";
  1323. }
  1324.  
  1325. // ==========================================================
  1326. // SECTION 10: FIB LEVEL LOOP
  1327. // ==========================================================
  1328. for(int f = 0; f < 4; f++) {
  1329. double fibPrice;
  1330.  
  1331. if(dir == "CALL") {
  1332. fibPrice = swingH - (range * fibLvls[f]);
  1333. } else {
  1334. fibPrice = swingL + (range * fibLvls[f]);
  1335. }
  1336.  
  1337. // ==========================================================
  1338. // SECTION 11: TOUCH CHECK [0]
  1339. // ==========================================================
  1340. double touchQ = 0;
  1341. bool touched = false;
  1342.  
  1343. if(dir == "CALL") {
  1344. double d = Low[0] - fibPrice;
  1345. if(d <= touchTol && d >= -touchTol * 2.0) { // 1.5 -> 2.0 (More forgiving)
  1346. touched = true;
  1347. touchQ = MathMax(0, 100 - MathAbs(d) / touchTol * 100);
  1348. double rng = High[0] - Low[0];
  1349. if(rng > 0) {
  1350. double lw = MathMin(Open[0], Close[0]) - Low[0];
  1351. if(lw / rng > 0.25) touchQ += 12; // 0.30 -> 0.25
  1352. }
  1353. }
  1354. } else {
  1355. double d2 = fibPrice - High[0];
  1356. if(d2 <= touchTol && d2 >= -touchTol * 2.0) { // 1.5 -> 2.0
  1357. touched = true;
  1358. touchQ = MathMax(0, 100 - MathAbs(d2) / touchTol * 100);
  1359. double rng2 = High[0] - Low[0];
  1360. if(rng2 > 0) {
  1361. double uw = High[0] - MathMax(Open[0], Close[0]);
  1362. if(uw / rng2 > 0.25) touchQ += 12; // 0.30 -> 0.25
  1363. }
  1364. }
  1365. }
  1366.  
  1367. // ==========================================================
  1368. // SECTION 12: TOUCH CHECK [1]
  1369. // ==========================================================
  1370. if(!touched) {
  1371. if(dir == "CALL") {
  1372. double d3 = Low[1] - fibPrice;
  1373. if(d3 <= touchTol && d3 >= -touchTol * 1.5) { // More forgiving
  1374. touched = true;
  1375. touchQ = MathMax(0, 75 - MathAbs(d3) / touchTol * 50);
  1376. if(Close[1] >= fibPrice - touchTol * 0.5) touchQ += 10;
  1377. }
  1378. } else {
  1379. double d4 = fibPrice - High[1];
  1380. if(d4 <= touchTol && d4 >= -touchTol * 1.5) { // More forgiving
  1381. touched = true;
  1382. touchQ = MathMax(0, 75 - MathAbs(d4) / touchTol * 50);
  1383. if(Close[1] <= fibPrice + touchTol * 0.5) touchQ += 10;
  1384. }
  1385. }
  1386. }
  1387.  
  1388. if(!touched) continue;
  1389.  
  1390. // ==========================================================
  1391. // SECTION 13: PATTERN DETECTION
  1392. // ==========================================================
  1393. string pat = "NONE";
  1394. double rng0 = High[0] - Low[0];
  1395.  
  1396. if(rng0 > 0) {
  1397. double bdy0 = MathAbs(Close[0] - Open[0]);
  1398. double uw0 = High[0] - MathMax(Open[0], Close[0]);
  1399. double lw0 = MathMin(Open[0], Close[0]) - Low[0];
  1400.  
  1401. if(dir == "CALL" && lw0 > bdy0 * 1.0 && lw0 / rng0 > 0.40) pat = "PIN"; // 1.2->1.0 | 0.45->0.40
  1402. else if(dir == "PUT" && uw0 > bdy0 * 1.0 && uw0 / rng0 > 0.40) pat = "PIN";
  1403.  
  1404. double bdy1 = MathAbs(Close[1] - Open[1]);
  1405. if(bdy1 > 0) {
  1406. if(dir == "CALL" && Close[0] > Open[0] && Close[1] < Open[1] && bdy0 > bdy1 * 1.0) pat = "ENGULF"; // 1.1->1.0
  1407. else if(dir == "PUT" && Close[0] < Open[0] && Close[1] > Open[1] && bdy0 > bdy1 * 1.0) pat = "ENGULF";
  1408. }
  1409.  
  1410. if(dir == "CALL" && Low[0] < fibPrice && Close[0] > fibPrice) pat = "FAKE";
  1411. else if(dir == "PUT" && High[0] > fibPrice && Close[0] < fibPrice) pat = "FAKE";
  1412.  
  1413. if(bdy0 / rng0 < 0.15 && rng0 > pip * 4) pat = "DOJI"; // 0.12->0.15 | 5->4
  1414.  
  1415. if(pat == "NONE") {
  1416. if(dir == "CALL" && lw0 > uw0 && lw0 / rng0 > 0.25) pat = "WICK"; // 0.30->0.25
  1417. else if(dir == "PUT" && uw0 > lw0 && uw0 / rng0 > 0.25) pat = "WICK";
  1418. }
  1419. }
  1420.  
  1421. // ==========================================================
  1422. // SECTION 14: BAYESIAN TRAP DETECTION
  1423. // ==========================================================
  1424. bool isTrap = false;
  1425. double trapPenalty = 0;
  1426. string trapReason = "";
  1427.  
  1428. if(dir == "CALL" && rsi0 < 35 && rsi1 > rsi0 && Low[0] < Low[1]) {
  1429. isTrap = true; trapReason = "RSI_DIV";
  1430. }
  1431. if(dir == "PUT" && rsi0 > 65 && rsi1 < rsi0 && High[0] > High[1]) {
  1432. isTrap = true; trapReason = "RSI_DIV";
  1433. }
  1434.  
  1435. if(adx < 18) {
  1436. if(dir == "CALL" && mDI > pDI + 8) { isTrap = true; trapReason = "ADX_WEAK"; }
  1437. if(dir == "PUT" && pDI > mDI + 8) { isTrap = true; trapReason = "ADX_WEAK"; }
  1438. }
  1439.  
  1440. double v0 = (double)iVolume(NULL, PERIOD_M1, 0);
  1441. double vAvg = 0;
  1442. for(int vi = 1; vi <= 5; vi++) vAvg += (double)iVolume(NULL, PERIOD_M1, vi);
  1443. vAvg /= 5.0;
  1444. if(vAvg > 0 && v0 > vAvg * 2.0) {
  1445. double rngV = High[0] - Low[0];
  1446. if(rngV > 0 && MathAbs(Close[0] - Open[0]) / rngV < 0.30) {
  1447. isTrap = true; trapReason = "VOL_SPIKE";
  1448. }
  1449. }
  1450.  
  1451. bool threeGreen = (Close[2] > Open[2] && Close[1] > Open[1] && Close[0] > Open[0]);
  1452. bool threeRed = (Close[2] < Open[2] && Close[1] < Open[1] && Close[0] < Open[0]);
  1453. if(dir == "CALL" && threeGreen) { isTrap = true; trapReason = "3GREEN"; }
  1454. if(dir == "PUT" && threeRed) { isTrap = true; trapReason = "3RED"; }
  1455.  
  1456. if(isTrap) {
  1457. trapPenalty = 10; // 15 -> 10 (Less penalty so lines still appear)
  1458. pat = "TRAP_" + trapReason + "_" + pat;
  1459. }
  1460.  
  1461. // ==========================================================
  1462. // SECTION 15: SCORING
  1463. // ==========================================================
  1464. double score = touchQ * 0.50; // 0.45 -> 0.50 (More weight to touch)
  1465.  
  1466. if(pat == "PIN" || StringFind(pat, "PIN") >= 0) score += 22;
  1467. else if(pat == "ENGULF" || StringFind(pat, "ENGULF") >= 0) score += 20;
  1468. else if(pat == "FAKE" || StringFind(pat, "FAKE") >= 0) score += 18;
  1469. else if(pat == "DOJI" || StringFind(pat, "DOJI") >= 0) score += 14;
  1470. else if(pat == "WICK" || StringFind(pat, "WICK") >= 0) score += 12;
  1471.  
  1472. if(f == 0) score += 10; // 88.6% (Deep trap, high bonus!)
  1473. else if(f == 1) score += 5; // 50.0%
  1474. else if(f == 2) score += 12; // 61.8% (Golden Ratio)
  1475. else if(f == 3) score += 6; // 78.6%
  1476.  
  1477. if(useGannBox) score += 10; // 8 -> 10
  1478.  
  1479. if(dir == "CALL" && emaBull) score += 10;
  1480. if(dir == "PUT" && emaBear) score += 10;
  1481.  
  1482. if(!isTrap) {
  1483. if(dir == "CALL" && rsi0 < 28) score += 14;
  1484. else if(dir == "CALL" && rsi0 < 35) score += 8;
  1485. if(dir == "PUT" && rsi0 > 72) score += 14;
  1486. else if(dir == "PUT" && rsi0 > 65) score += 8;
  1487. }
  1488.  
  1489. if(adx > 22 && diGap > 10) score += 5;
  1490.  
  1491. score -= trapPenalty;
  1492. score = MathMax(0, MathMin(100, score));
  1493.  
  1494. // ==========================================================
  1495. // SECTION 16: SAVE BEST
  1496. // ==========================================================
  1497. if(score > bestScore) {
  1498. bestScore = score;
  1499. bestPrice = fibPrice;
  1500. bestPat = pat;
  1501. bestLvl = fibNms[f];
  1502. bestDir = dir;
  1503. }
  1504. }
  1505. }
  1506. }
  1507.  
  1508. // ==========================================================
  1509. // SECTION 17: FINAL SIGNAL SET (Threshold 35)
  1510. // ==========================================================
  1511. if(bestScore >= 35 && bestPrice > 0) { // 38 -> 35
  1512. g_otcFibPrice = bestPrice;
  1513. g_otcFibDir = bestDir;
  1514. g_otcFibStrength = (int)bestScore;
  1515. g_otcFibPattern = bestPat;
  1516. g_otcFibLevel = bestLvl;
  1517. g_otcFibSignalTime = TimeCurrent();
  1518. g_otcHasSignal = true;
  1519.  
  1520. g_fibV2_BestScore = bestScore;
  1521. g_fibV2_BestProb = bestScore;
  1522. g_fibV2_BestDir = bestDir;
  1523. g_fibV2_Confidence = (int)bestScore;
  1524. g_fibV2_Pattern = bestPat;
  1525. g_fibV2_FibLevel = bestLvl;
  1526. g_fibV2_BestPrice = bestPrice;
  1527. g_fibV2_Reason = (useGannBox ? "GANB_v4.3_" : "FRC_v4.3_") + bestPat;
  1528.  
  1529. g_fibBestScore = bestScore;
  1530. g_fibBestProb = bestScore;
  1531. g_fibBestDir = bestDir;
  1532. g_fibConfidence = (int)bestScore;
  1533. g_fibBestPrice = bestPrice;
  1534. g_fibPattern = bestPat;
  1535. g_fibFibLevel = bestLvl;
  1536.  
  1537. DrawOTCFibLine();
  1538.  
  1539. Print("OTC FIB v4.3 ✅ ", bestDir, " | ", bestLvl,
  1540. " | Score:", (int)bestScore, "% | Pat:", bestPat,
  1541. " | Mode:", (useGannBox ? "GANN_BOX" : "FRACTAL"),
  1542. " | Trap:", (StringFind(bestPat, "TRAP_") >= 0 ? "YES" : "NO"));
  1543. }
  1544. }
  1545.  
  1546.  
  1547.  
  1548.  
  1549.  
  1550.  
  1551. void DrawFibRejectionLine()
  1552. {
  1553. DrawOTCFibLine();
  1554. }
  1555.  
  1556. //+------------------------------------------------------------------+
  1557. //| DRAW OTC FIB LINE (v3.5 - 200px RIGHT - PERFECT SPACING) |
  1558. //+------------------------------------------------------------------+
  1559. void DrawOTCFibLine()
  1560. {
  1561. if(!g_otcHasSignal || g_otcFibPrice <= 0) {
  1562. DeleteOTCFibLine();
  1563. return;
  1564. }
  1565.  
  1566. string lineName = PFX + "OTC_FIB_LINE";
  1567. string lblName = PFX + "OTC_FIB_LBL";
  1568.  
  1569. // --- LINE COLOR ---
  1570. color lineColor;
  1571. if(g_otcFibDir == "CALL")
  1572. lineColor = (g_otcFibStrength >= 70) ? C'0,255,100' : C'0,200,150';
  1573. else
  1574. lineColor = (g_otcFibStrength >= 70) ? C'255,50,50' : C'255,100,100';
  1575.  
  1576. // --- DRAW DOTTED LINE ---
  1577. SafeDel(lineName);
  1578. ObjectCreate(0, lineName, OBJ_HLINE, 0, 0, g_otcFibPrice);
  1579. ObjectSetInteger(0, lineName, OBJPROP_COLOR, lineColor);
  1580. ObjectSetInteger(0, lineName, OBJPROP_WIDTH, 1);
  1581. ObjectSetInteger(0, lineName, OBJPROP_STYLE, STYLE_DOT);
  1582. ObjectSetInteger(0, lineName, OBJPROP_BACK, false);
  1583.  
  1584. // --- LABEL (200px RIGHT - PERFECT BALANCE) ---
  1585. SafeDel(lblName);
  1586.  
  1587. int subWindow = 0;
  1588. int xCurr = 0, yCurr = 0;
  1589. datetime labelTime = 0;
  1590. double labelPrice = 0;
  1591. bool posOK = false;
  1592.  
  1593. // Current candle position se start karo
  1594. if(ChartTimePriceToXY(0, subWindow, Time[0], g_otcFibPrice, xCurr, yCurr)) {
  1595. int xLabel = xCurr + 200; // ✅ 200px RIGHT (Pehle 275 tha, ab 200 perfect rahega)
  1596. if(ChartXYToTimePrice(0, xLabel, yCurr, subWindow, labelTime, labelPrice)) {
  1597. posOK = true;
  1598. }
  1599. }
  1600.  
  1601. // Fallback (Agar pixels se time na mile toh 4 candle aage lagao)
  1602. if(!posOK && Bars > 3) {
  1603. int candleShift = 4;
  1604. labelTime = Time[0] + PeriodSeconds() * candleShift;
  1605. posOK = true;
  1606. }
  1607.  
  1608. if(posOK) {
  1609. string lblText = "FIB " + g_otcFibLevel + " | " + g_otcFibDir + " " +
  1610. IntegerToString(g_otcFibStrength) + "% [" + g_otcFibPattern + "]";
  1611. color lblColor = C'255,50,255';
  1612.  
  1613. ObjectCreate(0, lblName, OBJ_TEXT, 0, labelTime, g_otcFibPrice);
  1614. ObjectSetText(lblName, lblText, 12, "Arial Bold", lblColor);
  1615. ObjectSetInteger(0, lblName, OBJPROP_BACK, false);
  1616. }
  1617. }
  1618.  
  1619. //+------------------------------------------------------------------+
  1620. //| DELETE OTC FIB LINE |
  1621. //+------------------------------------------------------------------+
  1622. void DeleteOTCFibLine()
  1623. {
  1624. SafeDel(PFX + "OTC_FIB_LINE");
  1625. SafeDel(PFX + "OTC_FIB_LBL");
  1626. }
  1627.  
  1628. void CalcAdvancedPrediction(double &gP,double &rP,string &reason,color &pC){
  1629. if(Bars<50){gP=50;rP=50;reason="Bars low";pC=NEON_YELLOW;return;}
  1630. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  1631. double green=0,red=0;
  1632. double body1=MathAbs(Close[1]-Open[1]),range1=High[1]-Low[1];
  1633. if(range1>0){double uw=High[1]-MathMax(Open[1],Close[1]),lw=MathMin(Open[1],Close[1])-Low[1];
  1634. if(uw>range1*0.60&&Close[1]>Open[1])red+=22;else if(lw>range1*0.60&&Close[1]<Open[1])green+=22;
  1635. else if((uw+lw)/range1>0.55){if(uw>lw)red+=12;else green+=12;}}
  1636. 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);
  1637. int os=0,ob=0;
  1638. 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++;
  1639. if(os>=3)green+=18;else if(os>=2)green+=12;else if(ob>=3)red+=18;else if(ob>=2)red+=12;
  1640. double rsiPrev=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
  1641. double low1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],low2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
  1642. double high1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],high2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
  1643. if(low1<low2&&rsi>rsiPrev&&rsi<45)green+=15;if(high1>high2&&rsi<rsiPrev&&rsi>55)red+=15;
  1644. 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;
  1645. double vol_ratio=(vAvg>0)?v1/vAvg:1.0;
  1646. 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;}
  1647. 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;
  1648. double m1_haO2=(Open[3]+Close[3])/2.0,m1_haO1=(m1_haO2+m1_haC2)/2.0;
  1649. bool haBull1=(m1_haC1>m1_haO1);
  1650. double haStr1=MathAbs(m1_haC1-m1_haO1)/(High[1]-Low[1]+0.00001);
  1651. bool haBull5=false;double haStr5=0;
  1652. if(iBars(NULL,PERIOD_M5)>=5){
  1653. 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);
  1654. 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);
  1655. double o3=iOpen(NULL,PERIOD_M5,3),c3=iClose(NULL,PERIOD_M5,3);
  1656. 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;
  1657. haBull5=(haC1_5>haO1_5);haStr5=MathAbs(haC1_5-haO1_5)/(h1-l1+0.00001);}
  1658. if(haBull1&&haBull5)green+=15;else if(!haBull1&&!haBull5)red+=15;
  1659. else if(haBull1&&haStr1>0.5)green+=8;else if(!haBull1&&haStr1>0.5)red+=8;
  1660. 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);
  1661. double diDiff=plusDI-minusDI;
  1662. 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;}
  1663. else if(adx>15){if(plusDI>minusDI)green+=4;else red+=4;}
  1664. double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,20,2)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,20,2)];
  1665. double dR=(res-Close[0])/pip,dS=(Close[0]-sup)/pip;
  1666. if(dR<8&&dR>=0)red+=12;else if(dR<15&&dR>=0)red+=6;
  1667. if(dS<8&&dS>=0)green+=12;else if(dS<15&&dS>=0)green+=6;
  1668. 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;}}
  1669. 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);
  1670. 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);
  1671. if(macdMain>macdSig&&macdPrev<=macdSigPrev)green+=10;else if(macdMain<macdSig&&macdPrev>=macdSigPrev)red+=10;
  1672. else if(macdMain>macdSig)green+=5;else if(macdMain<macdSig)red+=5;
  1673. if(ENABLE_BB_PULLBACK&&g_bbSignal=="CALL")green+=12; else if(ENABLE_BB_PULLBACK&&g_bbSignal=="PUT")red+=12;
  1674. double diff=MathMax(-100.0,MathMin(100.0,green-red));
  1675. gP=MathMax(8.0,MathMin(92.0,50.0+diff*0.65));rP=100.0-gP;
  1676. double dom=MathMax(gP,rP);
  1677. if(dom>=82){reason=(gP>rP)?"STRONG GREEN":"STRONG RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
  1678. else if(dom>=72){reason=(gP>rP)?"GREEN":"RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;}
  1679. else if(dom>=60){reason=(gP>rP)?"WEAK GREEN":"WEAK RED";pC=(gP>rP)?NEON_CYAN:NEON_ORANGE;}
  1680. else{reason="WAIT";pC=NEON_YELLOW;}
  1681. }
  1682.  
  1683. string DetectMyStrategy(){
  1684. int cc=g_otcCallPct,cp=g_otcPutPct,thr=STRATEGY_THRESHOLD;
  1685. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TRAP_ONLY"){
  1686. if(cc>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TRAP";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA RED";return "PUT";}
  1687. if(cp>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TRAP";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA GREEN";return "CALL";}}
  1688. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TREND_ONLY"){
  1689. if(cc>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TREND";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA GREEN";return "CALL";}
  1690. if(cp>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TREND";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA RED";return "PUT";}}
  1691. g_strategyType="NONE";g_strategyReason="Wait "+IntegerToString(thr)+"% + HA";return "WAIT";
  1692. }
  1693.  
  1694. void CalcOTCCrowd(){
  1695. int cS=0,pS=0;int weights[15];
  1696. for(int w=0;w<15;w++)weights[w]=15-w*2;
  1697. for(int w=0;w<15;w++)if(weights[w]<1)weights[w]=1;
  1698. for(int i=1;i<=15&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
  1699. double uw=(High[i]-MathMax(Open[i],Close[i]))/rg,lw=(MathMin(Open[i],Close[i])-Low[i])/rg;int wgt=weights[i-1];
  1700. if(uw>0.70&&Close[i]<Open[i])cS+=4*wgt;if(lw>0.70&&Close[i]>Open[i])pS+=4*wgt;
  1701. if(uw>0.55&&Close[i]<Open[i])cS+=2*wgt;if(lw>0.55&&Close[i]>Open[i])pS+=2*wgt;
  1702. if(Close[i]>Open[i])cS+=1*wgt;else if(Close[i]<Open[i])pS+=1*wgt;}
  1703. int tot=cS+pS;if(tot==0){g_otcCallPct=50;g_otcPutPct=50;}
  1704. else{int rC=(int)(cS*100.0/tot),rP=100-rC;
  1705. if(rC>=rP){g_otcCallPct=MathMax(50,rC);g_otcPutPct=100-g_otcCallPct;}
  1706. else{g_otcPutPct=MathMax(50,rP);g_otcCallPct=100-g_otcPutPct;}}
  1707. }
  1708.  
  1709. // ============================================================
  1710. // BRAIN AI
  1711. // ============================================================
  1712. double BrainSc(int &cp){
  1713. double s=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001;
  1714. if(g_nearest_res>0){double dR=(g_nearest_res-Close[0])/pip; if(dR<5) s-=3; else if(dR<15) s-=1;}
  1715. if(g_nearest_sup>0){double dS=(Close[0]-g_nearest_sup)/pip; if(dS<5) s+=3; else if(dS<15) s+=1;}
  1716. 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;}
  1717. 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;}
  1718. double atr=iATR(NULL,PERIOD_M1,14,1);
  1719. 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;}}
  1720. int c=0; for(int i=1;i<=30;i++) if(Close[i]>Open[i]) c++; cp=(int)(c*100.0/30.0);
  1721. if(cp>=80) s-=4; else if(cp>=75) s-=2; else if(cp<=20) s+=4; else if(cp<=25) s+=2;
  1722. int dj=0; double wickBull=0,wickBear=0;
  1723. 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;}
  1724. if(wickBull>wickBear+1.0) s+=3; else if(wickBear>wickBull+1.0) s-=3;
  1725. if(dj>=4) s*=0.8;
  1726. 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;}
  1727. 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;
  1728. if(ema10>ema20&&ema10-ema20>3*pip&&s<-2) s*=0.7; if(ema10<ema20&&ema20-ema10>3*pip&&s>2) s*=0.7;
  1729. 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;
  1730. }
  1731.  
  1732. // ============================================================
  1733. // STABLE M5 SUPPORT & RESISTANCE (FIXED FLICKERING)
  1734. // ============================================================
  1735. void UpdateStableM5SR(){
  1736. // Sirf tab update karo jab naya 5-minute candle ban jaaye
  1737. if(iTime(NULL, PERIOD_M5, 0) == g_last_m5_bar) return;
  1738. g_last_m5_bar = iTime(NULL, PERIOD_M5, 0);
  1739.  
  1740. if(iBars(NULL, PERIOD_M5) < 20) return;
  1741.  
  1742. double cur = Close[0];
  1743.  
  1744. // Last 10 completed M5 candles me se sabse bada High (Resistance) aur sabse chhota Low (Support) dhundho
  1745. int highestIdx = iHighest(NULL, PERIOD_M5, MODE_HIGH, 10, 1);
  1746. int lowestIdx = iLowest(NULL, PERIOD_M5, MODE_LOW, 10, 1);
  1747.  
  1748. double potential_res = iHigh(NULL, PERIOD_M5, highestIdx);
  1749. double potential_sup = iLow(NULL, PERIOD_M5, lowestIdx);
  1750.  
  1751. // Sirf wahi line set karo jo current price ke upper ya neeche ho
  1752. g_nearest_res = (potential_res > cur) ? potential_res : 0;
  1753. g_nearest_sup = (potential_sup < cur) ? potential_sup : 0;
  1754.  
  1755. // Drawing call karo
  1756. DrawStableM5Lines();
  1757. CheckBRK(); // Breakout check normal rahega
  1758. }
  1759.  
  1760. void DrawStableM5Lines(){
  1761. // Purani lines delete karo
  1762. SafeDel(PFX+"NEAREST_RES"); SafeDel(PFX+"NEAREST_SUP");
  1763. SafeDel(PFX+"NEAREST_RES_LBL"); SafeDel(PFX+"NEAREST_SUP_LBL");
  1764.  
  1765. // sirf tab draw karo agar lines exist karti hon aur chart par jagah ho (Bars > 5)
  1766. if(g_nearest_res > 0 && Bars > 5){
  1767. DrawHLine(PFX+"NEAREST_RES", g_nearest_res, C'50,80,255', 2, STYLE_DASH); // Strict Blue Color
  1768. ObjectCreate(0, PFX+"NEAREST_RES_LBL", OBJ_TEXT, 0, Time[5], g_nearest_res);
  1769. ObjectSetText(PFX+"NEAREST_RES_LBL", "M5 RES " + ShortPrice(g_nearest_res), 9, "Arial Bold", C'50,80,255');
  1770. ObjectSetInteger(0, PFX+"NEAREST_RES_LBL", OBJPROP_BACK, false);
  1771. }
  1772. if(g_nearest_sup > 0 && Bars > 5){
  1773. DrawHLine(PFX+"NEAREST_SUP", g_nearest_sup, C'50,80,255', 2, STYLE_DASH); // Strict Blue Color
  1774. ObjectCreate(0, PFX+"NEAREST_SUP_LBL", OBJ_TEXT, 0, Time[5], g_nearest_sup);
  1775. ObjectSetText(PFX+"NEAREST_SUP_LBL", "M5 SUP " + ShortPrice(g_nearest_sup), 9, "Arial Bold", C'50,80,255');
  1776. ObjectSetInteger(0, PFX+"NEAREST_SUP_LBL", OBJPROP_BACK, false);
  1777. }
  1778. }
  1779.  
  1780. 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;}}
  1781.  
  1782. // ============================================================
  1783. // MICRO WICK & VOLUME TRAP
  1784. // ============================================================
  1785. 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;}
  1786.  
  1787. double VolumeTrapScore(){
  1788. if(!VOLUME_PROFILE_TRAP||Bars<50)return 0;
  1789. double cur=Close[0],hi=High[iHighest(NULL,0,MODE_HIGH,50,1)],lo=Low[iLowest(NULL,0,MODE_LOW,50,1)];
  1790. 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};
  1791. 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]++;}
  1792. for(int z=0;z<zn;z++)if(zc[z]>0)vz[z]/=zc[z];
  1793. int cz=(int)((cur-lo)/zs);if(cz<0)cz=0;if(cz>=zn)cz=zn-1;
  1794. double vr=(double)Volume[1]/(vz[cz]+0.001);double wr=MicroWick();
  1795. if(vr>2.0&&wr>0.65)return 25;if(vr>1.8&&wr>0.55)return 15;return 0;
  1796. }
  1797.  
  1798. double UltimateTrapScore(){double wr=MicroWick(),v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  1799. double avg=v2>0?v2:1.0,vr=v1/avg,rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),sc=0.0;
  1800. if(wr>0.65)sc+=40;if(vr>2.0)sc+=30;if(rsi>75||rsi<25)sc+=20;
  1801. if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))sc+=25;
  1802. sc+=VolumeTrapScore();return MathMin(100.0,sc);}
  1803.  
  1804. bool IsBrokerForce(double dummy=0){
  1805. int sd=0;for(int i=1;i<=3;i++){if(Close[i]>Open[i])sd++;else sd--;}
  1806. double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  1807. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
  1808. return(MathAbs(sd)==3&&v1>v2*2.0&&sp>BROKER_SPREAD_THRESHOLD);
  1809. }
  1810.  
  1811. // ============================================================
  1812. // NEURAL AI (FIXED fVol AND fTick DUPLICATES)
  1813. // ============================================================
  1814. double NeuralBiasFast(){double r=NeuralBias(0)*0.3+NeuralBias(1)*0.7;if(r>96)r=96;if(r<4)r=4;return r;}
  1815.  
  1816. double NeuralBias(int s){
  1817. double f[8];
  1818. 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);
  1819. for(int i=0;i<8;i++) f[i]/=100.0;
  1820. double h[4];
  1821. for(int i=0;i<4;i++){
  1822. double sum=0;for(int j=0;j<8;j++) sum+=f[j]*NW[j*4+i];
  1823. h[i]=MathMax(0,sum-0.06);
  1824. }
  1825. double out=0;for(int i=0;i<4;i++) out+=h[i]*NW[32+i];
  1826. double result=50.0+out*22.0;
  1827. return(result>96)?96:((result<4)?4:result);
  1828. }
  1829.  
  1830. double fDoji(int s){
  1831. if(s+8>=Bars)return 0;double score=0;int streak=0;
  1832. for(int i=s;i<s+8&&i<Bars;i++){
  1833. double body=MathAbs(Open[i]-Close[i]);double range=High[i]-Low[i];if(range<=0)continue;
  1834. double ratio=body/range;double w=(9.0-(i-s))/8.0;
  1835. if(ratio<0.15){score+=18*w;streak++;
  1836. double lw=MathMin(Open[i],Close[i])-Low[i];if(lw>range*0.55)score+=12*w;
  1837. double uw=High[i]-MathMax(Open[i],Close[i]);if(uw>range*0.55)score-=8*w;}
  1838. else if(ratio<0.25){score+=8*w;streak++;}}
  1839. if(streak>=3)score+=15;else if(streak>=2)score+=8;
  1840. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
  1841. if(g_nearest_res>0&&(g_nearest_res-cur)<8*pip)score+=12;
  1842. if(g_nearest_sup>0&&(cur-g_nearest_sup)<8*pip)score+=12;
  1843. if(g_hrn_price>0&&MathAbs(cur-g_hrn_price)<5*pip)score+=10;
  1844. return MathMin(100,score);
  1845. }
  1846.  
  1847. double fWick(int s){
  1848. double range=High[s]-Low[s];if(range==0)return 0;
  1849. double u=(High[s]-MathMax(Open[s],Close[s]))/range;double l=(MathMin(Open[s],Close[s])-Low[s])/range;
  1850. bool closedRed=(Close[s]<Open[s]);double score=0;
  1851. if(u>0.65&&!closedRed)score=95;else if(u>0.50&&!closedRed)score=70;
  1852. else if(l>0.65&&closedRed)score=90;else if(l>0.50&&closedRed)score=65;
  1853. else if(u>0.65||l>0.65)score=50;else if(u>0.50||l>0.50)score=30;
  1854. if(score>=50){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
  1855. if(g_nearest_res>0&&(g_nearest_res-cur)<10*pip)score+=15;
  1856. if(g_nearest_sup>0&&(cur-g_nearest_sup)<10*pip)score+=15;}
  1857. return MathMin(100,score);
  1858. }
  1859.  
  1860. // FIX: Removed duplicate avg==0 check
  1861. double fVol(){
  1862. if(Bars<15)return 0;
  1863. double cur=(double)iVolume(NULL,PERIOD_M1,0);double avg=0;
  1864. for(int i=1;i<=10;i++)avg+=iVolume(NULL,PERIOD_M1,i);
  1865. if(avg==0)return 0;
  1866. avg/=10.0; // Clean division
  1867. double ratio=cur/avg;double score=0;
  1868. if(ratio>3.0)score=95;else if(ratio>2.5)score=85;else if(ratio>2.0)score=75;
  1869. else if(ratio>1.5)score=50;else if(ratio>1.2)score=30;
  1870. if(ratio<0.7)score=MathMin(score,15);
  1871. return MathMin(100,score);
  1872. }
  1873.  
  1874. double fMom(int s){
  1875. if(s+5>=Bars)return 0;
  1876. double m1=(Close[s]-Close[s+1]);double m2=(Close[s+1]-Close[s+2]);double m3=(Close[s+2]-Close[s+3]);
  1877. bool shift=false;if(m1>0&&m2<0&&m3<0)shift=true;if(m1<0&&m2>0&&m3>0)shift=true;
  1878. double accel=MathAbs(m1)-MathAbs(m2);
  1879. 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]);
  1880. double score=0;
  1881. if(shift){score=88;if(accel>0)score+=12;}
  1882. if(body1<body2&&body2<body3&&body3>0){score=60;if(body1<body2*0.5)score=80;}
  1883. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  1884. if(MathAbs(m2)>3*pip&&MathAbs(m1)<pip)score=75;
  1885. return MathMin(100,score);
  1886. }
  1887.  
  1888. double fSpread(){
  1889. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);double typical=3.0;double ratio=sp/typical;double score=0;
  1890. if(ratio>3.0)score=95;else if(ratio>2.5)score=85;else if(ratio>2.0)score=75;
  1891. else if(ratio>1.5)score=50;else if(ratio>1.2)score=30;
  1892. int h=TimeHour(TimeGMT());if((h>=0&&h<=3)||(h>=12&&h<=14))score+=10;
  1893. return MathMin(100,score);
  1894. }
  1895.  
  1896. double fMem(int s){
  1897. if(s+10>=Bars)return 0;
  1898. bool bullEng=(Close[s]>Open[s])&&(Close[s+1]<Open[s+1])&&(Close[s]>=Open[s+1])&&(Open[s]<=Close[s+1]);
  1899. bool bearEng=(Close[s]<Open[s])&&(Close[s+1]>Open[s+1])&&(Close[s]<=Open[s+1])&&(Open[s]>=Close[s+1]);
  1900. double range=High[s]-Low[s];if(range<=0)return 0;
  1901. 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];
  1902. bool pinUp=(body<range*0.3&&lowerW>range*0.5);bool pinDn=(body<range*0.3&&upperW>range*0.5);
  1903. double score=0;
  1904. if(bullEng)score=85;else if(bearEng)score=85;else if(pinUp)score=80;else if(pinDn)score=80;
  1905. if(score>=50){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
  1906. if(g_nearest_res>0&&(g_nearest_res-cur)<10*pip)score+=15;
  1907. if(g_nearest_sup>0&&(cur-g_nearest_sup)<10*pip)score+=15;}
  1908. return MathMin(100,score);
  1909. }
  1910.  
  1911. // FIX: Removed duplicate volP==0 check
  1912. double fTick(int s){
  1913. if(s+5>=Bars)return 0;
  1914. double volN=(double)iVolume(NULL,PERIOD_M1,s);double volP=(double)iVolume(NULL,PERIOD_M1,s+1);
  1915. if(volP==0)return 0; // Single clean check
  1916. double volRatio=volN/volP;double priceMove=MathAbs(Close[s]-Close[s+1]);
  1917. double pricePct=Close[s+1]>0?priceMove/Close[s+1]*100:0;double score=0;
  1918. 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;
  1919. return MathMin(100,score);
  1920. }
  1921.  
  1922. double fFrac(int s){
  1923. if(s+4>=Bars||s<2)return 0;
  1924. bool fHigh=(High[s]>High[s-1]&&High[s]>High[s-2]&&High[s]>High[s+1]&&High[s]>High[s+2]);
  1925. bool fLow=(Low[s]<Low[s-1]&&Low[s]<Low[s-2]&&Low[s]<Low[s+1]&&Low[s]<Low[s+2]);
  1926. if(!fHigh&&!fLow)return 0;double score=0;
  1927. 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;
  1928. if(dist<15)score+=20;else if(dist<30)score+=10;if(Close[s]<High[s])score+=15;}
  1929. 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;
  1930. if(dist<15)score+=20;else if(dist<30)score+=10;if(Close[s]>Low[s])score+=15;}
  1931. return MathMin(100,score);
  1932. }
  1933.  
  1934. 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;}
  1935.  
  1936. // ============================================================
  1937. // COMMON POINTS & WICK REJECTIONS
  1938. // ============================================================
  1939. void DetectCommonPoints(){
  1940. if(!SHOW_COMMON_POINTS){g_commonCount=0;return;}
  1941. if(Time[0]==g_lastCommonScan)return;g_lastCommonScan=Time[0];g_commonCount=0;
  1942. datetime nowBar=Time[0];int periodSec=PeriodSeconds(PERIOD_M1);
  1943. double m5h=iHigh(NULL,PERIOD_M5,iHighest(NULL,PERIOD_M5,MODE_HIGH,10,1));
  1944. double m5l=iLow(NULL,PERIOD_M5,iLowest(NULL,PERIOD_M5,MODE_LOW,10,1));
  1945. 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++;}
  1946. 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++;}
  1947. 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++;}
  1948. 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++;}
  1949. 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--;}
  1950. }
  1951.  
  1952. void DrawCommonPoints(){
  1953. return; // BLUE CALL/PUT ZONE LINES REMOVED
  1954. 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));}
  1955. if(!SHOW_COMMON_POINTS||g_commonCount==0)return;
  1956. for(int i=0;i<g_commonCount;i++){
  1957. if(TimeCurrent()>g_commonExpire[i])continue;if(IsLineNearby(g_commonPrice[i],8.0))continue;
  1958. string id=PFX+"COMMON_"+IntegerToString(i),idL=PFX+"COMMON_L_"+IntegerToString(i),idH=PFX+"COMMON_HL_"+IntegerToString(i);color zc=DARK_BLUE_NEON;
  1959. 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);
  1960. ObjectCreate(0,id,OBJ_TEXT,0,Time[0],g_commonPrice[i]);ObjectSetText(id,"*",16,"Arial",zc);ObjectSetInteger(0,id,OBJPROP_BACK,false);
  1961. string lbl=(g_commonType[i]=="CALL")?"^ CALL ZONE":"v PUT ZONE";
  1962. 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);
  1963. }
  1964. }
  1965.  
  1966.  
  1967.  
  1968.  
  1969. int CalcAdvancedMicroTrap(){
  1970. if(Bars<20) return 0;
  1971. int score=0;
  1972. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  1973. double r1=High[1]-Low[1];
  1974. if(r1>0){
  1975. double uw1=(High[1]-MathMax(Open[1],Close[1]))/r1;
  1976. double lw1=(MathMin(Open[1],Close[1])-Low[1])/r1;
  1977. if(uw1>0.65) score+=35; else if(uw1>0.50) score+=18;
  1978. if(lw1>0.65) score+=25; else if(lw1>0.50) score+=12;
  1979. }
  1980. double r0=High[0]-Low[0];
  1981. 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;}
  1982. 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;
  1983. 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;}
  1984. double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  1985. if(rsi>82||rsi<18) score+=25; else if(rsi>75||rsi<25) score+=18; else if(rsi>70||rsi<30) score+=10;
  1986. if(g_nearest_res>0 && (High[1]>g_nearest_res && Close[1]<g_nearest_res)) score+=30;
  1987. if(g_nearest_sup>0 && (Low[1]<g_nearest_sup && Close[1]>g_nearest_sup)) score+=30;
  1988. bool aG=(Close[1]>Open[1] && Close[2]>Open[2] && Close[3]>Open[3]);
  1989. bool aR=(Close[1]<Open[1] && Close[2]<Open[2] && Close[3]<Open[3]);
  1990. if(aG||aR) score+=18;
  1991. if(Bars>=5){bool aG4=(aG && Close[4]>Open[4]); bool aR4=(aR && Close[4]<Open[4]); if(aG4||aR4) score+=10;}
  1992. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
  1993. if(sp>BROKER_SPREAD_THRESHOLD*2.0) score+=15; else if(sp>BROKER_SPREAD_THRESHOLD*1.5) score+=8;
  1994. 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;}
  1995. return MathMin(100,score);
  1996. }
  1997.  
  1998. double CalcAdvancedTFA(string &detail){
  1999. if(Bars<30){detail="Bars low";return 3.0;}
  2000. double score=0;string p="";
  2001. double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);
  2002. double adxSc=(adx>=25)?1.0:(adx>=20)?0.6:(adx>=15)?0.3:0.1;
  2003. score+=adxSc;p+="ADX:"+((adxSc>=0.6)?"+":"-")+" ";
  2004. double v1=iVolume(NULL,PERIOD_M1,1),vA=0;
  2005. for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);
  2006. vA=(vA>0)?vA/5.0:1;double vr=v1/vA;
  2007. double volSc=(vr>=2.0)?1.0:(vr>=1.5)?0.7:(vr>=1.1)?0.4:0.1;
  2008. score+=volSc;p+="VOL:"+((volSc>=0.5)?"+":"-")+" ";
  2009. double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  2010. double rsiSc=0.2;if(rsi>=60||rsi<=40)rsiSc=1.0;else if(rsi>=55||rsi<=45)rsiSc=0.6;
  2011. score+=rsiSc;p+="RSI:"+((rsiSc>=0.6)?"+":"-")+" ";
  2012. double atr=iATR(NULL,PERIOD_M1,14,1),cs=High[1]-Low[1],atrSc=0.2;
  2013. 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;}
  2014. score+=atrSc;p+="ATR:"+((atrSc>=0.6)?"+":"-")+" ";
  2015. double body=MathAbs(Close[1]-Open[1]),range=High[1]-Low[1],bdySc=0.2;
  2016. 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;}
  2017. score+=bdySc;p+="BODY:"+((bdySc>=0.6)?"+":"-")+" ";
  2018. double sesSc=IsSessionActive()?1.0:0.4;
  2019. score+=sesSc;p+="SES:"+((sesSc>=0.7)?"+":"-");
  2020. double finalScore=MathMin(6.0,score);int rounded=(int)MathRound(finalScore);
  2021. string dir="MIX";
  2022. if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")dir="STRONG UP";
  2023. else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")dir="STRONG DOWN";
  2024. else if(g_haM1=="HA BULLISH 1")dir="UP";
  2025. else if(g_haM1=="HA BEARISH 1")dir="DOWN";
  2026. detail=p+" | "+IntegerToString(rounded)+"/6 "+dir;
  2027. g_tfa_detail=detail;return finalScore;
  2028. }
  2029.  
  2030. string CalcAdvancedMarketBias(color &bC,double brain,double rsc){
  2031. if(Bars<30){bC=NEON_YELLOW;return "CALCULATING";}
  2032. double score=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  2033. double pc=Close[0]-Close[10];
  2034. 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;
  2035. double hh1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hh2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
  2036. double ll1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],ll2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
  2037. 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;
  2038. double ema20=0,ema20p=0;for(int i=0;i<20;i++)ema20+=Close[i];ema20/=20;
  2039. for(int i=1;i<=20&&i<Bars;i++)ema20p+=Close[i];ema20p/=20;
  2040. if(ema20>ema20p)score+=3;else if(ema20<ema20p)score-=3;
  2041. double ema50=0;for(int i=0;i<50&&i<Bars;i++)ema50+=Close[i];ema50/=MathMin(50,Bars);
  2042. if(ema20>ema50)score+=3;else score-=3;
  2043. 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++;}
  2044. if(gC>=7)score+=3;else if(rC>=7)score-=3;else if(gC>=5)score+=1;else if(rC>=5)score-=1;
  2045. 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");
  2046. if(m1B&&m5B)score+=4;else if(m1Be&&m5Be)score-=4;else if(m1B)score+=2;else if(m1Be)score-=2;
  2047. 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);
  2048. if(adx>20){if(pDI>mDI+5)score+=4;else if(mDI>pDI+5)score-=4;}
  2049. if(brain>3)score-=2;else if(brain<-3)score+=2;
  2050. if(Close[1]>Open[1])score+=1;else if(Close[1]<Open[1])score-=1;
  2051. if(rsc>2)score+=1;else if(rsc<-2)score-=1;
  2052. 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";}
  2053. 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";}
  2054. bC=NEON_YELLOW;return "NEUTRAL";
  2055. }
  2056.  
  2057.  
  2058.  
  2059. // ============================================================
  2060. // OTC BROKER KILLER v4.0 - FIXED GANN STATIC TRAP ENGINE
  2061. // ============================================================
  2062. void CalcVisualTrapPro(){
  2063. // --- INITIAL RESETS ---
  2064. g_visualTrapPro.boxStatus = "NO BOX";
  2065. g_visualTrapPro.gannStatus = "--";
  2066. g_visualTrapPro.gannColor = CGR;
  2067. g_visualTrapPro.m30Dir = "M30:NOT NEEDED";
  2068. g_visualTrapPro.m1Seq = "M1:--";
  2069. g_visualTrapPro.verdict = "SCANNING";
  2070. g_visualTrapPro.verdictColor = CGR;
  2071. g_visualTrapPro.callBias = 50;
  2072. g_visualTrapPro.putBias = 50;
  2073. g_visualTrapPro.trapScore = 0;
  2074. g_visualTrapPro.buySignal = false;
  2075. g_visualTrapPro.sellSignal = false;
  2076.  
  2077. SafeDel(PFX+"VBOX");
  2078. SafeDel(PFX+"VMID");
  2079. SafeDel(PFX+"VSIG");
  2080.  
  2081. int m1B = 0, m1R = 0;
  2082. for(int i = 1; i <= 8 && i < Bars; i++){
  2083. if(Close[i] > Open[i]) m1B++;
  2084. else if(Close[i] < Open[i]) m1R++;
  2085. }
  2086. int total = m1B + m1R;
  2087. if(total > 0){
  2088. g_visualTrapPro.callBias = NormalizeDouble((double)m1B / total * 100.0, 1);
  2089. g_visualTrapPro.putBias = NormalizeDouble((double)m1R / total * 100.0, 1);
  2090. }
  2091.  
  2092. string seq = "";
  2093. for(int i = 1; i <= 8 && i < Bars; i++){
  2094. if(Close[i] > Open[i]) seq += "G";
  2095. else if(Close[i] < Open[i]) seq += "R";
  2096. else seq += "D";
  2097. }
  2098. g_visualTrapPro.m1Seq = "M1:" + seq;
  2099.  
  2100. double pip = GetUniversalPip();
  2101. if(pip <= 0) pip = Point;
  2102. if(pip <= 0) pip = 0.0001;
  2103.  
  2104. static double s_boxHigh = 0;
  2105. static double s_boxLow = 0;
  2106. static datetime s_boxTime = 0;
  2107.  
  2108. int hI = iHighest(Symbol(), PERIOD_M1, MODE_HIGH, 25, 1);
  2109. int lI = iLowest(Symbol(), PERIOD_M1, MODE_LOW, 25, 1);
  2110.  
  2111. if(hI >= 0 && lI >= 0 && Bars > 25) {
  2112. double currentHigh = High[hI];
  2113. double currentLow = Low[lI];
  2114.  
  2115. bool newExtreme = (s_boxHigh == 0) ||
  2116. (currentHigh > s_boxHigh) ||
  2117. (currentLow < s_boxLow) ||
  2118. (Time[0] - s_boxTime > 900);
  2119.  
  2120. if(newExtreme) {
  2121. s_boxHigh = currentHigh;
  2122. s_boxLow = currentLow;
  2123. s_boxTime = Time[0];
  2124. }
  2125.  
  2126. // ✅ NEW: Gann Box boundaries ko global mein save karo Fib ke liye
  2127. g_gannBoxHigh = s_boxHigh;
  2128. g_gannBoxLow = s_boxLow;
  2129.  
  2130. double bH = s_boxHigh;
  2131. double bL = s_boxLow;
  2132. double bHt = bH - bL;
  2133. double bP = bHt / pip;
  2134.  
  2135. g_visualTrapPro.boxStatus = "GANN:" + DoubleToString(bP,1) + "p";
  2136.  
  2137. double mid = bL + (bHt / 2.0);
  2138. double dist = MathAbs(Close[0] - mid) / pip;
  2139. double pricePos = ((Close[0] - bL) / bHt) * 100.0;
  2140. double body = MathAbs(Close[0] - Open[0]) / pip;
  2141.  
  2142. g_visualTrapPro.trapScore = 0;
  2143.  
  2144. if(dist < 1.5) g_visualTrapPro.trapScore += 30;
  2145. else if(dist < 3.0) g_visualTrapPro.trapScore += 15;
  2146. else g_visualTrapPro.trapScore += 5;
  2147.  
  2148. if(pricePos > 40 && pricePos < 60) g_visualTrapPro.trapScore += 20;
  2149.  
  2150. if(bP < 10) g_visualTrapPro.trapScore += 20;
  2151. else if(bP < 18) g_visualTrapPro.trapScore += 10;
  2152.  
  2153. if(body < 1.0) g_visualTrapPro.trapScore += 15;
  2154. else if(body < 2.0) g_visualTrapPro.trapScore += 10;
  2155.  
  2156. double upperWick = (High[0] - MathMax(Open[0], Close[0])) / pip;
  2157. double lowerWick = (MathMin(Open[0], Close[0]) - Low[0]) / pip;
  2158. if(upperWick > 1.0 && lowerWick > 1.0) g_visualTrapPro.trapScore += 15;
  2159.  
  2160. if(g_visualTrapPro.trapScore > 100) g_visualTrapPro.trapScore = 100;
  2161.  
  2162. if(g_visualTrapPro.trapScore >= 70) {
  2163. g_visualTrapPro.gannStatus = "[TRAP " + DoubleToString(g_visualTrapPro.trapScore,0) + "%]";
  2164. g_visualTrapPro.gannColor = NEON_YELLOW;
  2165. }
  2166. else if(g_visualTrapPro.trapScore >= 45) {
  2167. g_visualTrapPro.gannStatus = "[WEAK " + DoubleToString(g_visualTrapPro.trapScore,0) + "%]";
  2168. g_visualTrapPro.gannColor = NEON_ORANGE;
  2169. }
  2170. else {
  2171. g_visualTrapPro.gannStatus = "[GANN " + DoubleToString(g_visualTrapPro.trapScore,0) + "%]";
  2172. g_visualTrapPro.gannColor = NEON_CYAN;
  2173. }
  2174.  
  2175. datetime tStart = Time[25];
  2176. datetime tEnd = Time[0] + 60;
  2177.  
  2178. ObjectCreate(0, PFX+"VBOX", OBJ_RECTANGLE, 0, tStart, bH, tEnd, bL);
  2179. ObjectSetInteger(0, PFX+"VBOX", OBJPROP_COLOR, clrWhite);
  2180. ObjectSetInteger(0, PFX+"VBOX", OBJPROP_WIDTH, 2);
  2181. ObjectSetInteger(0, PFX+"VBOX", OBJPROP_BACK, false);
  2182.  
  2183. ObjectCreate(0, PFX+"VMID", OBJ_HLINE, 0, 0, mid);
  2184. ObjectSetInteger(0, PFX+"VMID", OBJPROP_COLOR, clrYellow);
  2185. ObjectSetInteger(0, PFX+"VMID", OBJPROP_WIDTH, 1);
  2186. ObjectSetInteger(0, PFX+"VMID", OBJPROP_BACK, false);
  2187.  
  2188. } else {
  2189. g_visualTrapPro.boxStatus = "GANN:NO DATA";
  2190. g_gannBoxHigh = 0; // ✅ No box, reset globals
  2191. g_gannBoxLow = 0;
  2192. }
  2193.  
  2194. if(g_visualTrapPro.trapScore >= 70) {
  2195. if(g_visualTrapPro.callBias >= 60) {
  2196. g_visualTrapPro.verdict = "PUT " + DoubleToString(g_visualTrapPro.putBias,0) + "%";
  2197. g_visualTrapPro.verdictColor = NEON_RED;
  2198. g_visualTrapPro.sellSignal = true;
  2199. g_visualTrapPro.buySignal = false;
  2200. }
  2201. else if(g_visualTrapPro.putBias >= 60) {
  2202. g_visualTrapPro.verdict = "CALL " + DoubleToString(g_visualTrapPro.callBias,0) + "%";
  2203. g_visualTrapPro.verdictColor = NEON_GREEN;
  2204. g_visualTrapPro.buySignal = true;
  2205. g_visualTrapPro.sellSignal = false;
  2206. }
  2207. else {
  2208. g_visualTrapPro.verdict = "TRAP " + DoubleToString(g_visualTrapPro.trapScore,0) + "%";
  2209. g_visualTrapPro.verdictColor = NEON_YELLOW;
  2210. }
  2211. }
  2212. else if(g_visualTrapPro.callBias >= 65) {
  2213. g_visualTrapPro.verdict = "CALL " + DoubleToString(g_visualTrapPro.callBias,0) + "%";
  2214. g_visualTrapPro.verdictColor = NEON_GREEN;
  2215. g_visualTrapPro.buySignal = true;
  2216. }
  2217. else if(g_visualTrapPro.putBias >= 65) {
  2218. g_visualTrapPro.verdict = "PUT " + DoubleToString(g_visualTrapPro.putBias,0) + "%";
  2219. g_visualTrapPro.verdictColor = NEON_RED;
  2220. g_visualTrapPro.sellSignal = true;
  2221. }
  2222. else {
  2223. g_visualTrapPro.verdict = "WAIT " + DoubleToString(g_visualTrapPro.callBias,0) + "/" + DoubleToString(g_visualTrapPro.putBias,0);
  2224. g_visualTrapPro.verdictColor = CGR;
  2225. }
  2226.  
  2227. if((g_visualTrapPro.buySignal || g_visualTrapPro.sellSignal) && g_lastTrapArrowTime != Time[0]){
  2228. g_lastTrapArrowTime = Time[0];
  2229. double arrowY = g_visualTrapPro.buySignal ? Low[0] - pip*5 : High[0] + pip*5;
  2230. ObjectCreate(0, PFX+"VSIG", OBJ_ARROW, 0, Time[0], arrowY);
  2231. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_ARROWCODE, g_visualTrapPro.buySignal ? 233 : 234);
  2232. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_COLOR, g_visualTrapPro.buySignal ? NEON_GREEN : NEON_RED);
  2233. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_WIDTH, 3);
  2234. ObjectSetInteger(0, PFX+"VSIG", OBJPROP_BACK, false);
  2235. }
  2236. }
  2237.  
  2238. // ============================================================
  2239. // HIDDEN LEVELS & HELPERS
  2240. // ============================================================
  2241. void DetectHiddenLevels(){
  2242. g_htfLevelCount=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double curP=Close[0];
  2243. double rU=MathCeil(curP/(10*pip))*(10*pip),rD=MathFloor(curP/(10*pip))*(10*pip);
  2244. if(MathAbs(curP-rU)/pip<=15)AddLevel(rU,"ROUND","RESISTANCE",TimeCurrent(),8,true);
  2245. if(MathAbs(curP-rD)/pip<=15)AddLevel(rD,"ROUND","SUPPORT",TimeCurrent(),8,true);
  2246. DetectHTFLevels(PERIOD_M5,"M5",3,pip);DetectHTFLevels(PERIOD_M15,"M15",5,pip);
  2247. DetectHTFLevels(PERIOD_M30,"M30",7,pip);DetectHTFLevels(PERIOD_H1,"H1",9,pip);
  2248. SortLevelsByStrength();
  2249. }
  2250.  
  2251. void DetectHTFLevels(ENUM_TIMEFRAMES tf,string tfN,int bS,double pip){
  2252. int bars=MathMin(50,iBars(NULL,tf));if(bars<10)return;double curP=Close[0];
  2253. for(int i=2;i<bars-2;i++){
  2254. 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);}
  2255. 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);}
  2256. }
  2257. }
  2258.  
  2259. 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;}
  2260. 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;}
  2261.  
  2262. void AddLevel(double price,string tf,string type,datetime time,int strength,bool isRound){
  2263. if(g_htfLevelCount>=50)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  2264. for(int i=0;i<g_htfLevelCount;i++)if(MathAbs(g_htfLevels[i].price-price)/pip<5)return;
  2265. g_htfLevels[g_htfLevelCount].price=price;g_htfLevels[g_htfLevelCount].timeframe=tf;g_htfLevels[g_htfLevelCount].type=type;
  2266. g_htfLevels[g_htfLevelCount].time=time;g_htfLevels[g_htfLevelCount].strength=strength;g_htfLevels[g_htfLevelCount].isRoundNumber=isRound;g_htfLevelCount++;
  2267. }
  2268.  
  2269. 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;}}
  2270.  
  2271. void DrawHiddenLevels(){
  2272. for(int i=0;i<50;i++){SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i));SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i)+"_LBL");}
  2273. int dc=MathMin(10,g_htfLevelCount);int drawn=0;
  2274. for(int i=0;i<dc&&drawn<5;i++){
  2275. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  2276. if(MathAbs(Close[0]-g_htfLevels[i].price)/pip>30)continue;if(IsLineNearby(g_htfLevels[i].price,5.0))continue;
  2277. string nm=PFX+"HTF_LEVEL_"+IntegerToString(drawn);
  2278. color lc=g_htfLevels[i].isRoundNumber?NEON_PURPLE:(StringFind(g_htfLevels[i].type,"SUPPORT")>=0?NEON_GREEN:NEON_RED);
  2279. 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);
  2280. string ln=nm+"_LBL";ObjectCreate(0,ln,OBJ_TEXT,0,Time[0],g_htfLevels[i].price);
  2281. ObjectSetText(ln,g_htfLevels[i].timeframe+" "+g_htfLevels[i].type+" S:"+IntegerToString(g_htfLevels[i].strength),9,"Arial",lc);drawn++;
  2282. }
  2283. }
  2284.  
  2285. string DetectSuddenReversal(){
  2286. if(Bars<10)return "";bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  2287. double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);double atr=iATR(NULL,PERIOD_M1,14,1);if(atr<=0)return "";
  2288. double rng1=High[1]-Low[1];double body1=MathAbs(Close[1]-Open[1]);
  2289. 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;
  2290. bool bull1=(Close[1]>Open[1]);bool bear1=(Close[1]<Open[1]);
  2291. int bullScore=0,bearScore=0;
  2292. if(lw1>0.60&&body1<rng1*0.30&&rsi<48){bullScore+=30;}
  2293. if(uw1>0.60&&body1<rng1*0.30&&rsi>52){bearScore+=30;}
  2294. if(bull1&&body1>MathAbs(Close[2]-Open[2])*1.1&&Close[2]<Open[2]&&body1>atr*0.35){bullScore+=25;}
  2295. if(bear1&&body1>MathAbs(Close[2]-Open[2])*1.1&&Close[2]>Open[2]&&body1>atr*0.35){bearScore+=25;}
  2296. if(rsi<30&&bullScore>0){bullScore+=15;}if(rsi>70&&bearScore>0){bearScore+=15;}
  2297. if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)/pip<8&&bullScore>0){bullScore+=15;}
  2298. if(g_nearest_res>0&&(g_nearest_res-Close[0])/pip<8&&bearScore>0){bearScore+=15;}
  2299. if(bullScore>=40&&bullScore>bearScore){return "BULL REVERSAL";}
  2300. else if(bearScore>=40&&bearScore>bullScore){return "BEAR REVERSAL";}
  2301. return "";
  2302. }
  2303.  
  2304. void SafeDel(string id){if(ObjectFind(0,id)>=0)ObjectDelete(0,id);}
  2305. 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);}
  2306. 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);}}
  2307. 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);}}
  2308. 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,"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;if(StringFind(nm,"FIB_REJ")>=0)continue;ObjectDelete(nm);}}
  2309.  
  2310. // ============================================================
  2311. // ML & ACCURACY
  2312. // ============================================================
  2313. 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;}
  2314. 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);}}
  2315. 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();}
  2316. 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++;bool wasFibTrap=(g_fibV2_Pattern=="FAKE"||g_fibV2_Pattern=="EXHAUST");UpdateBayesianPrior(win,wasFibTrap);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];}
  2317. 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;}
  2318. 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]));}}
  2319.  
  2320. 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";}
  2321. 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;}
  2322. 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;}
  2323. 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;}
  2324. 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;}
  2325. double GetADXStrength(){if(Bars<20)return 0;return iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);}
  2326. 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;}
  2327. 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;}
  2328. 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;}
  2329.  
  2330. // ============================================================
  2331. // HRN LEVEL (Kept for chart line only, cube removed)
  2332. // ============================================================
  2333. 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);}
  2334. 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++;}
  2335. 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;}
  2336.  
  2337. 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;}}
  2338.  
  2339. void UpdateHRN(){
  2340. if(Bars<LOOKBACK+10)return;
  2341. 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;
  2342. if(Time[0]!=g_hrn_scan_bar){double nH=FindBestHiddenRoundNumber(Close[0]);if(g_hrn_price==0||MathAbs(nH-g_hrn_price)>2*pip){g_hrn_price=nH;g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}g_hrn_scan_bar=Time[0];}
  2343. double tol=1*pip;
  2344. if(g_hrn_is_sup){if(Bars>=3){bool c1b=(Close[1]<g_hrn_price-tol),c2b=(Close[2]<g_hrn_price-tol);if(c1b&&c2b){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}else if(c1b)g_hrn_brk_bars=1;else g_hrn_brk_bars=0;}}
  2345. else {if(Bars>=3){bool c1a=(Close[1]>g_hrn_price+tol),c2a=(Close[2]>g_hrn_price+tol);if(c1a&&c2a){g_hrn_confirmed_break=true;g_hrn_brk_bars=HRN_CONFIRM_BARS;}else if(c1a)g_hrn_brk_bars=1;else g_hrn_brk_bars=0;}}
  2346. if(g_hrn_brk_bars>=HRN_CONFIRM_BARS){double nH=FindBestHiddenRoundNumber(Close[0]);if(MathAbs(nH-g_hrn_price)>3*pip){g_hrn_price=nH;g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}else {g_hrn_is_sup=(Close[0]>g_hrn_price);g_hrn_brk_bars=0;g_hrn_confirmed_break=false;}}
  2347. g_hrn_str=DoubleToString(NormalizeDouble(g_hrn_price,dg),dg);
  2348. color hrnColor=g_hrn_is_sup?NEON_GREEN:NEON_RED;if(g_hrn_brk_bars==1)hrnColor=NEON_YELLOW;
  2349. DrawHLine(PFX+"HRN_LINE",g_hrn_price,hrnColor,3,STYLE_SOLID);
  2350. string ln=PFX+"HRN_LBL";SafeDel(ln);string typeStr=g_hrn_is_sup?"SUP":"RES";string confStr=(g_hrn_brk_bars==1)?" [1/2]":(g_hrn_confirmed_break?" [SHIFT]":"");
  2351. SafeDel(PFX+"HRN_LBL");
  2352. ObjectCreate(0,ln,OBJ_TEXT,0,Time[0]+Period()*60*3,g_hrn_price);ObjectSetText(ln,"HRN "+ShortPrice(g_hrn_price)+" "+typeStr+confStr,9,"Arial Bold",hrnColor);ObjectSetInteger(0,ln,OBJPROP_BACK,false);
  2353. }
  2354.  
  2355. // ============================================================
  2356. // CANDLE PATTERN RECOGNITION (FIXED BUG)
  2357. // ============================================================
  2358. NCPPatternResult NCPCheckSinglePattern(int shift){
  2359. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="SINGLE";
  2360. if(shift+1>=Bars || shift < 0) return r;
  2361. double o=Open[shift],c=Close[shift],h=High[shift],l=Low[shift];
  2362. double body=MathAbs(c-o); double range=h-l;if(range<=0 || o==0 || c==0) return r;
  2363. double upperWick=h-MathMax(o,c); double lowerWick=MathMin(o,c)-l;
  2364. double bodyRatio=body/range; double uwRatio=upperWick/range; double lwRatio=lowerWick/range;
  2365. bool isBull=(c>o); bool isBear=(c<o);
  2366. if(bodyRatio<0.10){
  2367. if(uwRatio>0.35&&lwRatio>0.35){r.name="DOJI"; r.type=0; r.strength=2;if(uwRatio>0.60&&lwRatio<0.15){r.name="GRAVESTONE DOJI";r.type=-1;r.strength=4;}else if(lwRatio>0.60&&uwRatio<0.15){r.name="DRAGONFLY DOJI";r.type=1;r.strength=4;}else if(uwRatio>0.40&&lwRatio>0.40){r.name="LONG-LEG DOJI";r.type=0;r.strength=3;}return r;}
  2368. 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;}}
  2369. 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;}
  2370. 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;}
  2371. 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;}
  2372. 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;}
  2373. 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;}
  2374. 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;}
  2375. if(bodyRatio<0.20&&uwRatio>0.30&&lwRatio>0.30){r.name="HIGH WAVE";r.type=0;r.strength=2;return r;}
  2376. return r;
  2377. }
  2378.  
  2379. NCPPatternResult NCPCheckDualPattern(int shift){
  2380. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="DUAL";
  2381. if(shift+2>=Bars || shift < 0) return r;
  2382. if(Open[shift]==0||Close[shift]==0||Open[shift+1]==0||Close[shift+1]==0) return r;
  2383. double o1=Open[shift],c1=Close[shift],h1=High[shift],l1=Low[shift];
  2384. double o2=Open[shift+1],c2=Close[shift+1],h2=High[shift+1],l2=Low[shift+1];
  2385. double body1=MathAbs(c1-o1); double body2=MathAbs(c2-o2); if(body1<=0||body2<=0) return r;
  2386. bool bull1=(c1>o1), bear1=(c1<o1); bool bull2=(c2>o2), bear2=(c2<o2);
  2387. 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;}
  2388. 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;}
  2389. double tol=(h1+l1)*0.001;
  2390. if(bull1&&bear2&&MathAbs(h1-h2)<tol&&h1>c1&&h2>c2){r.name="TWEEZER TOP";r.type=-1;r.strength=4;return r;}
  2391. if(bear1&&bull2&&MathAbs(l1-l2)<tol&&l1<c1&&l2<c2){r.name="TWEEZER BTM";r.type=1;r.strength=4;return r;}
  2392. if(bull1&&bear2&&o1<l2&&c1>(o2+c2)/2.0&&c1<o2){r.name="PIERCING";r.type=1;r.strength=3;return r;}
  2393. if(bear1&&bull2&&o1>h2&&c1<(o2+c2)/2.0&&c1>o2){r.name="DARK CLOUD";r.type=-1;r.strength=3;return r;}
  2394. 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;}
  2395. return r;
  2396. }
  2397.  
  2398. NCPPatternResult NCPCheckTriplePattern(int shift){
  2399. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="TRIPLE";
  2400. if(shift+3>=Bars || shift < 0) return r;
  2401. double o1=Open[shift],c1=Close[shift],h1=High[shift],l1=Low[shift];
  2402. double o2=Open[shift+1],c2=Close[shift+1],h2=High[shift+1],l2=Low[shift+1];
  2403. double o3=Open[shift+2],c3=Close[shift+2],h3=High[shift+2],l3=Low[shift+2];
  2404. double body1=MathAbs(c1-o1),body2=MathAbs(c2-o2),body3=MathAbs(c3-o3);double rng2=h2-l2;
  2405. bool bull1=(c1>o1),bear1=(c1<o1),bull3=(c3>o3),bear3=(c3<o3);
  2406. 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;}
  2407. 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;}
  2408. 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;}
  2409. 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;}
  2410. if(bull1&&bear3&&h1<h2&&l1>l2&&c1>c2&&c2>c3){r.name="3 IN UP";r.type=1;r.strength=3;return r;}
  2411. if(bear1&&bull3&&h1<h2&&l1<l2&&c1<c2&&c2<c3){r.name="3 IN DN";r.type=-1;r.strength=3;return r;}
  2412. if(bull1&&bear3&&h1>h2&&l1<l2&&c1>o2){r.name="3 OUT UP";r.type=1;r.strength=4;return r;}
  2413. if(bear1&&bull3&&h1>h2&&l1<l2&&c1<o2){r.name="3 OUT DN";r.type=-1;r.strength=4;return r;}
  2414. return r;
  2415. }
  2416.  
  2417. NCPPatternResult NCPCheckColorPattern(){
  2418. NCPPatternResult r; r.name=""; r.type=0; r.strength=0; r.category="MULTI";if(Bars<8)return r;
  2419. int bullRun=0,bearRun=0;
  2420. 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;}
  2421. 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";}}
  2422. 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";}}
  2423. 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;}
  2424. 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";}}
  2425. 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";}}
  2426. return r;
  2427. }
  2428.  
  2429. void NCPScanAllPatterns(){g_ncpPatternBullScore=0;g_ncpPatternBearScore=0;g_ncpMainPattern="";int bestStrength=0;
  2430. 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;}}}
  2431. 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;}}}
  2432. 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;}}
  2433. 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;}}}
  2434. g_ncpPatternBullScore=MathMin(100,g_ncpPatternBullScore);g_ncpPatternBearScore=MathMin(100,g_ncpPatternBearScore);
  2435. }
  2436.  
  2437. 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;}
  2438. 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;}
  2439.  
  2440. // ============================================================
  2441. // PSYCHE BREAKER v4.3 - FINAL POLISH EDITION
  2442. // ============================================================
  2443. void CalcOTCNextCandlePredictor(){
  2444. g_otpSignal = "WAIT"; g_otpConf = 50.0; g_otpColor = NEON_YELLOW;
  2445. g_otpRsi = "--"; g_otpWick = "--"; g_otpReason = "";
  2446. if(Bars < 15) return;
  2447.  
  2448. // 1. RSI CHECK
  2449. double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  2450. g_otpRsi = DoubleToString(rsi, 1);
  2451. int score = 0;
  2452. string reasons = "";
  2453.  
  2454. // 2. WICK REJECTION
  2455. double rng = High[1] - Low[1];
  2456. if(rng > 0){
  2457. double uw = (High[1] - MathMax(Open[1], Close[1])) / rng;
  2458. double lw = (MathMin(Open[1], Close[1]) - Low[1]) / rng;
  2459. if(uw > 0.65) { score -= 15; g_otpWick = "UP TRAP"; reasons += "WickUp "; }
  2460. if(lw > 0.65) { score += 15; g_otpWick = "DN TRAP"; reasons += "WickDn "; }
  2461. }
  2462.  
  2463. // 3. CANDLE PATTERNS
  2464. double body = MathAbs(Close[1] - Open[1]);
  2465. double pBody = MathAbs(Close[2] - Open[2]);
  2466. bool bull = (Close[1] > Open[1]), bear = (Close[1] < Open[1]);
  2467.  
  2468. if(bull && pBody < body && Close[1] >= Open[2] && Open[1] <= Close[2]) { score += 25; reasons += "BullEngulf "; }
  2469. if(bear && pBody < body && Close[1] <= Open[2] && Open[1] >= Close[2]) { score -= 25; reasons += "BearEngulf "; }
  2470. if(rng > 0 && (MathMin(Open[1],Close[1])-Low[1])/rng > 0.60 && body < rng*0.30 && bear) { score += 20; reasons += "Hammer "; }
  2471. if(rng > 0 && (High[1]-MathMax(Open[1],Close[1]))/rng > 0.60 && body < rng*0.30 && bull) { score -= 20; reasons += "ShootingSt "; }
  2472.  
  2473. // 4. RSI CONFIRM
  2474. if(rsi < 30) { score += 20; reasons += "RSI_OS "; }
  2475. else if(rsi < 40) { score += 10; reasons += "RSI_Low "; }
  2476. else if(rsi > 70) { score -= 20; reasons += "RSI_OB "; }
  2477. else if(rsi > 60) { score -= 10; reasons += "RSI_High "; }
  2478.  
  2479. // 5. MOMENTUM TRAP
  2480. if(Close[1]>Open[1] && Close[2]>Open[2] && Close[3]>Open[3]) { score -= 10; reasons += "3GreenTrap "; }
  2481. if(Close[1]<Open[1] && Close[2]<Open[2] && Close[3]<Open[3]) { score += 10; reasons += "3RedTrap "; }
  2482.  
  2483. // ✅ FIXED LOGIC (MathAbs use kiya)
  2484. double absScore = MathAbs(score);
  2485. g_otpConf = MathMax(5.0, MathMin(95.0, 50.0 + absScore));
  2486. g_otpReason = (reasons == "") ? "NO CONFIRMATION" : reasons;
  2487.  
  2488. if(g_otpConf >= 72){
  2489. g_otpSignal = (score > 0) ? "CALL" : "PUT";
  2490. g_otpColor = (score > 0) ? NEON_GREEN : NEON_RED;
  2491. } else if(g_otpConf >= 60){
  2492. g_otpSignal = (score > 0) ? "WEAK CALL" : "WEAK PUT";
  2493. g_otpColor = (score > 0) ? NEON_CYAN : NEON_ORANGE;
  2494. } else {
  2495. g_otpSignal = "WAIT";
  2496. g_otpColor = NEON_YELLOW;
  2497. }
  2498. }
  2499.  
  2500. // ============================================================
  2501. // NCP PRO v8.0 CORE ENGINE
  2502. // ============================================================
  2503. 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;}
  2504.  
  2505. 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();}
  2506.  
  2507. 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++;}}
  2508.  
  2509. // FIX: Removed Array Access Risk
  2510. void NCPDetectOrderBlocks(){
  2511. if(Bars<30)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
  2512. for(int i=2;i<=20&&i<Bars&&g_ncpSRCount<18;i++){
  2513. int startJ = MathMax(1, i-3); // FIX: Ensure startJ doesn't go below 1
  2514. if(Close[i]<Open[i]){
  2515. double move=0;for(int j=i-1;j>=startJ;j--){if(Close[j]>Open[j])move+=Close[j]-Open[j];else break;}
  2516. 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));}
  2517. }
  2518. if(Close[i]>Open[i]){
  2519. double move=0;for(int j=i-1;j>=startJ;j--){if(Close[j]<Open[j])move+=Open[j]-Close[j];else break;}
  2520. 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));}
  2521. }
  2522. }
  2523. }
  2524.  
  2525. 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));}
  2526.  
  2527. 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;}
  2528.  
  2529. // ============================================================
  2530. // LEARNING ENGINE v8.0
  2531. // ============================================================
  2532. 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, " ", "");int p1 = StringFind(line, ","), p2 = StringFind(line, ",", p1+1);int p3 = StringFind(line, ",", p2+1), p4 = StringFind(line, ",", p3+1);int p5 = StringFind(line, ",", p4+1), p6 = StringFind(line, ",", p5+1);if(p6 > 0){g_totalTrades = (int)StringToInteger(StringSubstr(line, 0, p1));g_callTrades = (int)StringToInteger(StringSubstr(line, p1+1, p2-p1-1));g_putTrades = (int)StringToInteger(StringSubstr(line, p2+1, p3-p2-1));g_callWins = (int)StringToInteger(StringSubstr(line, p3+1, p4-p3-1));g_putWins = (int)StringToInteger(StringSubstr(line, p4+1, p5-p4-1));g_callWeight = StringToDouble(StringSubstr(line, p5+1, p6-p5-1));g_putWeight = StringToDouble(StringSubstr(line, p6+1));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);} else g_brokerBias = 0.0;}
  2533. 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);}}
  2534. 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();}
  2535. 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);}
  2536.  
  2537. // ============================================================
  2538. // NCP PRO v8.0 MTG ENGINE
  2539. // ============================================================
  2540. void CalculateMTG(){
  2541. if(!ENABLE_MTG || Bars < 50){g_mtgState="OFF"; g_mtgReason=""; g_mtgClr=CGR; return;}
  2542. double pip=GetUniversalPip();
  2543. CheckPreviousResult();
  2544. int sec = (int)(TimeCurrent() - Time[0]);
  2545. if(sec < NCP_OpenNoiseSeconds){g_mtgState="..."; g_mtgReason="Bar open"; g_mtgClr=CGR; g_mtgHype=50; g_mtgBetrayal=50; return;}
  2546. if(sec >= NCP_KillZoneSeconds){g_mtgState="END"; g_mtgReason="Late"; g_mtgClr=NEON_ORANGE; g_mtgHype=50; g_mtgBetrayal=50; return;}
  2547. double spPips = MarketInfo(Symbol(), MODE_SPREAD) * Point / pip;
  2548. if(spPips > NCP_MaxSpreadPips){g_mtgState="SPREAD"; g_mtgReason=DoubleToString(spPips,1)+"p"; g_mtgClr=NEON_ORANGE; g_mtgHype=50; g_mtgBetrayal=50; return;}
  2549. double vol1 = (double)iVolume(NULL, PERIOD_M1, 1); double volAvg = 0;
  2550. for(int v = 2; v <= 21; v++) volAvg += (double)iVolume(NULL, PERIOD_M1, v); volAvg /= 20.0;
  2551. 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;}
  2552. double atr = iATR(Symbol(), PERIOD_M1, NCP_ATRPeriod, 1); double atrPips = atr / pip;
  2553. if(atrPips < NCP_MinATRPips){g_mtgState="FLAT"; g_mtgReason="Low ATR"; g_mtgClr=CGR; g_mtgHype=50; g_mtgBetrayal=50; return;}
  2554. g_ncpADX = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  2555. double plusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
  2556. double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
  2557. g_ncpPlusDI = plusDI; g_ncpMinusDI = minusDI;
  2558. if(g_ncpADX < 22){g_mtgState="WAIT"; g_mtgReason="ADX LOW"; g_mtgClr=NEON_ORANGE; g_mtgHype=50; g_mtgBetrayal=50; return;}
  2559. if(NCP8_UseM15Trend) g_ncpTrend = NCPDetectTrend();
  2560. if(NCP8_UseDynamicSR) NCPDetectDynamicSR();
  2561. if(NCP8_UsePatterns) NCPScanAllPatterns();
  2562. double macd_main = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, 1);
  2563. double macd_sig = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, 1);
  2564. bool closedBull = (Close[1] > Open[1]); bool closedBear = (Close[1] < Open[1]);
  2565. double body1 = MathAbs(Close[1] - Open[1]); double rng1 = High[1] - Low[1];
  2566. double dynamicBodyThresh = atr * (0.35 + (g_ncpADX - 20) / 100.0);
  2567. int callConfluence = 0, putConfluence = 0;
  2568. double weightMultiplier = 1.0 + (g_ncpADX - 20) / 50.0;
  2569. if(NCP8_UseM15Trend){if(g_ncpTrend.m15Direction == "UP") callConfluence += (int)(3 * weightMultiplier); else if(g_ncpTrend.m15Direction == "DOWN") putConfluence += (int)(3 * weightMultiplier);}
  2570. 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);
  2571. 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);
  2572. if(g_haM1 == "HA BULLISH 1") callConfluence += 1; else if(g_haM1 == "HA BEARISH 1") putConfluence += 1;
  2573. if(g_haM5 == "HA BULLISH 5") callConfluence += 1; else if(g_haM5 == "HA BEARISH 5") putConfluence += 1;
  2574. if(plusDI > minusDI + 5) callConfluence += 2; else if(minusDI > plusDI + 5) putConfluence += 2;
  2575. double rsi1 = iRSI(NULL, 0, NCP_RSIPeriod, PRICE_CLOSE, 1), rsi2 = iRSI(NULL, 0, NCP_RSIPeriod, PRICE_CLOSE, 2);
  2576. if(rsi1 > 55 && rsi1 > rsi2) callConfluence++; else if(rsi1 < 45 && rsi1 < rsi2) putConfluence++;
  2577. double bodyPct = (rng1 > 0) ? (body1 / rng1) * 100.0 : 0;
  2578. if(closedBull && body1 > dynamicBodyThresh && bodyPct > 60) callConfluence += 3; else if(closedBear && body1 > dynamicBodyThresh && bodyPct > 60) putConfluence += 3;
  2579. bool nearSup = (g_nearest_sup > 0 && MathAbs(Close[1] - g_nearest_sup) < atrPips * 1.2);
  2580. bool nearRes = (g_nearest_res > 0 && MathAbs(Close[1] - g_nearest_res) < atrPips * 1.2);
  2581. if(nearSup) callConfluence += 2; if(nearRes) putConfluence += 2;
  2582. 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;
  2583. if(macd_main > macd_sig && macd_main > 0) callConfluence += 1; if(macd_main < macd_sig && macd_main < 0) putConfluence += 1;
  2584. double totalPossible = callConfluence + putConfluence;
  2585. double callStrength = totalPossible > 0 ? (double)callConfluence / totalPossible * 100 : 50;
  2586. double smoothFactor = MathMin(0.65, 0.45 + (atrPips / 20.0) * 0.1);
  2587. g_smoothCallScore = g_smoothCallScore * (1.0 - smoothFactor) + callStrength * smoothFactor;
  2588. g_smoothPutScore = 100.0 - g_smoothCallScore;
  2589. g_mtgHype = NormalizeDouble(g_smoothCallScore, 1); g_mtgBetrayal = NormalizeDouble(g_smoothPutScore, 1);
  2590. string lockReason = ""; int minConfluence = 8;
  2591. if(callConfluence < minConfluence && putConfluence < minConfluence) lockReason = "LOW CONF";
  2592. 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;}
  2593. int minP = 62; double edge = MathAbs(g_smoothCallScore - 50);
  2594. string str = "WEAK"; if(edge >= 28) str = "EXTREME"; else if(edge >= 22) str = "STRONG"; else if(edge >= 15) str = "MEDIUM";
  2595. if(Time[0] != g_ncpLastSignalTime){g_ncpLastSignalTime = Time[0]; g_ncpSignalProcessed = false;}
  2596. if(g_smoothCallScore >= minP && g_smoothCallScore > g_smoothPutScore){g_mtgState = "CALL"; g_mtgReason = g_ncpDetailLine1; g_mtgAction = "CALL " + DoubleToString(g_smoothCallScore, 1) + "% [" + str + "]"; g_mtgClr = (str == "EXTREME") ? NEON_GREEN : NEON_LIME; if(!g_ncpSignalProcessed){ g_ncpLastSignalType = "CALL"; g_ncpLastSignalTime = Time[0]; }}
  2597. else if(g_smoothPutScore >= minP && g_smoothPutScore > g_smoothCallScore){g_mtgState = "PUT"; g_mtgReason = g_ncpDetailLine1; g_mtgAction = "PUT " + DoubleToString(g_smoothPutScore, 1) + "% [" + str + "]"; g_mtgClr = (str == "EXTREME") ? NEON_RED : C'255,60,60'; if(!g_ncpSignalProcessed){ g_ncpLastSignalType = "PUT"; g_ncpLastSignalTime = Time[0]; }}
  2598. 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;}
  2599. g_mtgBullCount = callConfluence; g_mtgBearCount = putConfluence; g_mtgRecovery = NormalizeDouble(atrPips, 1); g_mtgPattern = str; g_trapScore = 0;
  2600. }
  2601.  
  2602. // ============================================================
  2603. // DASHBOARD DRAWING HELPERS
  2604. // ============================================================
  2605. void DrawOtherPairsCube(int x,int y,int w,int h){
  2606. Bx("c20",x,y,w,h,BG_DARK2,NEON_GOLD);Tx("c20_l",x+8,y+4,"OTHER PAIRS",NEON_CYAN,10,true);
  2607.  
  2608. int lY=24;
  2609.  
  2610. // --- 1. CURRENT PAIR SIGNAL (WHITE) ---
  2611. if(g_otpSignal != "WAIT" && g_otpSignal != "") {
  2612. string curPairName = Symbol();
  2613. if(StringLen(curPairName) > 9) curPairName = StringSubstr(curPairName, 0, 9);
  2614. string mySigText = "* " + curPairName + " " + g_otpSignal + " " + DoubleToString(g_otpConf, 0) + "%";
  2615. Tx("c20_my_sig", x+8, y+lY, mySigText, NEON_WHITE, 10, true);
  2616. lY += 20;
  2617. }
  2618.  
  2619. // --- 2. MHI BACKGROUND PAIRS (WHITE COLOR) ---
  2620. for(int i=0; i<g_bgMHI_Count; i++){
  2621. if(lY+16>h-4) break;
  2622. string sp = g_bgMHI_Pair[i];
  2623. if(StringLen(sp) > 9) sp = StringSubstr(sp, 0, 9);
  2624. string mhiText = sp + " " + g_bgMHI_Signal[i] + " " + DoubleToString(g_bgMHI_Conf[i], 0) + "%";
  2625. Tx("c20_mhi_bg"+IntegerToString(i), x+8, y+lY, mhiText, NEON_WHITE, 10, true);
  2626. lY += 20;
  2627. }
  2628.  
  2629. // --- 3. NORMAL NCP PAIRS (GREEN/RED/PURPLE) ---
  2630. if(g_pairCount==0){
  2631. if(lY+16>h-4) return;
  2632. if(StringFind(g_visualTrapPro.boxStatus, "[") >= 0){Tx("c20_v0",x+8,y+lY,g_visualTrapPro.boxStatus,NEON_WHITE,11,true);return;}
  2633. Tx("c20_v0",x+8,y+lY,"No signals yet",CGR,10,false);return;
  2634. }
  2635.  
  2636. for(int i=0;i<g_pairCount&&i<5;i++){
  2637. if(lY+16>h-4)break;
  2638. string sp=g_pairNames[i];if(StringLen(sp)>9)sp=StringSubstr(sp,0,9);
  2639. 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]";
  2640. bool isCallSig=(g_mtgState=="CALL");bool isPutSig=(g_mtgState=="PUT");bool ncpMatch=((isCallSig&&g_pairSigs[i]=="CALL")||(isPutSig&&g_pairSigs[i]=="PUT"));
  2641. color dc;string prefix="";if(ncpMatch){dc=NEON_PURPLE;prefix="* ";}else{dc=(g_pairSigs[i]=="CALL")?NEON_GREEN:NEON_RED;}
  2642. string txt=prefix+sp+" "+g_pairSigs[i]+" "+IntegerToString(qScore)+qLabel;
  2643. Tx("c20_p"+IntegerToString(i),x+8,y+lY,txt,dc,10,true);
  2644. lY+=20;
  2645. }
  2646. }
  2647.  
  2648.  
  2649.  
  2650. 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";}
  2651. 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;return NEON_ORANGE;}
  2652. 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));return true;}
  2653. 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;}
  2654. 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;}
  2655. 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());}
  2656.  
  2657. 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);}
  2658. 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);}
  2659. 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);}
  2660. 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);}
  2661. // ============================================================
  2662. // MAIN PREDICTION ENGINE
  2663. // ============================================================
  2664. void CalcPrediction(double brain,double nb,int cp,double mai,int mts,double rsc,bool bf,double mw){
  2665. string ms=DetectMyStrategy();bool sA=(ms!="WAIT");
  2666. if(sA&&g_strategyType=="TRAP"){
  2667. 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;}
  2668. 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;}
  2669. }
  2670. double tS=UltimateTrapScore();bool bF2=IsBrokerForce();
  2671. 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;}}
  2672. 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;}
  2673. double gS=0,rS=0,ab=MathMax(0.70,MathMin(1.30,g_accuracy/65.0));
  2674. g_isSideways = IsSidewaysMarket();if(g_isSideways){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;}
  2675. 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;}}
  2676. 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;
  2677. if(HA_ALIGN_FILTER&&g_haBoth=="MIXED"){gS*=0.5;rS*=0.5;}
  2678. gS+=(nb-50)/50.0*22*ab;rS-=(nb-50)/50.0*22*ab;
  2679. double bn=MathMax(-1.0,MathMin(1.0,brain/10.0));gS+=bn*15*ab;rS-=bn*15*ab;
  2680. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  2681. 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;
  2682. double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi1>70)rS+=6;if(rsi1<30)gS+=6;
  2683. double sn=MathMax(-1.0,MathMin(1.0,rsc/3.0));gS+=sn*8*ab;rS-=sn*8*ab;
  2684. if(ENABLE_BB_PULLBACK){if(g_bbSignal=="CALL")gS+=18*ab;else if(g_bbSignal=="PUT")rS+=18*ab;}
  2685. int rd=DetectRSIDivergence();if(rd==1)gS+=20;if(rd==-1)rS+=20;
  2686. int sk=StreakReversalSignal();if(sk==1)gS+=18;if(sk==-1)rS+=18;
  2687. 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;}
  2688. int vs=SmartVolumeSignal();if(vs==1)gS+=12;if(vs==-1)rS+=12;
  2689. if(!IsVolatilityGood()){gS*=0.5;rS*=0.5;}
  2690. double diff=MathMax(-100.0,MathMin(100.0,gS-rS));
  2691. g_gProb=MathMax(8.0,MathMin(92.0,50.0+(diff/1.8)));g_rProb=100.0-g_gProb;
  2692. double dom=MathMax(g_gProb,g_rProb);
  2693. 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;}}}
  2694. 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;}}}
  2695. else{if(!sA){g_pAction="WAIT";g_pColor=NEON_YELLOW;}}
  2696. g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;
  2697. }
  2698.  
  2699. // --- Safe Division Helper ---
  2700. double Div(double a, double b) {
  2701. if(b == 0) return 0;
  2702. return a / b;
  2703. }
  2704.  
  2705. // --- MAIN FORMULA: Buy aur Sell Count (ULTIMATE STABLE VERSION) ---
  2706. void GetConfluenceScores(int &buyCount, int &sellCount) {
  2707.  
  2708. // Caching
  2709. if(Time[0] == g_cacheConfluenceTime) {
  2710. buyCount = g_buyCountCache;
  2711. sellCount = g_sellCountCache;
  2712. return;
  2713. }
  2714.  
  2715. g_cacheConfluenceTime = Time[0];
  2716. buyCount = 0;
  2717. sellCount = 0;
  2718.  
  2719. int i = 1;
  2720. if(i >= Bars) return;
  2721.  
  2722. double atr = iATR(NULL, 0, 14, i);
  2723. if(atr <= 0) atr = Point * 10;
  2724.  
  2725. // ========== 22 INDICATORS (STRICT +1 LOGIC) ==========
  2726.  
  2727. // 1. RSI
  2728. double rsi = iRSI(NULL, 0, 14, PRICE_CLOSE, i);
  2729. if(rsi < 30) buyCount++;
  2730. else if(rsi > 70) sellCount++;
  2731. else if(rsi < 50 && rsi > iRSI(NULL, 0, 14, PRICE_CLOSE, i+1)) buyCount++;
  2732. else if(rsi > 50 && rsi < iRSI(NULL, 0, 14, PRICE_CLOSE, i+1)) sellCount++;
  2733.  
  2734. // 2. Stochastic
  2735. double stoch = iStochastic(NULL, 0, 5, 3, 3, MODE_SMA, 0, MODE_MAIN, i);
  2736. double stochSig = iStochastic(NULL, 0, 5, 3, 3, MODE_SMA, 0, MODE_SIGNAL, i);
  2737. if(stoch < 20 && stoch > stochSig) buyCount++;
  2738. else if(stoch > 80 && stoch < stochSig) sellCount++;
  2739.  
  2740. // 3. MACD
  2741. double macd = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, i);
  2742. double macdSig = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, i);
  2743. if(macd > macdSig && macd < 0) buyCount++;
  2744. else if(macd < macdSig && macd > 0) sellCount++;
  2745.  
  2746. // 4. MA Crossover (5 EMA vs 10 EMA)
  2747. double ma5 = iMA(NULL, 0, 5, 0, MODE_EMA, PRICE_CLOSE, i);
  2748. double ma10 = iMA(NULL, 0, 10, 0, MODE_EMA, PRICE_CLOSE, i);
  2749. if(ma5 > ma10) buyCount++;
  2750. else if(ma5 < ma10) sellCount++;
  2751.  
  2752. // 5. Triple MA (5 > 10 > 20)
  2753. double ma20 = iMA(NULL, 0, 20, 0, MODE_EMA, PRICE_CLOSE, i);
  2754. if(ma5 > ma10 && ma10 > ma20) buyCount++;
  2755. else if(ma5 < ma10 && ma10 < ma20) sellCount++;
  2756.  
  2757. // 6. Bollinger Bands
  2758. double bbLow = iBands(NULL, 0, 20, 2.0, 0, PRICE_CLOSE, MODE_LOWER, i);
  2759. double bbUpp = iBands(NULL, 0, 20, 2.0, 0, PRICE_CLOSE, MODE_UPPER, i);
  2760. if(Close[i] <= bbLow) buyCount++;
  2761. else if(Close[i] >= bbUpp) sellCount++;
  2762.  
  2763. // 7. ADX
  2764. double adx = iADX(NULL, 0, 14, PRICE_CLOSE, MODE_MAIN, i);
  2765. double pdi = iADX(NULL, 0, 14, PRICE_CLOSE, MODE_PLUSDI, i);
  2766. double mdi = iADX(NULL, 0, 14, PRICE_CLOSE, MODE_MINUSDI, i);
  2767. if(adx > 20) {
  2768. if(pdi > mdi) buyCount++;
  2769. else if(mdi > pdi) sellCount++;
  2770. }
  2771.  
  2772. // 8. CCI
  2773. double cci = iCCI(NULL, 0, 14, PRICE_TYPICAL, i);
  2774. if(cci < -100) buyCount++;
  2775. else if(cci > 100) sellCount++;
  2776.  
  2777. // 9. Parabolic SAR
  2778. double sar = iSAR(NULL, 0, 0.02, 0.2, i);
  2779. if(sar < Low[i]) buyCount++;
  2780. else if(sar > High[i]) sellCount++;
  2781.  
  2782. // 10. MFI
  2783. double mfi = iMFI(NULL, 0, 14, i);
  2784. if(mfi < 20) buyCount++;
  2785. else if(mfi > 80) sellCount++;
  2786.  
  2787. // 11. Williams %R
  2788. double wpr = iWPR(NULL, 0, 14, i);
  2789. if(wpr < -80) buyCount++;
  2790. else if(wpr > -20) sellCount++;
  2791.  
  2792. // 12. Momentum
  2793. double mom = iMomentum(NULL, 0, 10, PRICE_CLOSE, i);
  2794. if(mom > 100) buyCount++;
  2795. else if(mom < 100) sellCount++;
  2796.  
  2797. // 13. ATR Breakout
  2798. if(Close[i] > Open[i] + atr * 0.5) buyCount++;
  2799. else if(Close[i] < Open[i] - atr * 0.5) sellCount++;
  2800.  
  2801. // 14. Envelopes
  2802. double envLow = iEnvelopes(NULL, 0, 10, MODE_EMA, 0, PRICE_CLOSE, 0.002, MODE_LOWER, i);
  2803. double envUpp = iEnvelopes(NULL, 0, 10, MODE_EMA, 0, PRICE_CLOSE, 0.002, MODE_UPPER, i);
  2804. if(Close[i] <= envLow) buyCount++;
  2805. else if(Close[i] >= envUpp) sellCount++;
  2806.  
  2807. // 15. OsMA
  2808. double osma = iOsMA(NULL, 0, 12, 26, 9, PRICE_CLOSE, i);
  2809. if(osma > 0) buyCount++;
  2810. else if(osma < 0) sellCount++;
  2811.  
  2812. // 16. Force Index
  2813. double force = iForce(NULL, 0, 13, MODE_SMA, PRICE_CLOSE, i);
  2814. if(force > 0) buyCount++;
  2815. else if(force < 0) sellCount++;
  2816.  
  2817. // 17. Volume (FIXED AVERAGE LOGIC - NO HARD CODE)
  2818. double vol = (double)Volume[i];
  2819. double volMA = 0; int volCnt = 0;
  2820. for(int v = i; v < i+20 && v < Bars; v++) { volMA += (double)Volume[v]; volCnt++; }
  2821. if(volCnt > 0) volMA /= volCnt;
  2822. if(vol > volMA && Close[i] > Open[i]) buyCount++;
  2823. else if(vol > volMA && Close[i] < Open[i]) sellCount++;
  2824.  
  2825. // 18. Price Action (Candle Pattern)
  2826. double range = High[i] - Low[i];
  2827. double body = MathAbs(Close[i] - Open[i]);
  2828. double lowWick = MathMin(Close[i], Open[i]) - Low[i];
  2829. double upWick = High[i] - MathMax(Close[i], Open[i]);
  2830. if(body > range * 0.6 && Close[i] > Open[i]) buyCount++;
  2831. else if(body > range * 0.6 && Close[i] < Open[i]) sellCount++;
  2832. else if(lowWick > body * 2 && upWick < body) buyCount++;
  2833. else if(upWick > body * 2 && lowWick < body) sellCount++;
  2834.  
  2835. // 19. Price vs MA20
  2836. if(Close[i] > ma20) buyCount++;
  2837. else if(Close[i] < ma20) sellCount++;
  2838.  
  2839. // 20. Candle Streak (Exhaustion)
  2840. int green = 0, red = 0;
  2841. for(int j = i; j < i+3 && j < Bars; j++) {
  2842. if(Close[j] > Open[j]) green++;
  2843. else if(Close[j] < Open[j]) red++;
  2844. }
  2845. if(green >= 3) sellCount++;
  2846. if(red >= 3) buyCount++;
  2847.  
  2848. // 21. Dynamic S/R Position (STABLE 25%/75% ZONES)
  2849. int highIdx = iHighest(NULL, 0, MODE_HIGH, 20, i);
  2850. int lowIdx = iLowest(NULL, 0, MODE_LOW, 20, i);
  2851. if(highIdx >= 0 && lowIdx >= 0) {
  2852. double high20 = High[highIdx];
  2853. double low20 = Low[lowIdx];
  2854. double pos = Div(Close[i] - low20, high20 - low20);
  2855. if(pos < 0.25) buyCount++;
  2856. else if(pos > 0.75) sellCount++;
  2857. }
  2858.  
  2859. // 22. Current Candle Body vs Previous
  2860. double prevBody = MathAbs(Close[i+1] - Open[i+1]);
  2861. if(body > prevBody * 1.5 && Close[i] > Open[i]) buyCount++;
  2862. else if(body > prevBody * 1.5 && Close[i] < Open[i]) sellCount++;
  2863.  
  2864. // Cache store
  2865. g_buyCountCache = buyCount;
  2866. g_sellCountCache = sellCount;
  2867. }
  2868.  
  2869. //+------------------------------------------------------------------+
  2870. //| CONFLUENCE SCORE CUBE (FIXED OVERLAP - CLEAN LAYOUT) |
  2871. //+------------------------------------------------------------------+
  2872. void DrawConfluenceCube(int x, int y, int w, int h) {
  2873. int buyCount, sellCount;
  2874. GetConfluenceScores(buyCount, sellCount);
  2875.  
  2876. int total = buyCount + sellCount;
  2877. if(total == 0) total = 1;
  2878.  
  2879. double buyPct = (double)buyCount / total * 100.0;
  2880. double sellPct = (double)sellCount / total * 100.0;
  2881.  
  2882. // Background
  2883. Bx("conf_bg", x, y, w, h, BG_DARK2, NEON_PURPLE);
  2884. Tx("conf_title", x+10, y+4, "CONFLUENCE SCORE", NEON_CYAN, 10, true);
  2885.  
  2886. // --- BUY SECTION ---
  2887. Tx("conf_buy_t", x+10, y+24, "BUY", NEON_GREEN, 11, true);
  2888. Tx("conf_buy_v", x+w-70, y+22, DoubleToString(buyPct,0)+"%",
  2889. (buyPct>=60)?NEON_GREEN:(buyPct>=40)?NEON_YELLOW:NEON_RED, 14, true); // Right side pe %
  2890.  
  2891. int barW = w - 24;
  2892. int buyFill = (int)(buyPct/100.0 * barW);
  2893. if(buyFill < 2) buyFill = 2;
  2894. Bx("conf_buy_bg", x+10, y+42, barW, 8, BG_DARK4, BG_DARK4); // 6 se 8 moti kiya
  2895. Bx("conf_buy_fill", x+10, y+42, buyFill, 8, NEON_GREEN, NEON_GREEN);
  2896.  
  2897. // --- SELL SECTION ---
  2898. Tx("conf_sell_t", x+10, y+60, "SELL", NEON_RED, 11, true);
  2899. Tx("conf_sell_v", x+w-70, y+58, DoubleToString(sellPct,0)+"%",
  2900. (sellPct>=60)?NEON_RED:(sellPct>=40)?NEON_YELLOW:NEON_GREEN, 14, true); // Right side pe %
  2901.  
  2902. int sellFill = (int)(sellPct/100.0 * barW);
  2903. if(sellFill < 2) sellFill = 2;
  2904. Bx("conf_sell_bg", x+10, y+78, barW, 8, BG_DARK4, BG_DARK4); // 6 se 8 moti kiya
  2905. Bx("conf_sell_fill", x+10, y+78, sellFill, 8, NEON_RED, NEON_RED);
  2906.  
  2907. // --- TOTAL INDICATORS (Bada aur Saaf Dikhega) ---
  2908. Tx("conf_total", x+10, y+96, IntegerToString(total)+"/22 Indicators", NEON_PURPLE, 12, true); // Size 9 se 12 badha diya
  2909.  
  2910. // --- SIGNAL TEXT ---
  2911. string signal = "";
  2912. color sigColor = NEON_YELLOW;
  2913. if(buyCount >= 14 && buyCount > sellCount) { signal = "STRONG BUY SIGNAL"; sigColor = NEON_GREEN; }
  2914. else if(sellCount >= 14 && buyCount > sellCount) { signal = "STRONG SELL SIGNAL"; sigColor = NEON_RED; }
  2915. else if(buyCount >= 10 && buyCount > sellCount) { signal = "BUY SIGNAL"; sigColor = NEON_CYAN; }
  2916. else if(sellCount >= 10 && sellCount > buyCount) { signal = "SELL SIGNAL"; sigColor = NEON_ORANGE; }
  2917. else if(buyCount > sellCount) { signal = "WEAK BUY BIAS"; sigColor = NEON_YELLOW; }
  2918. else if(sellCount > buyCount) { signal = "WEAK SELL BIAS"; sigColor = NEON_YELLOW; }
  2919. else { signal = "NO CLEAR SIGNAL"; sigColor = NEON_RED; }
  2920.  
  2921. Tx("conf_sig", x+10, y+118, signal, sigColor, 10, true);
  2922. }
  2923.  
  2924. // ============================================================
  2925. // AUTO-LEARNING: Load/Save/Update
  2926. // ============================================================
  2927. void QuantumLoadLearning()
  2928. {
  2929. int h = FileOpen(g_qLearnFile, FILE_READ|FILE_TXT|FILE_COMMON);
  2930. if(h != INVALID_HANDLE)
  2931. {
  2932. string line = FileReadString(h);
  2933. FileClose(h);
  2934.  
  2935. int p1 = StringFind(line, ",");
  2936. int p2 = StringFind(line, ",", p1+1);
  2937. int p3 = StringFind(line, ",", p2+1);
  2938. int p4 = StringFind(line, ",", p3+1);
  2939. int p5 = StringFind(line, ",", p4+1);
  2940. int p6 = StringFind(line, ",", p5+1);
  2941. int p7 = StringFind(line, ",", p6+1);
  2942. int p8 = StringFind(line, ",", p7+1);
  2943.  
  2944. if(p8 > 0)
  2945. {
  2946. g_qWeightMHI = StringToDouble(StringSubstr(line, 0, p1));
  2947. g_qWeightNCP = StringToDouble(StringSubstr(line, p1+1, p2-p1-1));
  2948. g_qWeightTrap = StringToDouble(StringSubstr(line, p2+1, p3-p2-1));
  2949. g_qWeightFib = StringToDouble(StringSubstr(line, p3+1, p4-p3-1));
  2950. g_qWeightBB = StringToDouble(StringSubstr(line, p4+1, p5-p4-1));
  2951. g_qWeightNeural = StringToDouble(StringSubstr(line, p5+1, p6-p5-1));
  2952. g_qWeightHA = StringToDouble(StringSubstr(line, p6+1, p7-p6-1));
  2953. g_qTotalTrades = (int)StringToInteger(StringSubstr(line, p7+1, p8-p7-1));
  2954. g_qWinTrades = (int)StringToInteger(StringSubstr(line, p8+1));
  2955. }
  2956. }
  2957. }
  2958.  
  2959. void QuantumSaveLearning()
  2960. {
  2961. int h = FileOpen(g_qLearnFile, FILE_WRITE|FILE_TXT|FILE_COMMON);
  2962. if(h != INVALID_HANDLE)
  2963. {
  2964. string line = DoubleToString(g_qWeightMHI,4) + "," +
  2965. DoubleToString(g_qWeightNCP,4) + "," +
  2966. DoubleToString(g_qWeightTrap,4) + "," +
  2967. DoubleToString(g_qWeightFib,4) + "," +
  2968. DoubleToString(g_qWeightBB,4) + "," +
  2969. DoubleToString(g_qWeightNeural,4) + "," +
  2970. DoubleToString(g_qWeightHA,4) + "," +
  2971. IntegerToString(g_qTotalTrades) + "," +
  2972. IntegerToString(g_qWinTrades);
  2973. FileWriteString(h, line);
  2974. FileClose(h);
  2975. }
  2976. }
  2977.  
  2978. void QuantumUpdateLearning(bool win)
  2979. {
  2980. g_qTotalTrades++;
  2981. if(win) g_qWinTrades++;
  2982.  
  2983. double lr = 0.015;
  2984. double adj = win ? lr : -lr * 1.5;
  2985.  
  2986. if(g_qIsTrap) g_qWeightTrap += adj;
  2987. else {
  2988. if(g_qPattern == "GGG" || g_qPattern == "RRR" || g_qPattern == "GGR" || g_qPattern == "RRG")
  2989. g_qWeightMHI += adj;
  2990. if(g_otcHasSignal) g_qWeightFib += adj;
  2991. }
  2992.  
  2993. g_qWeightMHI = MathMax(0.05, MathMin(0.50, g_qWeightMHI));
  2994. g_qWeightNCP = MathMax(0.05, MathMin(0.50, g_qWeightNCP));
  2995. g_qWeightTrap = MathMax(0.05, MathMin(0.50, g_qWeightTrap));
  2996. g_qWeightFib = MathMax(0.05, MathMin(0.50, g_qWeightFib));
  2997. g_qWeightBB = MathMax(0.05, MathMin(0.50, g_qWeightBB));
  2998. g_qWeightNeural = MathMax(0.05, MathMin(0.50, g_qWeightNeural));
  2999. g_qWeightHA = MathMax(0.05, MathMin(0.50, g_qWeightHA));
  3000.  
  3001. double totalW = g_qWeightMHI + g_qWeightNCP + g_qWeightTrap +
  3002. g_qWeightFib + g_qWeightBB + g_qWeightNeural + g_qWeightHA;
  3003. if(totalW > 0)
  3004. {
  3005. g_qWeightMHI /= totalW;
  3006. g_qWeightNCP /= totalW;
  3007. g_qWeightTrap /= totalW;
  3008. g_qWeightFib /= totalW;
  3009. g_qWeightBB /= totalW;
  3010. g_qWeightNeural /= totalW;
  3011. g_qWeightHA /= totalW;
  3012. }
  3013.  
  3014. QuantumSaveLearning();
  3015. }
  3016.  
  3017. // ============================================================
  3018. // 150 CANDLE HISTORY: Build & Analyze
  3019. // ============================================================
  3020. void QuantumBuildHistory()
  3021. {
  3022. g_histCount = 0;
  3023. int maxBars = MathMin(150, Bars - 5);
  3024.  
  3025. for(int i = 5; i < 5 + maxBars && i < Bars; i++)
  3026. {
  3027. int c1 = (Close[i] > Open[i]) ? 1 : (Close[i] < Open[i]) ? -1 : 0;
  3028. int c2 = (Close[i+1] > Open[i+1]) ? 1 : (Close[i+1] < Open[i+1]) ? -1 : 0;
  3029. int c3 = (Close[i+2] > Open[i+2]) ? 1 : (Close[i+2] < Open[i+2]) ? -1 : 0;
  3030.  
  3031. int result = (Close[i-1] > Open[i-1]) ? 1 : (Close[i-1] < Open[i-1]) ? -1 : 0;
  3032.  
  3033. int patternCode = (c3+1)*100 + (c2+1)*10 + (c1+1);
  3034.  
  3035. g_histPatterns[g_histCount] = patternCode;
  3036. g_histResults[g_histCount] = result;
  3037. g_histCount++;
  3038. }
  3039. }
  3040.  
  3041. int QuantumCheckHistory(int currentPattern)
  3042. {
  3043. if(g_histCount < 20) return 0;
  3044.  
  3045. int matchCall = 0, matchPut = 0, totalMatch = 0;
  3046.  
  3047. for(int i = 0; i < g_histCount; i++)
  3048. {
  3049. if(g_histPatterns[i] == currentPattern)
  3050. {
  3051. totalMatch++;
  3052. if(g_histResults[i] == 1) matchCall++;
  3053. else if(g_histResults[i] == -1) matchPut++;
  3054. }
  3055. }
  3056.  
  3057. if(totalMatch < 3) return 0;
  3058.  
  3059. double callPct = (double)matchCall / totalMatch * 100.0;
  3060. double putPct = (double)matchPut / totalMatch * 100.0;
  3061.  
  3062. g_qHistoryScore = totalMatch;
  3063.  
  3064. if(callPct >= 60) return (int)callPct;
  3065. else if(putPct >= 60) return -(int)putPct;
  3066. return 0;
  3067. }
  3068.  
  3069. // ============================================================
  3070. // TIME-BASED PROBABILITY
  3071. // ============================================================
  3072. void QuantumCalcTimeProb()
  3073. {
  3074. int age = (int)(TimeCurrent() - Time[0]);
  3075. int ps = Period() * 60;
  3076. double pct = (double)age / ps * 100.0;
  3077.  
  3078. if(pct < 20)
  3079. {
  3080. g_qTimePhase = "EARLY";
  3081. g_qTimeProb = 45.0;
  3082. }
  3083. else if(pct < 50)
  3084. {
  3085. g_qTimePhase = "MID";
  3086. g_qTimeProb = 65.0;
  3087. }
  3088. else if(pct < 80)
  3089. {
  3090. g_qTimePhase = "LATE";
  3091. g_qTimeProb = 75.0;
  3092. }
  3093. else
  3094. {
  3095. g_qTimePhase = "LAST";
  3096. g_qTimeProb = 55.0;
  3097. }
  3098.  
  3099. double spread = (double)MarketInfo(Symbol(), MODE_SPREAD);
  3100. double pip = GetUniversalPip();
  3101. double spreadPips = spread * Point / pip;
  3102.  
  3103. if(spreadPips > 5) g_qSpreadPenalty = 15.0;
  3104. else if(spreadPips > 3) g_qSpreadPenalty = 8.0;
  3105. else g_qSpreadPenalty = 0.0;
  3106. }
  3107.  
  3108. // ============================================================
  3109. // BACKGROUND PAIRS MHI SCAN
  3110. // ============================================================
  3111. void QuantumScanBackgroundMHI()
  3112. {
  3113. g_bgMHI_Count = 0;
  3114.  
  3115. if(g_pairCount == 0) return;
  3116.  
  3117. for(int i = 0; i < g_pairCount && i < 8; i++)
  3118. {
  3119. string pair = g_pairNames[i];
  3120. if(pair == Symbol()) continue;
  3121.  
  3122. double c1 = iClose(pair, PERIOD_M1, 1);
  3123. double o1 = iOpen(pair, PERIOD_M1, 1);
  3124. double c2 = iClose(pair, PERIOD_M1, 2);
  3125. double o2 = iOpen(pair, PERIOD_M1, 2);
  3126. double c3 = iClose(pair, PERIOD_M1, 3);
  3127. double o3 = iOpen(pair, PERIOD_M1, 3);
  3128.  
  3129. if(c1 == 0 || o1 == 0) continue;
  3130.  
  3131. string pColors = "";
  3132. if(c1 > o1) pColors += "G"; else if(c1 < o1) pColors += "R"; else pColors += "D";
  3133. if(c2 > o2) pColors += "G"; else if(c2 < o2) pColors += "R"; else pColors += "D";
  3134. if(c3 > o3) pColors += "G"; else if(c3 < o3) pColors += "R"; else pColors += "D";
  3135.  
  3136. string sig = "WAIT";
  3137. double conf = 50;
  3138.  
  3139. if(pColors == "GGR") { sig = "PUT"; conf = 70; }
  3140. else if(pColors == "RRG") { sig = "CALL"; conf = 70; }
  3141. else if(pColors == "GGG") { sig = "PUT"; conf = 85; }
  3142. else if(pColors == "RRR") { sig = "CALL"; conf = 85; }
  3143.  
  3144. if(sig != "WAIT")
  3145. {
  3146. g_bgMHI_Signal[g_bgMHI_Count] = sig;
  3147. g_bgMHI_Conf[g_bgMHI_Count] = conf;
  3148. g_bgMHI_Pair[g_bgMHI_Count] = pair;
  3149. g_bgMHI_Count++;
  3150. }
  3151. }
  3152. }
  3153.  
  3154. // ============================================================
  3155. // MAIN QUANTUM v9.1 PRO ENGINE
  3156. // ============================================================
  3157. void CalculateQuantumEngine()
  3158. {
  3159. g_qSignal = "WAIT";
  3160. g_qConf = 50.0;
  3161. g_qPattern = "---";
  3162. g_qStatus = "SCANNING";
  3163. g_qColor = NEON_YELLOW;
  3164. g_qReason = "";
  3165. g_qIsTrap = false;
  3166. g_qCallScore = 50.0;
  3167. g_qPutScore = 50.0;
  3168. g_qConfluence = "";
  3169. g_qHistoryScore = 0;
  3170.  
  3171. if(Bars < 20) return;
  3172.  
  3173. static datetime lastHistBuild = 0;
  3174. if(Time[0] != lastHistBuild)
  3175. {
  3176. QuantumBuildHistory();
  3177. lastHistBuild = Time[0];
  3178. }
  3179.  
  3180. QuantumCalcTimeProb();
  3181. QuantumScanBackgroundMHI();
  3182.  
  3183. // MODULE 1: MHI PATTERN
  3184. double mhiCall = 0, mhiPut = 0;
  3185. string colors = "";
  3186. for(int i = 1; i <= 3; i++)
  3187. {
  3188. if(Close[i] > Open[i]) colors += "G";
  3189. else if(Close[i] < Open[i]) colors += "R";
  3190. else colors += "D";
  3191. }
  3192. g_qPattern = colors;
  3193.  
  3194. if(colors == "GGR") { mhiPut = 85; mhiCall = 15; }
  3195. else if(colors == "RRG") { mhiCall = 85; mhiPut = 15; }
  3196. else if(colors == "GGG") { mhiPut = 90; mhiCall = 10; }
  3197. else if(colors == "RRR") { mhiCall = 90; mhiPut = 10; }
  3198. else if(colors == "GRG") { mhiCall = 40; mhiPut = 40; }
  3199. else if(colors == "RGR") { mhiCall = 40; mhiPut = 40; }
  3200. else if(colors == "GRR") { mhiCall = 65; mhiPut = 35; }
  3201. else if(colors == "RGG") { mhiPut = 65; mhiCall = 35; }
  3202.  
  3203. if(StringFind(colors, "D") >= 0) { mhiCall -= 10; mhiPut -= 10; }
  3204.  
  3205. int currentPat = ((Close[3]>Open[3]?1:Close[3]<Open[3]?-1:0)+1)*100 +
  3206. ((Close[2]>Open[2]?1:Close[2]<Open[2]?-1:0)+1)*10 +
  3207. ((Close[1]>Open[1]?1:Close[1]<Open[1]?-1:0)+1);
  3208. int histBoost = QuantumCheckHistory(currentPat);
  3209.  
  3210. if(histBoost > 0) { mhiCall += histBoost * 0.3; mhiPut -= histBoost * 0.3; }
  3211. else if(histBoost < 0) { mhiPut += MathAbs(histBoost) * 0.3; mhiCall -= MathAbs(histBoost) * 0.3; }
  3212.  
  3213. int bgAgreeCall = 0, bgAgreePut = 0;
  3214. for(int b = 0; b < g_bgMHI_Count; b++)
  3215. {
  3216. if(g_bgMHI_Signal[b] == "CALL") bgAgreeCall++;
  3217. else if(g_bgMHI_Signal[b] == "PUT") bgAgreePut++;
  3218. }
  3219.  
  3220. if(bgAgreeCall >= 2) { mhiCall += 10; mhiPut -= 5; }
  3221. if(bgAgreePut >= 2) { mhiPut += 10; mhiCall -= 5; }
  3222.  
  3223. // MODULE 2: NCP PRO v8
  3224. double ncpCall = 50, ncpPut = 50;
  3225. if(ENABLE_MTG && g_mtgState != "INIT")
  3226. {
  3227. ncpCall = g_smoothCallScore;
  3228. ncpPut = g_smoothPutScore;
  3229. }
  3230.  
  3231. // MODULE 3: VISUAL TRAP
  3232. double trapCall = 50, trapPut = 50;
  3233. if(g_visualTrapPro.callBias > 0 || g_visualTrapPro.putBias > 0)
  3234. {
  3235. trapCall = g_visualTrapPro.callBias;
  3236. trapPut = g_visualTrapPro.putBias;
  3237. }
  3238. if(g_visualTrapPro.trapScore >= 70)
  3239. {
  3240. double temp = trapCall; trapCall = trapPut; trapPut = temp;
  3241. g_qIsTrap = true;
  3242. }
  3243.  
  3244. // MODULE 4: FIB REJECTION
  3245. double fibCall = 50, fibPut = 50;
  3246. if(g_otcHasSignal && g_otcFibStrength > 0)
  3247. {
  3248. if(g_otcFibDir == "CALL") { fibCall = g_otcFibStrength; fibPut = 100 - g_otcFibStrength; }
  3249. else if(g_otcFibDir == "PUT") { fibPut = g_otcFibStrength; fibCall = 100 - g_otcFibStrength; }
  3250. }
  3251.  
  3252. // MODULE 5: BB PULLBACK
  3253. double bbCall = 50, bbPut = 50;
  3254. if(ENABLE_BB_PULLBACK && g_bbSignal != "--")
  3255. {
  3256. if(g_bbSignal == "CALL") { bbCall = 80; bbPut = 20; }
  3257. else if(g_bbSignal == "PUT") { bbPut = 80; bbCall = 20; }
  3258. }
  3259.  
  3260. // MODULE 6: NEURAL AI
  3261. double neuralCall = 50, neuralPut = 50;
  3262. double nb = NeuralBiasFast();
  3263. if(nb > 50) { neuralCall = nb; neuralPut = 100 - nb; }
  3264. else { neuralPut = 100 - nb; neuralCall = nb; }
  3265.  
  3266. // MODULE 7: HA CANDLES
  3267. double haCall = 50, haPut = 50;
  3268. if(g_haM1 == "HA BULLISH 1") haCall += 20;
  3269. else if(g_haM1 == "HA BEARISH 1") haPut += 20;
  3270. if(g_haM5 == "HA BULLISH 5") haCall += 15;
  3271. else if(g_haM5 == "HA BEARISH 5") haPut += 15;
  3272. if(g_haBoth == "BOTH BULL") haCall += 25;
  3273. else if(g_haBoth == "BOTH BEAR") haPut += 25;
  3274.  
  3275. // QUANTUM CONFLUENCE (Dynamic Weights)
  3276. g_qCallScore = (
  3277. mhiCall * g_qWeightMHI +
  3278. ncpCall * g_qWeightNCP +
  3279. trapCall * g_qWeightTrap +
  3280. fibCall * g_qWeightFib +
  3281. bbCall * g_qWeightBB +
  3282. neuralCall * g_qWeightNeural +
  3283. haCall * g_qWeightHA
  3284. );
  3285.  
  3286. g_qPutScore = (
  3287. mhiPut * g_qWeightMHI +
  3288. ncpPut * g_qWeightNCP +
  3289. trapPut * g_qWeightTrap +
  3290. fibPut * g_qWeightFib +
  3291. bbPut * g_qWeightBB +
  3292. neuralPut * g_qWeightNeural +
  3293. haPut * g_qWeightHA
  3294. );
  3295.  
  3296. // Time & Spread Adjustments
  3297. double timeBoost = (g_qTimeProb - 50) * 0.3;
  3298. if(g_qCallScore > g_qPutScore) g_qCallScore += timeBoost;
  3299. else g_qPutScore += timeBoost;
  3300.  
  3301. if(g_qCallScore > g_qPutScore) g_qCallScore -= g_qSpreadPenalty;
  3302. else g_qPutScore -= g_qSpreadPenalty;
  3303.  
  3304. // Normalize
  3305. double total = g_qCallScore + g_qPutScore;
  3306. if(total > 0)
  3307. {
  3308. g_qCallScore = (g_qCallScore / total) * 100;
  3309. g_qPutScore = (g_qPutScore / total) * 100;
  3310. }
  3311.  
  3312. // CONFLUENCE CHECK
  3313. string agreeSources = "";
  3314. int agreeCount = 0;
  3315.  
  3316. if(mhiCall > 60 && g_qCallScore > 55) { agreeSources += "MHI+"; agreeCount++; }
  3317. if(mhiPut > 60 && g_qPutScore > 55) { agreeSources += "MHI+"; agreeCount++; }
  3318. if(ncpCall > 60 && g_qCallScore > 55) { agreeSources += "NCP+"; agreeCount++; }
  3319. if(ncpPut > 60 && g_qPutScore > 55) { agreeSources += "NCP+"; agreeCount++; }
  3320. if(trapCall > 60 && g_qCallScore > 55) { agreeSources += "TRP+"; agreeCount++; }
  3321. if(trapPut > 60 && g_qPutScore > 55) { agreeSources += "TRP+"; agreeCount++; }
  3322. if(fibCall > 60 && g_qCallScore > 55) { agreeSources += "FIB+"; agreeCount++; }
  3323. if(fibPut > 60 && g_qPutScore > 55) { agreeSources += "FIB+"; agreeCount++; }
  3324. if(bbCall > 60 && g_qCallScore > 55) { agreeSources += "BB+"; agreeCount++; }
  3325. if(bbPut > 60 && g_qPutScore > 55) { agreeSources += "BB+"; agreeCount++; }
  3326.  
  3327. g_qConfluence = agreeSources + " (" + IntegerToString(agreeCount) + "/7)";
  3328.  
  3329. // FINAL DECISION
  3330. double dominant = MathMax(g_qCallScore, g_qPutScore);
  3331. int minAgree = 3;
  3332.  
  3333. if(agreeCount < minAgree || dominant < 58)
  3334. {
  3335. g_qSignal = "WAIT";
  3336. g_qConf = dominant;
  3337. g_qStatus = "LOW CONF";
  3338. g_qColor = NEON_YELLOW;
  3339. g_qReason = "Need " + IntegerToString(minAgree) + "+ src | Got:" + IntegerToString(agreeCount);
  3340. return;
  3341. }
  3342.  
  3343. // TRAP OVERRIDE
  3344. if(g_qIsTrap && dominant >= 75)
  3345. {
  3346. if(g_qCallScore > g_qPutScore)
  3347. {
  3348. g_qSignal = "TRAP_PUT";
  3349. g_qColor = NEON_PURPLE;
  3350. g_qStatus = "QUANTUM TRAP";
  3351. }
  3352. else
  3353. {
  3354. g_qSignal = "TRAP_CALL";
  3355. g_qColor = NEON_PURPLE;
  3356. g_qStatus = "QUANTUM TRAP";
  3357. }
  3358. g_qConf = dominant;
  3359. g_qReason = "TRAP:" + IntegerToString((int)g_visualTrapPro.trapScore) + "% | " + g_qConfluence;
  3360. return;
  3361. }
  3362.  
  3363. // NORMAL SIGNAL
  3364. if(g_qCallScore > g_qPutScore)
  3365. {
  3366. g_qSignal = "CALL";
  3367. g_qConf = g_qCallScore;
  3368. if(g_qCallScore >= 85) { g_qStatus = "QUANTUM STRONG"; g_qColor = NEON_GREEN; }
  3369. else if(g_qCallScore >= 72) { g_qStatus = "QUANTUM GOOD"; g_qColor = NEON_LIME; }
  3370. else { g_qStatus = "QUANTUM WEAK"; g_qColor = NEON_CYAN; }
  3371. }
  3372. else
  3373. {
  3374. g_qSignal = "PUT";
  3375. g_qConf = g_qPutScore;
  3376. if(g_qPutScore >= 85) { g_qStatus = "QUANTUM STRONG"; g_qColor = NEON_RED; }
  3377. else if(g_qPutScore >= 72) { g_qStatus = "QUANTUM GOOD"; g_qColor = C'255,100,100'; }
  3378. else { g_qStatus = "QUANTUM WEAK"; g_qColor = NEON_ORANGE; }
  3379. }
  3380.  
  3381. g_qReason = g_qConfluence;
  3382.  
  3383. if(g_qHistoryScore > 0)
  3384. {
  3385. g_qReason += " | HIST:" + IntegerToString(g_qHistoryScore);
  3386. }
  3387. }
  3388.  
  3389. // ============================================================
  3390. // v9.1 PRO DASHBOARD DRAW (WIDE GAP & BIG FONTS)
  3391. // ============================================================
  3392. void DrawQuantumCube(int x, int y, int w, int h)
  3393. {
  3394. color borderC = g_qIsTrap ? NEON_PURPLE : g_qColor;
  3395. if(g_qSignal == "WAIT") borderC = C'80,80,90';
  3396.  
  3397. Bx("c_quantum", x, y, w, h, BG_DARK2, borderC);
  3398.  
  3399. // 1. Title (Bada)
  3400. Tx("c_quantum_l", x+10, y+5, "MHI-QUANTUM v9.1", NEON_CYAN, 10, true);
  3401.  
  3402. // 2. MAIN LINE: Signal (Left) + Conf/Phase (Right) - WIDE GAP
  3403. string sigDisplay = g_qSignal;
  3404. if(StringFind(g_qSignal, "TRAP_") == 0)
  3405. sigDisplay = "!" + StringSubstr(g_qSignal, 5);
  3406.  
  3407. // Signal left side (Font 16)
  3408. Tx("c_quantum_sig", x+10, y+22, sigDisplay, g_qColor, 16, true);
  3409.  
  3410. // Conf & Time right side mein (Font 12, Gap x+105)
  3411. string confText = DoubleToString(g_qConf, 0) + "% " + g_qTimePhase;
  3412. Tx("c_quantum_conf", x+105, y+24, confText, NEON_WHITE, 12, true);
  3413.  
  3414. // 3. Pattern & History (Font 11)
  3415. color patC = (g_qPattern == "GGG" || g_qPattern == "GGR") ? NEON_RED :
  3416. (g_qPattern == "RRR" || g_qPattern == "RRG") ? NEON_GREEN : CGR;
  3417. string patText = "PATTERN: " + g_qPattern;
  3418. if(g_qHistoryScore > 0) patText += " [H" + IntegerToString(g_qHistoryScore) + "]";
  3419. Tx("c_quantum_pat", x+10, y+46, patText, patC, 11, true);
  3420.  
  3421. // 4. Status (Font 12)
  3422. Tx("c_quantum_stat", x+10, y+68, g_qStatus, g_qColor, 12, true);
  3423.  
  3424. // 5. Confluence Sources (Font 10)
  3425. string confl = g_qConfluence;
  3426. if(StringLen(confl) > 28) confl = StringSubstr(confl, 0, 26) + "..";
  3427. Tx("c_quantum_src", x+10, y+90, confl, NEON_GOLD, 10, true);
  3428.  
  3429. // 6. Spread Warning
  3430. if(g_qSpreadPenalty > 0)
  3431. {
  3432. Tx("c_quantum_spd", x+10, y+110, "SPREAD -" + DoubleToString(g_qSpreadPenalty,0) + "%", NEON_ORANGE, 10, true);
  3433. }
  3434.  
  3435. // 7. Background Pairs Sync
  3436. if(g_bgMHI_Count > 0)
  3437. {
  3438. string bgText = "BG PAIRS: " + IntegerToString(g_bgMHI_Count);
  3439. Tx("c_quantum_bg", x+10, y+126, bgText, NEON_PURPLE, 10, true);
  3440. }
  3441.  
  3442. // 8. Dual Bar - Call vs Put (Bottom)
  3443. int barW = w - 20;
  3444. int barY = y + h - 10;
  3445.  
  3446. Bx("c_quantum_bar_bg", x+10, barY, barW, 6, BG_DARK4, BG_DARK4);
  3447.  
  3448. int callW = (int)(g_qCallScore / 100.0 * barW);
  3449. if(callW < 1) callW = 1; if(callW > barW) callW = barW;
  3450. Bx("c_quantum_call", x+10, barY, callW, 6, C'0,180,90', C'0,180,90');
  3451.  
  3452. int putW = (int)(g_qPutScore / 100.0 * barW);
  3453. if(putW < 1) putW = 1; if(putW > barW) putW = barW;
  3454. int putX = x + 10 + barW - putW;
  3455. Bx("c_quantum_put", putX, barY, putW, 6, C'200,50,50', C'200,50,50');
  3456.  
  3457. int centerX = x + 10 + barW/2 - 1;
  3458. Bx("c_quantum_ctr", centerX, barY-1, 2, 8, NEON_WHITE, NEON_WHITE);
  3459. }
  3460.  
  3461. // ============================================================
  3462. // ACCURACY TRACKING FOR AUTO-LEARNING
  3463. // ============================================================
  3464. void QuantumCheckResult()
  3465. {
  3466. static datetime lastCheckBar = 0;
  3467. if(Time[0] == lastCheckBar) return;
  3468. lastCheckBar = Time[0];
  3469.  
  3470. if(g_qSignal != "WAIT" && g_qLastSignalBar == Time[1])
  3471. {
  3472. bool wasCall = (g_qLastSignal == "CALL" || g_qLastSignal == "TRAP_PUT");
  3473. bool wasPut = (g_qLastSignal == "PUT" || g_qLastSignal == "TRAP_CALL");
  3474.  
  3475. bool greenBar = (Close[1] > Open[1]);
  3476. bool redBar = (Close[1] < Open[1]);
  3477.  
  3478. bool win = false;
  3479. if(wasCall && greenBar) win = true;
  3480. if(wasPut && redBar) win = true;
  3481.  
  3482. QuantumUpdateLearning(win);
  3483. }
  3484.  
  3485. if(g_qSignal != "WAIT")
  3486. {
  3487. g_qLastSignal = g_qSignal;
  3488. g_qLastSignalBar = Time[0];
  3489. }
  3490. }
  3491.  
  3492. // ============================================================
  3493. // MAIN DASHBOARD DRAW (FIXED NEXT CANDLE CUBE)
  3494. // ============================================================
  3495. void Draw(){
  3496. HideSPM(); DelDashboard();
  3497. int W=DASH_W,G=8,CW=(W-2*G)/3,CH=110,cx=POS_X+G,yy=POS_Y;
  3498. int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
  3499. g_marketMode=DetectMarketMode(brain,g_rsc,cp,nb);
  3500. if(StringLen(g_prevMode)>0&&g_prevMode!=g_marketMode){g_signalTime=0;g_finalSignal="WAIT";}g_prevMode=g_marketMode;
  3501. CalcOTCCrowd();UpdateAccuracy();UpdateWeights();
  3502. double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
  3503. CalcFibRejectionHunter();
  3504. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  3505. UpdateRiskControl();CheckMTFConfirmation();
  3506. double tfaScore=CalcAdvancedTFA(g_tfa_detail);
  3507. color ha1C=(g_haM1=="HA BULLISH 1")?NEON_GREEN:(g_haM1=="HA BEARISH 1")?NEON_RED:NEON_YELLOW;
  3508. color ha5C=(g_haM5=="HA BULLISH 5")?NEON_GREEN:(g_haM5=="HA BEARISH 5")?NEON_RED:NEON_YELLOW;
  3509. color biasClr;string biasStr=CalcAdvancedMarketBias(biasClr,brain,g_rsc);
  3510. string stratLabel=(g_strategyType=="TRAP")?"TRAP":(g_strategyType=="TREND")?"TREND":"NO STRATEGY";
  3511. color stratC=(g_strategyType=="TRAP")?NEON_PURPLE:(g_strategyType=="TREND")?NEON_GREEN:CGR;
  3512.  
  3513. g_rsc = brain * 0.5;
  3514.  
  3515. g_frozen_gProb = g_calc_gProb;
  3516. g_frozen_rProb = g_calc_rProb;
  3517. g_frozen_pAction = g_calc_pAction;
  3518. g_frozen_pColor = g_calc_pColor;
  3519.  
  3520.  
  3521.  
  3522. // ROW 1
  3523. Cube("c1",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"PAIR",NEON_CYAN,Symbol(),NEON_BLUE,13);
  3524.  
  3525. DrawQuantumCube(cx+CW+G, yy, CW, 130);
  3526.  
  3527. // ----- TIMER & STRENGTH CUBE (NEW) -----
  3528. int tfSec=300; datetime tnow=TimeCurrent(); datetime tbar=(datetime)((int)tnow/300*300); int trem=(int)(tbar+300-tnow); if(trem<0)trem=0; if(trem>=tfSec)trem=tfSec-1; string timerStr=StringFormat("%02d:%02d", trem/60, trem%60);
  3529.  
  3530. // --- M5 STRENGTH ---
  3531. double m5H=iHigh(NULL,PERIOD_M5,1), m5L=iLow(NULL,PERIOD_M5,1), m5O=iOpen(NULL,PERIOD_M5,1), m5C=iClose(NULL,PERIOD_M5,1);
  3532. double m5Rng=m5H-m5L; if(m5Rng<=Point) m5Rng=Point;
  3533. double m5Body=MathAbs(m5C-m5O);
  3534. double m5Uw=m5H-MathMax(m5O,m5C), m5Lw=MathMin(m5O,m5C)-m5L;
  3535. double m5Str=MathMax(0, MathMin(100, (m5Body/m5Rng)*100.0 - ((m5Uw+m5Lw)/m5Rng)*25.0));
  3536. bool m5Bull=m5C>m5O; string m5Txt="M5: "+DoubleToString(m5Str,0)+"% "+(m5Bull?"UP":"DN");
  3537. color m5Clr=(m5Str>=70)?((m5Bull)?NEON_GREEN:NEON_RED):((m5Str>=40)?NEON_YELLOW:CGR);
  3538.  
  3539. // --- M1 STRENGTH ---
  3540. double m1Rng=High[1]-Low[1]; if(m1Rng<=Point) m1Rng=Point;
  3541. double m1Body=MathAbs(Close[1]-Open[1]);
  3542. double m1Uw=High[1]-MathMax(Open[1],Close[1]), m1Lw=MathMin(Open[1],Close[1])-Low[1];
  3543. double m1Str=MathMax(0, MathMin(100, (m1Body/m1Rng)*100.0 - ((m1Uw+m1Lw)/m1Rng)*25.0));
  3544. bool m1Bull=Close[1]>Open[1]; string m1Txt="M1: "+DoubleToString(m1Str,0)+"% "+(m1Bull?"UP":"DN");
  3545. color m1Clr=(m1Str>=70)?((m1Bull)?NEON_GREEN:NEON_RED):((m1Str>=40)?NEON_YELLOW:CGR);
  3546.  
  3547. // --- M2 STRENGTH (Last 2 M1 Candles Combined) ---
  3548. double m2H=MathMax(High[1],High[2]), m2L=MathMin(Low[1],Low[2]);
  3549. double m2O=Open[2], m2C=Close[1];
  3550. double m2Rng=m2H-m2L; if(m2Rng<=Point) m2Rng=Point;
  3551. double m2Body=MathAbs(m2C-m2O);
  3552. double m2Uw=m2H-MathMax(m2O,m2C), m2Lw=MathMin(m2O,m2C)-m2L;
  3553. double m2Str=MathMax(0, MathMin(100, (m2Body/m2Rng)*100.0 - ((m2Uw+m2Lw)/m2Rng)*25.0));
  3554. bool m2Bull=m2C>m2O; string m2Txt="M2: "+DoubleToString(m2Str,0)+"% "+(m2Bull?"UP":"DN");
  3555. color m2Clr=(m2Str>=70)?((m2Bull)?NEON_GREEN:NEON_RED):((m2Str>=40)?NEON_YELLOW:CGR);
  3556.  
  3557. // --- DRAW CUBE ---
  3558. Bx("c_str",cx+2*(CW+G),yy,CW,CH,BG_DARK2,NEON_CYAN);
  3559. Bx("c_str_acc",cx+2*(CW+G),yy,3,CH,NEON_CYAN,NEON_CYAN);
  3560. Tx("c_str_t",cx+2*(CW+G)+10,yy+5,timerStr,NEON_GREEN,12,true);
  3561. Tx("c_str_m5",cx+2*(CW+G)+10,yy+24,m5Txt,m5Clr,11,true);
  3562. Tx("c_str_m2",cx+2*(CW+G)+10,yy+48,m2Txt,m2Clr,11,true);
  3563. Tx("c_str_m1",cx+2*(CW+G)+10,yy+72,m1Txt,m1Clr,11,true);
  3564.  
  3565. // --- AVERAGE STRENGTH BAR ---
  3566. int barY=yy+CH-8; int barW=CW-24;
  3567. double avgStr=(m5Str+m2Str+m1Str)/3.0;
  3568. Bx("c_str_bg",cx+2*(CW+G)+10,barY,barW,4,BG_DARK4,BG_DARK4);
  3569. int fillW=(int)(avgStr/100.0*barW); if(fillW<2)fillW=2; if(fillW>barW)fillW=barW;
  3570. color avgClr=(avgStr>=60)?NEON_GREEN:((avgStr>=40)?NEON_YELLOW:NEON_RED);
  3571. Bx("c_str_fg",cx+2*(CW+G)+10,barY,fillW,4,avgClr,avgClr);
  3572. yy += CH + G;
  3573.  
  3574.  
  3575.  
  3576.  
  3577. // ROW 2
  3578. 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);
  3579. 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);
  3580. color sClr=CGR;string sName=GetCurrentSession(sClr);bool isAct=IsSessionActive();
  3581. Bx("c_ses",cx+2*(CW+G),yy,CW,CH,BG_DARK2,sClr);Tx("c_ses_l",cx+2*(CW+G)+10,yy+4,"SESSION",NEON_CYAN,10,true);Tx("c_ses_v",cx+2*(CW+G)+10,yy+22,sName,sClr,14,true);int gH=TimeHour(TimeGMT()),gMn=TimeMinute(TimeGMT());Tx("c_ses_t",cx+2*(CW+G)+10,yy+54,"GMT "+(gH<10?"0":"")+IntegerToString(gH)+":"+(gMn<10?"0":"")+IntegerToString(gMn),NEON_WHITE,11,false);Tx("c_ses_s",cx+2*(CW+G)+10,yy+76,isAct?"ACTIVE":"LOW VOL",isAct?NEON_GREEN:NEON_ORANGE,11,true);yy+=CH+G;
  3582.  
  3583. // ROW 3
  3584. DrawOtherPairsCube(cx,yy,CW,CH);DrawConfluenceCube(cx+CW+G,yy,CW,140);
  3585. 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 AI",NEON_PURPLE,10,true);color brainClr3=(brain>0)?NEON_GREEN:(brain<0)?NEON_RED:NEON_YELLOW;double brainBar=MathMax(5,MathMin(95,50+brain*5));Tx("c_brain_r3_v",cx+2*(CW+G)+10,yy+25,(brain>=0?"+":"")+DoubleToString(brain,1),brainClr3,24,true);Tx("c_brain_r3_s",cx+2*(CW+G)+10,yy+58,stratLabel,stratC,10,false);string brainDir=(brain>2)?"BULL PRESSURE":(brain<-2)?"BEAR PRESSURE":"NEUTRAL";Tx("c_brain_r3_d",cx+2*(CW+G)+10,yy+76,brainDir,(brain>2)?NEON_GREEN:(brain<-2)?NEON_RED:NEON_YELLOW,9,false);NeonBar("c_brain_r3_b",cx+2*(CW+G)+12,yy+92,CW-24,7,brainBar,brainClr3);yy+=CH+G;
  3586.  
  3587. // ROW 4
  3588. int CH4=120;color fibC;if(g_fibBestDir=="CALL")fibC=NEON_GREEN;else if(g_fibBestDir=="PUT")fibC=NEON_RED;else fibC=NEON_YELLOW;
  3589. Bx("c_fib",cx,yy,CW,CH4,BG_DARK2,fibC);Tx("c_fib_l",cx+10,yy+4,"FIB REJECTION",NEON_PURPLE,10,true);Tx("c_fib_dir",cx+10,yy+22,g_fibBestDir,fibC,16,true);
  3590. string confTxt="CONF: "+IntegerToString(g_fibConfidence)+"%";color confC=(g_fibConfidence>=70)?NEON_GREEN:(g_fibConfidence>=50)?NEON_YELLOW:CGR;Tx("c_fib_conf",cx+10,yy+46,confTxt,confC,11,true);
  3591. color patC=(g_fibPattern=="PIN"||g_fibPattern=="FAKE")?NEON_GOLD:(g_fibPattern=="ENGULF")?NEON_PURPLE:CGR;Tx("c_fib_pat",cx+10,yy+64,"PAT: "+g_fibPattern,patC,10,false);Tx("c_fib_lev",cx+10,yy+82,"FIB: "+g_fibFibLevel,NEON_CYAN,10,false);
  3592. double fibBarPct=MathMin(100,g_fibBestScore);color fibBarC=(g_fibBestDir=="CALL")?NEON_GREEN:(g_fibBestDir=="PUT")?NEON_RED:NEON_YELLOW;NeonBar("c_fib_b",cx+12,yy+104,CW-24,7,fibBarPct,fibBarC);
  3593. 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);
  3594. 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{tfaLabel="WEAK";tfaColor=NEON_ORANGE;}
  3595. 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]";
  3596. 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);
  3597. 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;
  3598.  
  3599. // ROW 5
  3600. int CH5=140;
  3601. if(ENABLE_MTG){
  3602. bool isTrap=(g_mtgState=="PUT TRAP"||g_mtgState=="CALL TRAP");color mtgC=g_mtgClr;if(g_mtgState=="WAIT"||g_mtgState=="...")mtgC=NEON_YELLOW;color borderC=isTrap?NEON_PURPLE:mtgC;
  3603. Bx("c_mtg",cx,yy,CW,CH5,BG_DARK2,borderC);string runStr="";if(g_mtgBullCount>=2)runStr=" +"+IntegerToString(g_mtgBullCount)+"B";else if(g_mtgBearCount>=2)runStr=" +"+IntegerToString(g_mtgBearCount)+"R";
  3604. Tx("c_mtg_l",cx+10,yy+4,"NCP PRO v8"+runStr,NEON_PURPLE,10,true);Tx("c_mtg_s",cx+10,yy+18,g_mtgState,mtgC,isTrap?11:13,true);
  3605. int cW=(int)(g_mtgHype/100.0*(CW-22));if(cW<2)cW=2;if(cW>CW-22)cW=CW-22;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,(g_mtgHype>=g_mtgBetrayal)?NEON_GREEN:C'35,70,35',NEON_GREEN);
  3606. Tx("c_mtg_ct",cx+10,yy+43,"CALL: "+DoubleToString(g_mtgHype,1)+"%",NEON_GREEN,10,true);
  3607. int pW=(int)(g_mtgBetrayal/100.0*(CW-22));if(pW<2)pW=2;if(pW>CW-22)pW=CW-22;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,(g_mtgBetrayal>g_mtgHype)?NEON_RED:C'70,25,25',NEON_RED);
  3608. Tx("c_mtg_pt",cx+10,yy+65,"PUT: "+DoubleToString(g_mtgBetrayal,1)+"%",NEON_RED,10,true);
  3609. string actD=g_mtgAction;if(StringLen(actD)>28)actD=StringSubstr(actD,0,27);color actC=isTrap?NEON_PURPLE:(g_mtgState=="CALL")?NEON_GREEN:(g_mtgState=="PUT")?NEON_RED:NEON_YELLOW;
  3610. Tx("c_mtg_a",cx+10,yy+81,actD,actC,10,true);Tx("c_mtg_r",cx+10,yy+97,"ATR: "+DoubleToString(g_mtgRecovery,1)+"p",CGR,9,false);
  3611. } else {
  3612. 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);
  3613. }
  3614. Bx("c_bias",cx+CW+G,yy,CW,CH5,BG_DARK2,biasClr);Tx("c_bias_l",cx+CW+G+10,yy+4,"MARKET BIAS",NEON_CYAN,10,true);string bStr=biasStr;if(StringLen(bStr)>13)bStr=StringSubstr(bStr,0,12);Tx("c_bias_v",cx+CW+G+10,yy+22,bStr,biasClr,13,true);Tx("c_bias_m",cx+CW+G+10,yy+52,"MODE: "+g_marketMode,(g_marketMode=="TREND")?NEON_GREEN:(g_marketMode=="REVERSAL")?NEON_RED:NEON_YELLOW,10,false);color accC=(g_accuracy>=70)?NEON_GREEN:(g_accuracy>=60)?NEON_YELLOW:NEON_RED;Tx("c_bias_a",cx+CW+G+10,yy+72,"ACC: "+DoubleToString(g_accuracy,1)+"%",accC,10,false);NeonBar("c_bias_b",cx+CW+G+10,yy+88,CW-20,7,g_accuracy,accC);
  3615. Bx("c18",cx+2*(CW+G),yy,CW,CH5,BG_DARK2,NEON_CYAN);Tx("c18_l",cx+2*(CW+G)+10,yy+4,"S/R LEVELS",NEON_CYAN,10,true);Tx("c18_r",cx+2*(CW+G)+10,yy+24,"R: "+(g_nearest_res>0?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;
  3616.  
  3617. // ROW 6
  3618. int CH6 = 120;
  3619. Bx("c15", cx, yy, CW, CH6, BG_DARK2, g_visualTrapPro.verdictColor);
  3620. Tx("c15_l", cx+10, yy+4, "VISUAL TRAP", NEON_PURPLE, 10, true);
  3621. Tx("c15_box", cx+10, yy+22, g_visualTrapPro.boxStatus, CGR, 10, true);
  3622. Tx("c15_gann", cx+10, yy+38, g_visualTrapPro.gannStatus, g_visualTrapPro.gannColor, 10, true);
  3623. Tx("c15_m30", cx+10, yy+54, g_visualTrapPro.m30Dir, (StringFind(g_visualTrapPro.m30Dir,"UP")>=0)?NEON_GREEN:NEON_RED, 10, true);
  3624. Tx("c15_m1", cx+10, yy+70, g_visualTrapPro.m1Seq, CGR, 9, false);
  3625. Tx("c15_v", cx+10, yy+88, g_visualTrapPro.verdict, g_visualTrapPro.verdictColor, 13, true);
  3626.  
  3627. Bx("c_ha", cx+CW+G, yy, CW, CH6, BG_DARK2, ha1C);
  3628. Tx("c_ha_l", cx+CW+G+10, yy+4, "HA CANDLES", NEON_CYAN, 10, true);
  3629. string haM1txt = g_haM1, haM5txt = g_haM5;
  3630. if(StringLen(haM1txt) > 16) haM1txt = StringSubstr(haM1txt, 3);
  3631. if(StringLen(haM5txt) > 16) haM5txt = StringSubstr(haM5txt, 3);
  3632. Tx("c_ha_m1", cx+CW+G+10, yy+24, "M1: "+haM1txt, ha1C, 11, true);
  3633. Tx("c_ha_m5", cx+CW+G+10, yy+50, "M5: "+haM5txt, ha5C, 11, true);
  3634. string haComb = "";
  3635. color haCombC = NEON_YELLOW;
  3636. if(g_haM1 == "HA BULLISH 1" && g_haM5 == "HA BULLISH 5") {
  3637. haComb = "BOTH BULL"; haCombC = NEON_GREEN;
  3638. } else if(g_haM1 == "HA BEARISH 1" && g_haM5 == "HA BEARISH 5") {
  3639. haComb = "BOTH BEAR"; haCombC = NEON_RED;
  3640. } else haComb = g_haBoth;
  3641. Tx("c_ha_c", cx+CW+G+10, yy+76, haComb, haCombC, 11, true);
  3642.  
  3643. // ----- NCP ANALYSIS CUBE (PROFESSIONAL v2 - NEUTRAL = NEON FLOWER) -----
  3644. int ncpW = CW;
  3645. int ncpH = CH6;
  3646. int ncpX = cx + 2*(CW+G);
  3647. int ncpY = yy;
  3648.  
  3649. string patternName = (g_ncpMainPattern != "") ? g_ncpMainPattern : "NO PATTERN";
  3650. int bullScore = g_ncpPatternBullScore;
  3651. int bearScore = g_ncpPatternBearScore;
  3652. int totalStrength = MathMax(bullScore, bearScore);
  3653. int strengthPct = MathMin(100, (int)(totalStrength * 1.25));
  3654.  
  3655. bool isBullish = (bullScore > bearScore + 5);
  3656. bool isBearish = (bearScore > bullScore + 5);
  3657. bool isNeutral = (!isBullish && !isBearish);
  3658.  
  3659. color borderColor, textColor, barColor;
  3660. string dirSymbol;
  3661.  
  3662. if(isBullish) {
  3663. borderColor = NEON_GREEN;
  3664. textColor = NEON_GREEN;
  3665. barColor = NEON_GREEN;
  3666. dirSymbol = "▲";
  3667. } else if(isBearish) {
  3668. borderColor = NEON_RED;
  3669. textColor = NEON_RED;
  3670. barColor = NEON_RED;
  3671. dirSymbol = "▼";
  3672. } else {
  3673. borderColor = NEON_PINK;
  3674. textColor = NEON_PINK;
  3675. barColor = NEON_PINK;
  3676. dirSymbol = "●";
  3677. }
  3678.  
  3679. Bx("c_reason", ncpX, ncpY, ncpW, ncpH, BG_DARK2, borderColor);
  3680. Tx("c_reason_l", ncpX+10, ncpY+4, "NCP ANALYSIS", NEON_CYAN, 10, true);
  3681.  
  3682. string patternLine = dirSymbol + " " + patternName + " [" + IntegerToString(strengthPct) + "%]";
  3683. Tx("c_reason_p", ncpX+10, ncpY+22, patternLine, textColor, 12, true);
  3684.  
  3685. int barMaxWidth = ncpW - 24;
  3686. int barWidth = (int)(strengthPct / 100.0 * barMaxWidth);
  3687. if(barWidth < 2) barWidth = 2;
  3688. if(barWidth > barMaxWidth) barWidth = barMaxWidth;
  3689.  
  3690. Bx("c_reason_bar_bg", ncpX+10, ncpY+44, barMaxWidth, 8, BG_DARK4, BG_DARK4);
  3691. Bx("c_reason_bar_fill", ncpX+10, ncpY+44, barWidth, 8, barColor, barColor);
  3692.  
  3693. string strengthText = "";
  3694. if(strengthPct >= 70) strengthText = "STRONG";
  3695. else if(strengthPct >= 45) strengthText = "MEDIUM";
  3696. else if(strengthPct >= 20) strengthText = "WEAK";
  3697. else strengthText = "NONE";
  3698. Tx("c_reason_strength", ncpX+10, ncpY+62, "Str: " + strengthText, textColor, 9, false);
  3699.  
  3700. double adx = g_ncpADX;
  3701. double pDI = g_ncpPlusDI;
  3702. double mDI = g_ncpMinusDI;
  3703. string dirStr = (pDI > mDI) ? "DI+:BULL" : "DI-:BEAR";
  3704. color adxColor = GetADXColor(adx, pDI, mDI);
  3705. Tx("c_reason_r", ncpX+10, ncpY+82, "ADX:" + DoubleToString(adx,0) + " " + dirStr, adxColor, 11, false);
  3706.  
  3707. string revReason = DetectSuddenReversal();
  3708. color revColor = CGR;
  3709. if(StringFind(revReason, "BULL") >= 0) revColor = NEON_GREEN;
  3710. if(StringFind(revReason, "BEAR") >= 0) revColor = NEON_RED;
  3711. Tx("c_reason_v", ncpX+10, ncpY+102, (StringLen(revReason) > 0 ? "REV: "+revReason : "NO REVERSAL"), revColor, 10, false);
  3712.  
  3713. yy += ncpH + G;
  3714.  
  3715. // BB Row
  3716. if(ENABLE_BB_PULLBACK) {
  3717. int bbRowH = 52;
  3718. color bbRowBorder = (g_bbSignal == "CALL") ? NEON_GREEN : (g_bbSignal == "PUT") ? NEON_RED : BB_GREY;
  3719. Bx("c_bb_row", cx, yy, W-2*G, bbRowH, BG_DARK3, bbRowBorder);
  3720.  
  3721. string ha30Str = IsM30HABull() ? "BULL" : (IsM30HABear() ? "BEAR" : "DOJI");
  3722. color ha30C2 = IsM30HABull() ? NEON_GREEN : (IsM30HABear() ? NEON_RED : NEON_YELLOW);
  3723. double adxD = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  3724. double rsiD = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  3725.  
  3726. Tx("c_bb_row_l", cx+10, yy+4, "BB("+IntegerToString(BB_PERIOD)+") PULLBACK", BB_GREY, 9, true);
  3727. Tx("c_bb_ha2", cx+190, yy+4, "HA30:"+ha30Str, ha30C2, 9, true);
  3728. Tx("c_bb_adx", cx+310, yy+4, "ADX:"+DoubleToString(adxD,0), (adxD>=20) ? NEON_LIME : CGR, 9, false);
  3729. Tx("c_bb_rsi", cx+390, yy+4, "RSI:"+DoubleToString(rsiD,0), (rsiD>=70 || rsiD<=30) ? NEON_RED : CGR, 9, false);
  3730.  
  3731. if(g_bbSignal != "--") {
  3732. string sigTxt = "BB "+g_bbSignal+" | "+g_bbDetail;
  3733. if(StringLen(sigTxt) > 60) sigTxt = StringSubstr(sigTxt, 0, 58) + "..";
  3734. Tx("c_bb_sig2", cx+10, yy+22, sigTxt, g_bbColor, 10, true);
  3735. } else {
  3736. Tx("c_bb_sig2", cx+10, yy+22, "Waiting for BB touch + 2+ confirmations...", CGR, 9, false);
  3737. }
  3738. yy += bbRowH + G;
  3739. }
  3740.  
  3741.  
  3742.  
  3743.  
  3744.  
  3745. // BOTTOM FILTER STATUS
  3746. 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;
  3747. Bx("c_filter",cx,yy,fsW,22,BG_DARK3,fsC);Tx("c_filter_v",cx+10,yy+4,"FILTER: "+g_filterStatus,fsC,11,true);
  3748. HideSPM();ChartRedraw();
  3749. }
  3750.  
  3751. 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);}
  3752.  
  3753. 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";}}}
  3754.  
  3755. void FinalSignalEngine(double brain,int cp,int mts){
  3756. g_filterStatus="ALL CLEAR";
  3757. 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;}
  3758. 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;}
  3759. 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;}
  3760. 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;}
  3761. 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;}}
  3762. 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;}
  3763. bool reverseSignal=(g_accuracy<45.0&&g_acc_total>20);if(reverseSignal)g_filterStatus="REVERSE MODE";
  3764. string ms=DetectMyStrategy();
  3765. 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;}
  3766. 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";
  3767. 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";}
  3768. 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;}
  3769. if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT")g_signalTime=TimeCurrent();
  3770. 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;
  3771. }
  3772.  
  3773. 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);}
  3774.  
  3775. void BroadcastSignal(){
  3776. string fn="OTC_Signals_Master.txt",pair=Symbol();
  3777. int exp=(int)(TimeCurrent()+65);int now=(int)TimeCurrent();
  3778. string content="";
  3779.  
  3780. int h=FileOpen(fn,FILE_READ|FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);
  3781. if(h==INVALID_HANDLE){h=FileOpen(fn,FILE_READ|FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);if(h==INVALID_HANDLE)return;}
  3782. while(!FileIsEnding(h)){string ex=FileReadString(h);if(StringLen(ex)>10&&StringFind(ex,pair+"|")!=0)content+=ex+"\n";}
  3783.  
  3784. // 1. Normal Pattern Signal
  3785. double conf1=MathMax(g_frozen_gProb,g_frozen_rProb);
  3786. if(conf1>=55){
  3787. string sig1=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
  3788. content=pair+"|"+sig1+"|"+DoubleToString(conf1,0)+"|"+IntegerToString(now)+"|"+IntegerToString(exp)+"\n"+content;
  3789. }
  3790.  
  3791. // 2. NEXT CANDLE PREDICTOR SIGNAL (New Code)
  3792. if(g_otpSignal != "WAIT" && g_otpSignal != "" && g_otpConf >= 60){
  3793. string sig2 = (StringFind(g_otpSignal, "PUT") >= 0) ? "OTP_PUT" : "OTP_CALL";
  3794. content=pair+"|"+sig2+"|"+DoubleToString(g_otpConf,0)+"|"+IntegerToString(now)+"|"+IntegerToString(exp)+"\n"+content;
  3795. }
  3796.  
  3797. FileSeek(h,0,SEEK_SET);FileWriteString(h,content);FileFlush(h);FileClose(h);
  3798. }
  3799.  
  3800. 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);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;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);}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(!haM1Bull&&!haM5Bull)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&&!haM1Bull){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&&!haM5Bull){score+=15;det+="HA5+";}if(bullDir){if(rsi<30){score+=20;det+="RSI_OS ";}else if(rsi<40){score+=14;det+="RSI_low ";}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{score+=2;det+="RSI_lo ";}}if(volRatio>=2.0){score+=15;det+="VOL_HI ";}else if(volRatio>=1.5){score+=10;det+="VOL_MD ";}int streak=(bullDir)?bullStreak:bearStreak;if(streak>=3){score+=15;det+="STK"+IntegerToString(streak);}else if(streak>=2){score+=10;det+="STK"+IntegerToString(streak);}if(spread<=3)score+=10;else if(spread<=6)score+=6;outSig=bullDir?"CALL":"PUT";outDetail=det;return MathMin(100,score);}
  3801.  
  3802. // FIX: Corrected undeclared 'cur' variable
  3803. void ScanSignals(){
  3804. g_pairCount=0;
  3805. string fn="OTC_Signals_Master.txt";
  3806. string cur=Symbol(); // FIX: Added string type
  3807. int h=FileOpen(fn,FILE_READ|FILE_TXT|FILE_SHARE_READ);
  3808. if(h==INVALID_HANDLE)return;
  3809. datetime now=TimeCurrent();
  3810. string tmpNames[8];string tmpSigs[8];double tmpConfs[8];int tmpScores[8];string tmpDetails[8];int tmpCount=0;
  3811. while(!FileIsEnding(h)&&tmpCount<8){
  3812. string ln=FileReadString(h);if(StringLen(ln)<15)continue;
  3813. int p1=StringFind(ln,"|"),p2=StringFind(ln,"|",p1+1),p3=StringFind(ln,"|",p2+1),p4=StringFind(ln,"|",p3+1);
  3814. if(p1<0||p2<0||p3<0||p4<0)continue;
  3815. string pair=StringSubstr(ln,0,p1);if(pair==cur)continue;
  3816. string sig=StringSubstr(ln,p1+1,p2-p1-1);
  3817. double conf=StringToDouble(StringSubstr(ln,p2+1,p3-p2-1));
  3818. int expTime=(int)StringToInteger(StringSubstr(ln,p4+1));
  3819. if(expTime<(int)(now-20)) continue;
  3820.  
  3821. // --- OTP SIGNAL HANDLER ---
  3822. bool isOtp = (StringFind(sig, "OTP_") == 0);
  3823. string pureSig = sig;
  3824. if(isOtp) {
  3825. pureSig = StringSubstr(sig, 4);
  3826. if(conf < 60) continue;
  3827. } else {
  3828. if(conf < 60) continue;
  3829. }
  3830.  
  3831. string qSig="WAIT",qDetail="";int qScore=CalcPairQuality(pair,qSig,qDetail);
  3832.  
  3833. if(isOtp) {
  3834. qScore = (int)conf;
  3835. sig = pureSig;
  3836. } else {
  3837. if(qSig!=pureSig) continue;
  3838. if(qScore<45) continue;
  3839. }
  3840.  
  3841. tmpNames[tmpCount]=pair;tmpSigs[tmpCount]=sig;tmpConfs[tmpCount]=conf;tmpScores[tmpCount]=qScore;tmpDetails[tmpCount]=qDetail;tmpCount++;
  3842. }
  3843. FileClose(h);
  3844. 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;}}}
  3845. 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];}
  3846. string curPred=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";int sameDir=0;double boostTotal=0;
  3847. for(int i=0;i<g_pairCount;i++){if(g_pairSigs[i]==curPred&&tmpScores[i]>=60){sameDir++;boostTotal+=tmpScores[i];}}
  3848. 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)+"%";}
  3849. }
  3850.  
  3851. 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]+ps*2;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_TIME,tPos);ObjectSetDouble(0,nm,OBJPROP_PRICE,pPos);ObjectSetText(nm,t,11,"Arial Bold",NEON_YELLOW);}
  3852.  
  3853. // ============================================================
  3854. // EVENT HANDLERS
  3855. // ============================================================
  3856. int OnInit(){
  3857. InitNW();NuclearDeleteAll();
  3858. g_hrn_price=0;g_hrn_brk_bars=0;g_hrn_scan_bar=0;g_hrn_score=0;g_hrn_confirmed_break=false;
  3859. g_nearest_res=0;g_nearest_sup=0;g_rj_cnt=0;g_pairCount=0;
  3860. g_marketMode="RANGE";g_prevMode="";g_last_freeze_bar=0;g_lastNotified="";
  3861. g_accuracy=ValidateHistoricalAccuracy();g_acc_correct=0;g_acc_total=0;g_acc_lastBar=0;
  3862. g_lastPredGreen=50.0;g_lastPredBar=0;g_lossStreak=0;g_tradingStopped=false;
  3863. g_strategyType="NONE";g_frozen_gProb=50;g_frozen_rProb=50;g_calc_gProb=50;g_calc_rProb=50;
  3864. g_commonCount=0;g_wickLineCount=0;g_tfa_detail="";g_htfLevelCount=0;g_mtfConfirmed=true;
  3865. g_filterStatus="ALL CLEAR";g_symbolKey="";g_brokerBias=0.0;
  3866. g_bbSignal="--";g_bbColor=NEON_YELLOW;g_bbTouchPrice=0.0;g_bbSignalTime=0;g_bbSignalBars=0;g_bbDetail="";g_bbLineCount=0;
  3867. 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;
  3868. g_smoothCallScore=50.0;g_smoothPutScore=50.0;g_callWeight=1.0;g_putWeight=1.0;
  3869. g_totalTrades=0;g_callTrades=0;g_putTrades=0;g_callWins=0;g_putWins=0;
  3870. g_ncpLastSignalTime=0;g_ncpLastSignalType="";g_ncpLastEntryPrice=0.0;g_ncpSignalProcessed=true;
  3871. g_ncpTrend.m15Direction="FLAT";g_ncpTrend.m15Strength=0;g_ncpTrend.aligned=false;
  3872. g_ncpSRCount=0;g_ncpDetailLine1="";g_ncpDetailLine2="";g_ncpDetailLine3="";
  3873. g_ncpPatternBullScore=0;g_ncpPatternBearScore=0;g_ncpMainPattern="";
  3874. g_stableResCount=0;g_stableSupCount=0;g_lastSRScan=0;
  3875. g_ha30_open=0;g_ha30_close=0;g_ha30_high=0;g_ha30_low=0;g_ha30_bar=0;
  3876. g_rsc=0; g_psycheScore=0; g_psycheDir="NONE"; g_psycheSignal="SCANNING"; g_psycheClr=CGR;
  3877.  
  3878. // OTC FIB v3.0 INIT
  3879. g_otcFibPrice = 0;
  3880. g_otcFibDir = "WAIT";
  3881. g_otcFibStrength = 0;
  3882. g_otcFibPattern = "--";
  3883. g_otcFibLevel = "--";
  3884. g_otcFibSignalTime = 0;
  3885. g_otcHasSignal = false;
  3886. DeleteOTCFibLine();
  3887.  
  3888. QuantumLoadLearning();
  3889. Print("Quantum v9.1 PRO | Weights loaded | TotalTrades:", g_qTotalTrades);
  3890.  
  3891. if(ENABLE_LEARNING)LoadBrainMemory();LoadMLWeights();EventSetTimer(1);
  3892. Print("===========================================");
  3893. Print("AIBRAIN v46.3 - NCP PRO v8.0 (ALL ERRORS FIXED)");
  3894. Print("Added: PSYCHE BREAKER v3.0 Cube");
  3895. Print("Replaced: MTF ANALYSIS with PSYCHE BREAKER");
  3896. Print("===========================================");
  3897. return INIT_SUCCEEDED;
  3898. }
  3899.  
  3900.  
  3901.  
  3902.  
  3903.  
  3904.  
  3905. // ============================================================
  3906. // BACKGROUND PAIRS NEXT CANDLE CHECKER
  3907. // ============================================================
  3908. void CheckBackgroundNextCandleSignals(){
  3909. g_bgOtpCount = 0;
  3910. if(g_pairCount == 0) return;
  3911.  
  3912. for(int i=0; i<g_pairCount && i<8; i++){
  3913. string pair = g_pairNames[i];
  3914. if(pair == Symbol()) continue;
  3915.  
  3916. // ✅ FIX: PERIOD_M1 parameter add kiya sabhi functions mein
  3917. double o1 = iOpen(pair, PERIOD_M1, 1);
  3918. double c1 = iClose(pair, PERIOD_M1, 1);
  3919. double h1 = iHigh(pair, PERIOD_M1, 1);
  3920. double l1 = iLow(pair, PERIOD_M1, 1);
  3921.  
  3922. double o2 = iOpen(pair, PERIOD_M1, 2);
  3923. double c2 = iClose(pair, PERIOD_M1, 2);
  3924. double o3 = iOpen(pair, PERIOD_M1, 3);
  3925. double c3 = iClose(pair, PERIOD_M1, 3);
  3926.  
  3927. if(o1==0 || c1==0 || o2==0 || c3==0) continue;
  3928.  
  3929. // ✅ FIX: iRSI mein bhi PERIOD_M1 confirm
  3930. double rsi = iRSI(pair, PERIOD_M1, 14, PRICE_CLOSE, 1);
  3931. int score = 0;
  3932.  
  3933. double rng = h1 - l1;
  3934. if(rng > 0){
  3935. double uw = (h1 - MathMax(o1, c1)) / rng;
  3936. double lw = (MathMin(o1, c1) - l1) / rng;
  3937. if(uw > 0.65) score -= 15;
  3938. if(lw > 0.65) score += 15;
  3939. }
  3940.  
  3941. double body = MathAbs(c1 - o1), pBody = MathAbs(c2 - o2);
  3942. bool bull = (c1 > o1), bear = (c1 < o1);
  3943.  
  3944. if(bull && pBody < body && c1 >= o2 && o1 <= c2) score += 25;
  3945. if(bear && pBody < body && c1 <= o2 && o1 >= c2) score -= 25;
  3946.  
  3947. if(rng > 0 && (MathMin(o1,c1)-l1)/rng > 0.60 && body < rng*0.30 && bear) score += 20;
  3948. if(rng > 0 && (h1-MathMax(o1,c1))/rng > 0.60 && body < rng*0.30 && bull) score -= 20;
  3949.  
  3950. if(rsi < 30) score += 20; else if(rsi < 40) score += 10;
  3951. else if(rsi > 70) score -= 20; else if(rsi > 60) score -= 10;
  3952.  
  3953. if(c1>o1 && c2>o2 && c3>o3) score -= 10;
  3954. if(c1<o1 && c2<o2 && c3<o3) score += 10;
  3955.  
  3956. // ✅ FIXED LOGIC (MathAbs use kiya)
  3957. double absScore = MathAbs(score);
  3958. double conf = MathMax(5.0, MathMin(95.0, 50.0 + absScore));
  3959. string sig = "WAIT";
  3960.  
  3961. if(conf >= 72) sig = (score > 0) ? "CALL" : "PUT";
  3962. else if(conf >= 60) sig = (score > 0) ? "WEAK CALL" : "WEAK PUT";
  3963.  
  3964. if(sig != "WAIT"){
  3965. string sp = pair;
  3966. if(StringLen(sp) > 9) sp = StringSubstr(sp, 0, 9);
  3967. g_bgOtpSignal[g_bgOtpCount] = "* " + sp + " " + sig + " " + DoubleToString((int)conf, 0) + "%";
  3968. g_bgOtpCount++;
  3969. }
  3970. }
  3971. }
  3972.  
  3973.  
  3974.  
  3975. // ============================================================
  3976. // CHART CLEANER & DYNAMIC S/R SHIFT ENGINE
  3977. // ============================================================
  3978. void CleanChartAndShiftSR(){
  3979. // 1. REMOVE BLUE ZONE LINES (CALL ZONE / PUT ZONE)
  3980. for(int i = ObjectsTotal() - 1; i >= 0; i--){
  3981. string nm = ObjectName(i);
  3982. if(StringFind(nm, "CALL ZONE") >= 0 || StringFind(nm, "PUT ZONE") >= 0){
  3983. ObjectDelete(0, nm);
  3984. }
  3985. }
  3986.  
  3987. // 2. HIDE OLD S/R LINES (Keep only current top 2, but don't delete for background math)
  3988. int hiddenCount = 0;
  3989. for(int i = ObjectsTotal() - 1; i >= 0; i--){
  3990. string nm = ObjectName(i);
  3991. // Jo lines PFX (AIB9_) se start nahi hoti, unhe hide karo
  3992. if(StringFind(nm, PFX) < 0){
  3993. int objType = (int)ObjectGetInteger(0, nm, OBJPROP_TYPE);
  3994. if(objType == OBJ_HLINE){
  3995. if(hiddenCount > 4){ // Purani lines hide kar do
  3996. ObjectSetInteger(0, nm, OBJPROP_COLOR, clrNONE);
  3997. }
  3998. hiddenCount++;
  3999. }
  4000. }
  4001. }
  4002.  
  4003. // 3. DYNAMIC 1-MINUTE S/R SHIFT LOGIC (Ek Line Upar Neeche)
  4004. if(Bars < 10) return;
  4005.  
  4006. // Check all non-indicator HLines for closest match
  4007. double closestSR = 0;
  4008. bool isRes = false;
  4009. double minDist = 999999;
  4010.  
  4011. for(int i = ObjectsTotal() - 1; i >= 0; i--){
  4012. string nm = ObjectName(i);
  4013. if(StringFind(nm, PFX) >= 0) continue; // Apne indicator ke lines chhod do
  4014.  
  4015. int objType = (int)ObjectGetInteger(0, nm, OBJPROP_TYPE);
  4016. if(objType == OBJ_HLINE){
  4017. double linePrice = ObjectGetDouble(0, nm, OBJPROP_PRICE);
  4018. if(linePrice <= 0) continue;
  4019.  
  4020. bool jpy = (StringFind(Symbol(), "JPY") >= 0);
  4021. double pip = jpy ? 0.01 : 0.0001;
  4022. double dist = MathAbs(Close[0] - linePrice) / pip;
  4023.  
  4024. // Sabse paas wali line dhundho (15 pips ke andar)
  4025. if(dist < minDist && dist < 15){
  4026. minDist = dist;
  4027. closestSR = linePrice;
  4028. isRes = (linePrice > Close[0]); // Agar upar hai toh Resistance
  4029. }
  4030. }
  4031. }
  4032.  
  4033. // Agar koi line mile toh usko shift karo (Sirf ek line ko target banao)
  4034. if(closestSR > 0){
  4035. string shiftLineName = "DYN_SHIFT_SR";
  4036. SafeDel(shiftLineName);
  4037.  
  4038. // Agar candle Green hai toh line ko Resistance maan lo
  4039. // Agar candle Red hai toh line ko Support maan lo
  4040. bool treatAsRes = (Close[0] > Open[0]) ? true : isRes;
  4041.  
  4042. color shiftColor = treatAsRes ? C'255,80,80' : C'80,255,80'; // Faint Red/Green
  4043. ObjectCreate(0, shiftLineName, OBJ_HLINE, 0, 0, closestSR);
  4044. ObjectSetInteger(0, shiftLineName, OBJPROP_COLOR, shiftColor);
  4045. ObjectSetInteger(0, shiftLineName, OBJPROP_WIDTH, 2);
  4046. ObjectSetInteger(0, shiftLineName, OBJPROP_STYLE, STYLE_SOLID);
  4047. ObjectSetInteger(0, shiftLineName, OBJPROP_BACK, false);
  4048.  
  4049. // Label lagao (Premium Style - Bada aur Chamakdaar)
  4050. string lblName = "DYN_SHIFT_SR_LBL";
  4051. SafeDel(lblName);
  4052. string lblText = treatAsRes ? "RES" : "SUP";
  4053. if(Bars > 3){
  4054. ObjectCreate(0, lblName, OBJ_TEXT, 0, Time[3], closestSR);
  4055. color dynLabelColor = C'255,50,255'; // Neon Magenta (Aankhon mein padne wala chamak!)
  4056. ObjectSetText(lblName, lblText, 11, "Arial Bold", dynLabelColor);
  4057. ObjectSetInteger(0, lblName, OBJPROP_BACK, false);
  4058. }
  4059. }
  4060. }
  4061.  
  4062.  
  4063.  
  4064.  
  4065. void OnDeinit(const int r){EventKillTimer();Comment("");for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);if(StringFind(nm,PFX)==0)ObjectDelete(nm);}}
  4066.  
  4067.  
  4068.  
  4069. void OnTimer(){
  4070. if(Bars<50)return;
  4071.  
  4072. CalcVisualTrapPro();CalcHA();UpdateHRN();UpdateStableM5SR();DetectCommonPoints();
  4073. DrawCommonPoints();
  4074. if(ENABLE_BB_PULLBACK)DetectBBPullback();
  4075. if(ENABLE_MTG)CalculateMTG();
  4076. CalculateQuantumEngine();
  4077. QuantumCheckResult();
  4078. CleanChartAndShiftSR();
  4079. int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
  4080. double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
  4081.  
  4082. CalcFibRejectionHunter();
  4083.  
  4084. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  4085. ScanSignals();CheckBackgroundNextCandleSignals();FinalSignalEngine(brain,cp,mts);BroadcastSignal();UpdateTimer();Draw();
  4086.  
  4087. DrawFibRejectionLine();
  4088. }
  4089.  
  4090.  
  4091.  
  4092.  
  4093.  
  4094.  
  4095. 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);}
  4096. //+------------------------------------------------------------------+