New paste
Recent API Trending Blog
Guest
 
dumpykhan970

Untitled 1364

dumpykhan970
Apr 16th, 2026
10
0
Never
Not a member of GistPad yet? Sign Up, it unlocks many cool features!
None 205.71 KB | None | 0 0
copy raw download clone embed print report
  1. //+------------------------------------------------------------------+
  2. //| AIBRAIN OTC v45.1 - CROWD WEIGHTED + CORRELATION BOOST |
  3. //| Fixed: Crowd exponential weighting, Other pairs correlation |
  4. //+------------------------------------------------------------------+
  5. #property copyright "AIBRAIN ULTIMATE - KM RANA"
  6. #property version "45.1"
  7. #property strict
  8. #property indicator_chart_window
  9. #define Alert(x)
  10. #define PFX "AIB9_"
  11. #define VER "v45.1 FINAL"
  12. #define LB 18
  13. #define MAX_LEVELS 5
  14. #define MAX_REJ 50
  15. #define LOOKBACK 50
  16.  
  17. input string SPM_FILE = "KM RANA";
  18. input int HOLD_SEC = 60;
  19. input int POS_X = 4;
  20. input int POS_Y = 20;
  21. input int DASH_W = 660;
  22. input bool SHOW_TIMER = true;
  23. input bool SHOW_SR_LINES = true;
  24. input string ENTRY_MODE = "TIME";
  25. input int FLAG_MIN_SEC = 10;
  26. input int FLAG_MAX_SEC = 35;
  27. input int TIME_MIN_SEC = 10;
  28. input int TIME_MAX_SEC = 35;
  29. input int MIN_REMAINING_SEC = 15;
  30. input double REVERSAL_PCT = 30.0;
  31. input double WICK_PCT = 0.65;
  32. input int HRN_CONFIRM_BARS = 2;
  33. input bool HA_ALIGN_FILTER = false;
  34. input bool CONSENSUS_FILTER = false;
  35. input bool ENABLE_NOTIFY = true;
  36. input bool FAST_MODE = false;
  37. input int BROKER_SPREAD_THRESHOLD= 6;
  38. input double OTC_TRAP_WEIGHT = 15.0;
  39. input int CROWD_EXTREME_PCT = 70;
  40. input bool ENABLE_BROKER_KILLER = true;
  41. input bool ENABLE_SESSION_FILTER = true;
  42. input bool ENABLE_SPIKE_FILTER = true;
  43. input bool ENABLE_LAST_SEC_BLOCK = true;
  44. input bool ENABLE_RISK_CONTROL = true;
  45. input bool ENABLE_ENTRY_ZONE = true;
  46. input bool ML_ADAPTIVE = true;
  47. input bool VOLUME_PROFILE_TRAP = true;
  48. input bool MTF_CONFIRM = false;
  49. input bool ENABLE_TELEGRAM = false;
  50. input string TELEGRAM_TOKEN = "";
  51. input string TELEGRAM_CHAT_ID = "";
  52. input string TRADE_MODE = "NORMAL";
  53. input string STRATEGY_MODE = "TRAP_ONLY";
  54. input int STRATEGY_THRESHOLD = 75;
  55. input int MAX_LOSS_STREAK = 2;
  56. input double MIN_CONFIDENCE = 75.0;
  57. input bool ENABLE_RISK_LOCK = true;
  58. input double PATTERN_TOLERANCE_PIPS = 8.0;
  59. input int MIN_PATTERN_SEPARATION = 5;
  60. input bool SHOW_COMMON_POINTS = true;
  61. input double COMMON_POINT_TOL_PIPS = 15.0;
  62. input bool SHOW_WICK_REJECT_LINES = true;
  63. input int WICK_MIN_TOUCHES = 1;
  64. input double WICK_ZONE_PIPS = 15.0;
  65. input int WICK_EXPIRE_BARS = 60;
  66.  
  67. #define NEON_GREEN C'0,255,100'
  68. #define NEON_RED C'255,40,80'
  69. #define NEON_YELLOW C'255,220,0'
  70. #define NEON_ORANGE C'255,120,0'
  71. #define NEON_CYAN C'0,255,200'
  72. #define NEON_PURPLE C'200,0,255'
  73. #define NEON_PINK C'255,80,180'
  74. #define NEON_BLUE C'0,200,255'
  75. #define NEON_LIME C'80,255,80'
  76. #define NEON_GOLD C'255,180,0'
  77. #define DARK_BLUE_NEON C'0,100,255'
  78. #define NEON_WHITE C'220,230,255'
  79. #define CGR C'160,170,190'
  80. #define BG_DARK1 C'6,8,16'
  81. #define BG_DARK2 C'10,14,24'
  82. #define BG_DARK3 C'14,20,32'
  83. #define BG_DARK4 C'18,26,40'
  84.  
  85. struct HTFLevel{ double price; string timeframe; string type; datetime time; int strength; bool isRoundNumber; };
  86.  
  87. //+------------------------------------------------------------------+
  88. // GLOBAL VARIABLES
  89. //+------------------------------------------------------------------+
  90. string g_haM1="",g_haM5="",g_haBoth="";
  91. color g_haM1Color=clrGray,g_haM5Color=clrGray;
  92. static string st_sig="WAIT",st_cdl="WAIT";
  93. static double st_pct=50;
  94. static datetime st_t=0;
  95. static double NW[36];
  96. static double g_rsc=0,g_tfa=3;
  97. static datetime g_spm_t=0,g_last_bar=0;
  98. double ResLevels[MAX_LEVELS],SupLevels[MAX_LEVELS];
  99. int resCount=0,supCount=0;
  100. datetime lastSRBar=0;
  101. static double g_nearest_res=0,g_nearest_sup=0;
  102. static string g_brk_str="NO BRK";
  103. static color g_brk_color=CGR;
  104. struct RejLevel{double price;int touches;};
  105. static RejLevel g_rj[MAX_REJ];
  106. static int g_rj_cnt=0;
  107.  
  108. // ===== NEW HRN SYSTEM =====
  109. static double g_hrn_price=0;
  110. static bool g_hrn_is_sup=true;
  111. static int g_hrn_brk_bars=0;
  112. static datetime g_hrn_scan_bar=0;
  113. static string g_hrn_str="--";
  114. static double g_hrn_score=0;
  115. static bool g_hrn_confirmed_break=false;
  116.  
  117. static string g_otcCallPct=50,g_otcPutPct=50;
  118. static string g_pairNames[8],g_pairSigs[8]; // increased to 8
  119. static double g_pairConfs[8];
  120. static int g_pairCount=0;
  121. static string g_copiedPair="";
  122. static string g_adv1="WAIT KAR",g_adv2="Signals mix",g_adv3="";
  123. static color g_advC=NEON_YELLOW;
  124. static double g_frozen_gProb=50,g_frozen_rProb=50;
  125. static string g_frozen_pAction="UNCERTAIN";
  126. static color g_frozen_pColor=NEON_YELLOW;
  127. static double g_calc_gProb=50,g_calc_rProb=50;
  128. static string g_calc_pAction="UNCERTAIN";
  129. static color g_calc_pColor=NEON_YELLOW;
  130. static double g_gProb=50,g_rProb=50;
  131. static string g_pAction="UNCERTAIN";
  132. static color g_pColor=NEON_YELLOW;
  133. static datetime g_last_freeze_bar=0;
  134. static double g_accuracy=65.0;
  135. static int g_acc_correct=0,g_acc_total=0;
  136. static datetime g_acc_lastBar=0;
  137. static double g_lastPredGreen=50.0;
  138. static datetime g_lastPredBar=0;
  139. static datetime g_lastLogBar=0;
  140. static string g_finalSignal="WAIT";
  141. static color g_finalColor=NEON_YELLOW;
  142. static datetime g_signalTime=0;
  143. static string g_lastNotified="";
  144. static string g_marketMode="RANGE",g_prevMode="";
  145. static int g_lossStreak=0;
  146. static bool g_tradingStopped=false;
  147. static datetime g_stopStartTime=0;
  148. static double g_brokerBias=0.0;
  149. static string g_symbolKey="";
  150. static string g_strategyType="NONE";
  151. static string g_strategySignal="WAIT";
  152. static string g_strategyReason="";
  153. static double qmrA=0,qmrB=0,qmrC=0,qmrD=0;
  154. static datetime qmrTA=0,qmrTB=0,qmrTC=0,qmrTD=0;
  155. static bool qmrActive=false;
  156. static datetime qmrExpire=0;
  157. #define MAX_COMMON_PTS 5
  158. static double g_commonPrice[MAX_COMMON_PTS];
  159. static datetime g_commonTime[MAX_COMMON_PTS];
  160. static int g_commonCount=0;
  161. static datetime g_commonExpire[MAX_COMMON_PTS];
  162. static string g_commonType[MAX_COMMON_PTS];
  163. static datetime g_lastCommonScan=0;
  164. #define MAX_WICK_LINES 5
  165. static double g_wickLinePrice[MAX_WICK_LINES];
  166. static int g_wickLineTouches[MAX_WICK_LINES];
  167. static datetime g_wickLineExpire[MAX_WICK_LINES];
  168. static int g_wickLineCount=0;
  169. static datetime g_lastWickScan=0;
  170. static bool g_isSideways=false;
  171. static string g_tfa_detail="";
  172. static HTFLevel g_htfLevels[50];
  173. static int g_htfLevelCount=0;
  174. static datetime g_lastLevelScan=0;
  175. static bool g_mtfConfirmed=true;
  176. static string g_filterStatus="ALL CLEAR";
  177.  
  178. //+------------------------------------------------------------------+
  179. // HA CANDLE CALCULATION (unchanged)
  180. //+------------------------------------------------------------------+
  181. void CalcHA(){
  182. if(Bars<10) return;
  183. ArraySetAsSeries(Open,true); ArraySetAsSeries(High,true); ArraySetAsSeries(Low,true); ArraySetAsSeries(Close,true);
  184. static double haO1[500],haC1[500]; static datetime lb1=0;
  185. ArraySetAsSeries(haO1,true); ArraySetAsSeries(haC1,true);
  186. datetime c1=iTime(NULL,PERIOD_M1,0);
  187. if(c1!=lb1){ lb1=c1; int lim=MathMin(iBars(NULL,PERIOD_M1),500);
  188. for(int i=lim-1;i>=0;i--){ haC1[i]=(Open[i]+High[i]+Low[i]+Close[i])/4.0;
  189. if(i==lim-1) haO1[i]=(Open[i]+Close[i])/2.0; else haO1[i]=(haO1[i+1]+haC1[i+1])/2.0; }}
  190. double d1=MathAbs(haC1[1]-haO1[1]),r1=High[1]-Low[1];
  191. bool dz=(r1>0&&d1<r1*0.1),b1=(!dz&&haC1[1]>haO1[1]),be1=(!dz&&haC1[1]<haO1[1]);
  192. if(b1){g_haM1="HA BULLISH 1";g_haM1Color=clrLime;}
  193. else if(be1){g_haM1="HA BEARISH 1";g_haM1Color=clrRed;}
  194. else{g_haM1="HA DOJI 1";g_haM1Color=clrYellow;}
  195.  
  196. if(iBars(NULL,PERIOD_M5)>=10){
  197. static double haO5[200],haC5[200]; static datetime lb5=0;
  198. ArraySetAsSeries(haO5,true); ArraySetAsSeries(haC5,true);
  199. datetime c5=iTime(NULL,PERIOD_M5,0);
  200. if(c5!=lb5){ lb5=c5; int lim=MathMin(iBars(NULL,PERIOD_M5),200);
  201. for(int i=lim-1;i>=0;i--){ double o=iOpen(NULL,PERIOD_M5,i),h=iHigh(NULL,PERIOD_M5,i),l=iLow(NULL,PERIOD_M5,i),c=iClose(NULL,PERIOD_M5,i);
  202. haC5[i]=(o+h+l+c)/4.0; if(i==lim-1) haO5[i]=(o+c)/2.0; else haO5[i]=(haO5[i+1]+haC5[i+1])/2.0; }}
  203. double d5=MathAbs(haC5[1]-haO5[1]),r5=iHigh(NULL,PERIOD_M5,1)-iLow(NULL,PERIOD_M5,1);
  204. bool dz5=(r5>0&&d5<r5*0.1),b5=(!dz5&&haC5[1]>haO5[1]),be5=(!dz5&&haC5[1]<haO5[1]);
  205. if(b5){g_haM5="HA BULLISH 5";g_haM5Color=clrLime;}
  206. else if(be5){g_haM5="HA BEARISH 5";g_haM5Color=clrRed;}
  207. else{g_haM5="HA DOJI 5";g_haM5Color=clrYellow;}
  208. if(b1&&b5)g_haBoth="BOTH BULL"; else if(be1&&be5)g_haBoth="BOTH BEAR"; else g_haBoth="MIXED";
  209. }else{g_haM5="5 --";g_haM5Color=clrGray;g_haBoth="HA --";}
  210. }
  211.  
  212. //+------------------------------------------------------------------+
  213. // HELPER FUNCTIONS (unchanged)
  214. //+------------------------------------------------------------------+
  215. bool IsLineNearby(double price,double pipTol=3.0){
  216. bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=pipTol*pip;
  217. for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i);
  218. if((int)ObjectGetInteger(0,nm,OBJPROP_TYPE)==OBJ_HLINE){
  219. double lp=ObjectGetDouble(0,nm,OBJPROP_PRICE); if(MathAbs(lp-price)<tol) return true; }}
  220. return false;
  221. }
  222.  
  223. string GetCurrentSession(color &sC){
  224. int h=TimeHour(TimeGMT());
  225. if(h>=12&&h<16){sC=NEON_GOLD;return "LON+NY";}
  226. if(h>=7&&h<9){sC=NEON_CYAN;return "ASI+LON";}
  227. if(h>=7&&h<16){sC=NEON_GREEN;return "LONDON";}
  228. if(h>=12&&h<21){sC=NEON_BLUE;return "NEW YORK";}
  229. if(h>=0&&h<9){sC=NEON_ORANGE;return "ASIA";}
  230. sC=C'100,100,120'; return "SYDNEY";
  231. }
  232.  
  233. bool IsSessionActive(){int h=TimeHour(TimeGMT());return(h>=7&&h<=21);}
  234. 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);}
  235.  
  236. //+------------------------------------------------------------------+
  237. // MTF CONFIRMATION (unchanged)
  238. //+------------------------------------------------------------------+
  239. bool CheckMTFConfirmation(){
  240. if(!MTF_CONFIRM) return true;
  241. bool m1Bull=(Close[1]>Open[1]);
  242. bool m5Bull=false,m15Bull=false;
  243. if(iBars(NULL,PERIOD_M5)>=3) m5Bull=(iClose(NULL,PERIOD_M5,1)>iOpen(NULL,PERIOD_M5,1));
  244. if(iBars(NULL,PERIOD_M15)>=3) m15Bull=(iClose(NULL,PERIOD_M15,1)>iOpen(NULL,PERIOD_M15,1));
  245. int bullCount=0,bearCount=0;
  246. if(m1Bull) bullCount++; else bearCount++;
  247. if(m5Bull) bullCount++; else bearCount++;
  248. if(m15Bull) bullCount++; else bearCount++;
  249. g_mtfConfirmed=(bullCount>=2 || bearCount>=2);
  250. return g_mtfConfirmed;
  251. }
  252.  
  253. //+------------------------------------------------------------------+
  254. // CUSTOM TANH (unchanged)
  255. //+------------------------------------------------------------------+
  256. double Tanh(double x){
  257. double exp2x = MathExp(2.0 * x);
  258. return (exp2x - 1.0) / (exp2x + 1.0);
  259. }
  260.  
  261. //+------------------------------------------------------------------+
  262. // FRACTAL DIMENSION (unchanged)
  263. //+------------------------------------------------------------------+
  264. double CalcFractalDimension(int period){
  265. if(period < 2) return 1.5;
  266. double sum = 0.0;
  267. for(int i = 1; i < period; i++){
  268. double range1 = High[i] - Low[i];
  269. double range2 = High[i+1] - Low[i+1];
  270. if(range1 <= 0.0 || range2 <= 0.0) continue;
  271. sum += MathLog(range1 / range2 + 0.001) * MathLog((double)i / (double)period);
  272. }
  273. double result = 2.0 - sum / period;
  274. if(result < 1.0) result = 1.0;
  275. if(result > 2.0) result = 2.0;
  276. return result;
  277. }
  278.  
  279. //+------------------------------------------------------------------+
  280. // BROKER TRAP DETECTION (unchanged)
  281. //+------------------------------------------------------------------+
  282. double DetectBrokerTrap(int lookback){
  283. int bull = 0, bear = 0;
  284. for(int i = 1; i <= lookback; i++){
  285. if(Close[i] > Open[i]) bull++;
  286. else if(Close[i] < Open[i]) bear++;
  287. }
  288. double crowd = (bull > bear) ? (double)bull / lookback : (double)bear / lookback;
  289. double priceMove = MathAbs(Close[1] - Close[lookback]) / (Close[lookback] + 0.00001);
  290. if(crowd > 0.7 && priceMove < 0.002) return 0.9;
  291. if(crowd > 0.6 && priceMove > 0.001) return 0.5;
  292. return 0.3;
  293. }
  294.  
  295. //+------------------------------------------------------------------+
  296. // QUICK MEDIAN (unchanged)
  297. //+------------------------------------------------------------------+
  298. double QuickMedian(double &arr[], int size){
  299. double sorted[20];
  300. for(int i = 0; i < size; i++) sorted[i] = arr[i];
  301. for(int i = 0; i < size-1; i++)
  302. for(int j = i+1; j < size; j++)
  303. if(sorted[i] > sorted[j]){
  304. double tmp = sorted[i];
  305. sorted[i] = sorted[j];
  306. sorted[j] = tmp;
  307. }
  308. return (sorted[size/2] + sorted[(size-1)/2]) / 2.0;
  309. }
  310.  
  311. //+------------------------------------------------------------------+
  312. // MAIN ADVANCED TFA (unchanged)
  313. //+------------------------------------------------------------------+
  314. double CalcAdvancedTFA(string &detail){
  315. if(Bars < 30){
  316. detail = "Bars low";
  317. return 3.0;
  318. }
  319.  
  320. double score = 0;
  321. string p = "";
  322.  
  323. double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  324. double adxSc = (adx>=25)?1.0:(adx>=20)?0.6:(adx>=15)?0.3:0.1;
  325. score += adxSc;
  326. p += "ADX:" + ((adxSc>=0.6)?"+":"-") + " ";
  327.  
  328. double v1 = iVolume(NULL, PERIOD_M1, 1);
  329. double vA = 0;
  330. for(int i=2; i<=6; i++) vA += iVolume(NULL, PERIOD_M1, i);
  331. vA = (vA>0)? vA/5.0 : 1;
  332. double vr = v1 / vA;
  333. double volSc = (vr>=2.0)?1.0:(vr>=1.5)?0.7:(vr>=1.1)?0.4:0.1;
  334. score += volSc;
  335. p += "VOL:" + ((volSc>=0.5)?"+":"-") + " ";
  336.  
  337. double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  338. double rsiSc = 0.2;
  339. if(rsi>=60 || rsi<=40) rsiSc = 1.0;
  340. else if(rsi>=55 || rsi<=45) rsiSc = 0.6;
  341. else if(rsi>=50 || rsi<=50) rsiSc = 0.3;
  342. score += rsiSc;
  343. p += "RSI:" + ((rsiSc>=0.6)?"+":"-") + " ";
  344.  
  345. double atr = iATR(NULL, PERIOD_M1, 14, 1);
  346. double cs = High[1] - Low[1];
  347. double atrSc = 0.2;
  348. if(atr > 0){
  349. double r = cs / atr;
  350. if(r>=0.7 && r<=1.5) atrSc = 1.0;
  351. else if(r>=0.5 && r<=2.0) atrSc = 0.6;
  352. else atrSc = 0.3;
  353. }
  354. score += atrSc;
  355. p += "ATR:" + ((atrSc>=0.6)?"+":"-") + " ";
  356.  
  357. double body = MathAbs(Close[1] - Open[1]);
  358. double range = High[1] - Low[1];
  359. double bdySc = 0.2;
  360. if(range > 0){
  361. double br = body / range;
  362. if(br>=0.6) bdySc = 1.0;
  363. else if(br>=0.4) bdySc = 0.6;
  364. else if(br>=0.2) bdySc = 0.3;
  365. }
  366. score += bdySc;
  367. p += "BODY:" + ((bdySc>=0.6)?"+":"-") + " ";
  368.  
  369. double sesSc = IsSessionActive() ? 1.0 : 0.4;
  370. score += sesSc;
  371. p += "SES:" + ((sesSc>=0.7)?"+":"-");
  372.  
  373. double finalScore = MathMin(6.0, score);
  374. int rounded = (int)MathRound(finalScore);
  375. string scoreStr = IntegerToString(rounded) + "/6";
  376.  
  377. string dir = "MIX";
  378. if(g_haM1=="HA BULLISH 1" && g_haM5=="HA BULLISH 5") dir = "STRONG UP";
  379. else if(g_haM1=="HA BEARISH 1" && g_haM5=="HA BEARISH 5") dir = "STRONG DOWN";
  380. else if(g_haM1=="HA BULLISH 1" || g_haM5=="HA BULLISH 5") dir = "UP";
  381. else if(g_haM1=="HA BEARISH 1" || g_haM5=="HA BEARISH 5") dir = "DOWN";
  382.  
  383. detail = p + " | " + scoreStr + " " + dir;
  384. g_tfa_detail = detail;
  385.  
  386. return finalScore;
  387. }
  388.  
  389. //+------------------------------------------------------------------+
  390. // MICRO AI (unchanged)
  391. //+------------------------------------------------------------------+
  392. double CalcAdvancedMicroAI(){
  393. if(Bars<20) return 50.0; double score=50.0;
  394. for(int i=1;i<=5;i++){double r=High[i]-Low[i];if(r<=0)continue;
  395. double uw=(High[i]-MathMax(Open[i],Close[i]))/r,lw=(MathMin(Open[i],Close[i])-Low[i])/r,w=(6.0-i)/5.0;
  396. if(uw>0.60)score-=w*15; if(lw>0.60)score+=w*15;}
  397. double pos5=0; for(int i=1;i<=5;i++){double r=High[i]-Low[i];if(r<=0)continue;pos5+=(Close[i]-Low[i])/r;}
  398. score+=(pos5/5.0-0.5)*20.0;
  399. int gc=0,rc=0; for(int i=1;i<=8;i++){if(Close[i]>Open[i])gc++;else if(Close[i]<Open[i])rc++;} score+=(gc-rc)*2.5;
  400. double vl1=(double)iVolume(NULL,PERIOD_M1,1),vA=0;
  401. for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);vA/=5.0;
  402. if(vA>0){double vr=vl1/vA;if(vr>1.5&&Close[1]>Open[1])score+=8;if(vr>1.5&&Close[1]<Open[1])score-=8;}
  403. double r1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),r5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
  404. if(r1<35)score+=10;if(r1>65)score-=10;if(r1>r5&&Close[1]<Close[5])score+=6;if(r1<r5&&Close[1]>Close[5])score-=6;
  405. return MathMax(5.0,MathMin(95.0,score));
  406. }
  407.  
  408. //+------------------------------------------------------------------+
  409. // MICRO TRAP (unchanged)
  410. //+------------------------------------------------------------------+
  411. double VolumeTrapScore();
  412. int CalcAdvancedMicroTrap(){
  413. if(Bars<20)return 0;int score=0;double r=High[1]-Low[1];
  414. if(r>0){double uw=(High[1]-MathMax(Open[1],Close[1]))/r,lw=(MathMin(Open[1],Close[1])-Low[1])/r;
  415. if(uw>0.65)score+=30;else if(uw>0.50)score+=15;if(lw>0.65)score+=20;else if(lw>0.50)score+=10;}
  416. double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  417. if(v2>0&&v1/v2>2.0)score+=25;else if(v2>0&&v1/v2>1.5)score+=12;
  418. double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  419. if(rsi>78||rsi<22)score+=20;else if(rsi>72||rsi<28)score+=10;
  420. if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))score+=25;
  421. bool aG=(Close[1]>Open[1]&&Close[2]>Open[2]&&Close[3]>Open[3]),aR=(Close[1]<Open[1]&&Close[2]<Open[2]&&Close[3]<Open[3]);
  422. if(aG||aR)score+=15;
  423. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);if(sp>BROKER_SPREAD_THRESHOLD*1.5)score+=10;
  424. score+=(int)VolumeTrapScore();return MathMin(100,score);
  425. }
  426.  
  427. //+------------------------------------------------------------------+
  428. // FRACTAL (unchanged)
  429. //+------------------------------------------------------------------+
  430. double CalcAdvancedFractal(){
  431. if(Bars<15)return 0;double score=0;
  432. for(int i=2;i<=8&&i+2<Bars;i++){
  433. 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;}
  434. 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;}}
  435. 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++;}
  436. if(dj>=3)score+=25;
  437. 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;}
  438. return MathMin(100,score);
  439. }
  440.  
  441. //+------------------------------------------------------------------+
  442. // MARKET BIAS (unchanged)
  443. //+------------------------------------------------------------------+
  444. string CalcAdvancedMarketBias(color &bC,double brain,double rsc){
  445. if(Bars<30){bC=NEON_YELLOW;return "CALCULATING";}
  446. double score=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  447. double pc=Close[0]-Close[10];
  448. 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;
  449. double hh1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hh2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
  450. double ll1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],ll2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
  451. 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;
  452. double ema20=0,ema20p=0;for(int i=0;i<20;i++)ema20+=Close[i];ema20/=20;
  453. for(int i=1;i<=20&&i<Bars;i++)ema20p+=Close[i];ema20p/=20;
  454. if(ema20>ema20p)score+=3;else if(ema20<ema20p)score-=3;
  455. double ema50=0;for(int i=0;i<50&&i<Bars;i++)ema50+=Close[i];ema50/=MathMin(50,Bars);
  456. if(ema20>ema50)score+=3;else score-=3;
  457. 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++;}
  458. if(gC>=7)score+=3;else if(rC>=7)score-=3;else if(gC>=5)score+=1;else if(rC>=5)score-=1;
  459. 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");
  460. if(m1B&&m5B)score+=4;else if(m1Be&&m5Be)score-=4;else if(m1B)score+=2;else if(m1Be)score-=2;
  461. 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);
  462. if(adx>20){if(pDI>mDI+5)score+=4;else if(mDI>pDI+5)score-=4;}
  463. if(brain>3)score-=2;else if(brain<-3)score+=2;
  464. if(Close[1]>Open[1])score+=1;else if(Close[1]<Open[1])score-=1;
  465. if(rsc>2)score+=1;else if(rsc<-2)score-=1;
  466.  
  467. if(score>=12){bC=NEON_GREEN;return "STRONG BULL";}
  468. if(score>=7){bC=NEON_GREEN;return "BULLISH";}
  469. if(score>=3){bC=NEON_CYAN;return "LIGHT BULL";}
  470. if(score<=-12){bC=NEON_RED;return "STRONG BEAR";}
  471. if(score<=-7){bC=NEON_RED;return "BEARISH";}
  472. if(score<=-3){bC=NEON_ORANGE;return "LIGHT BEAR";}
  473. bC=NEON_YELLOW;return "NEUTRAL";
  474. }
  475.  
  476. //+------------------------------------------------------------------+
  477. // ██ ULTIMATE NEXT CANDLE PREDICTION v2.0 (unchanged) ██
  478. //+------------------------------------------------------------------+
  479. void CalcAdvancedPrediction(double &gP, double &rP, string &reason, color &pC){
  480. if(Bars < 50){
  481. gP = 50; rP = 50; reason = "Bars low"; pC = NEON_YELLOW;
  482. return;
  483. }
  484.  
  485. bool jpy = (StringFind(Symbol(), "JPY") >= 0);
  486. double pip = jpy ? 0.01 : 0.0001;
  487. double green = 0, red = 0;
  488.  
  489. double body1 = MathAbs(Close[1] - Open[1]);
  490. double range1 = High[1] - Low[1];
  491. if(range1 > 0) {
  492. double wick_ratio = (range1 - body1) / range1;
  493. double upper_wick = High[1] - MathMax(Open[1], Close[1]);
  494. double lower_wick = MathMin(Open[1], Close[1]) - Low[1];
  495. if(upper_wick > range1 * 0.60 && Close[1] > Open[1]) red += 22;
  496. else if(lower_wick > range1 * 0.60 && Close[1] < Open[1]) green += 22;
  497. else if(wick_ratio > 0.55) {
  498. if(upper_wick > lower_wick) red += 12;
  499. else green += 12;
  500. }
  501. }
  502.  
  503. double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  504. double cci = iCCI(NULL, PERIOD_M1, 14, PRICE_TYPICAL, 1);
  505. double stochK = iStochastic(NULL, PERIOD_M1, 5, 3, 3, MODE_SMA, 0, MODE_MAIN, 1);
  506. int oversold_signals = 0, overbought_signals = 0;
  507. if(rsi < 30) oversold_signals++;
  508. else if(rsi > 70) overbought_signals++;
  509. if(cci < -120) oversold_signals++;
  510. else if(cci > 120) overbought_signals++;
  511. if(stochK < 20) oversold_signals++;
  512. else if(stochK > 80) overbought_signals++;
  513. if(oversold_signals >= 3) green += 18;
  514. else if(oversold_signals >= 2) green += 12;
  515. else if(overbought_signals >= 3) red += 18;
  516. else if(overbought_signals >= 2) red += 12;
  517.  
  518. double rsiPrev = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 5);
  519. double low1 = Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 5, 1)];
  520. double low2 = Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 5, 6)];
  521. double high1 = High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 5, 1)];
  522. double high2 = High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 5, 6)];
  523. if(low1 < low2 && rsi > rsiPrev && rsi < 45) green += 15;
  524. if(high1 > high2 && rsi < rsiPrev && rsi > 55) red += 15;
  525.  
  526. double v1 = iVolume(NULL, PERIOD_M1, 1);
  527. double vAvg = 0;
  528. for(int i=2; i<=10; i++) vAvg += iVolume(NULL, PERIOD_M1, i);
  529. vAvg = (vAvg > 0) ? vAvg / 9.0 : 1.0;
  530. double vol_ratio = (vAvg > 0) ? v1 / vAvg : 1.0;
  531. if(vol_ratio > 2.0) {
  532. if(Close[1] > Open[1]) red += 20;
  533. else green += 20;
  534. } else if(vol_ratio > 1.5) {
  535. if(Close[1] > Open[1]) red += 12;
  536. else green += 12;
  537. } else if(vol_ratio > 1.2) {
  538. if(Close[1] > Open[1]) green += 5;
  539. else red += 5;
  540. }
  541.  
  542. double m1_haC1 = (Open[1]+High[1]+Low[1]+Close[1])/4.0;
  543. double m1_haC2 = (Open[2]+High[2]+Low[2]+Close[2])/4.0;
  544. double m1_haO2_apx = (Open[3]+Close[3])/2.0;
  545. double m1_haO1 = (m1_haO2_apx + m1_haC2)/2.0;
  546. bool haBull1 = (m1_haC1 > m1_haO1);
  547. double haStrength1 = MathAbs(m1_haC1 - m1_haO1) / (High[1] - Low[1] + 0.00001);
  548. bool haBull5 = false;
  549. double haStrength5 = 0;
  550. if(iBars(NULL, PERIOD_M5) >= 5) {
  551. double m5_o1=iOpen(NULL,PERIOD_M5,1), m5_h1=iHigh(NULL,PERIOD_M5,1);
  552. double m5_l1=iLow(NULL,PERIOD_M5,1), m5_c1=iClose(NULL,PERIOD_M5,1);
  553. double m5_o2=iOpen(NULL,PERIOD_M5,2), m5_h2=iHigh(NULL,PERIOD_M5,2);
  554. double m5_l2=iLow(NULL,PERIOD_M5,2), m5_c2=iClose(NULL,PERIOD_M5,2);
  555. double m5_o3=iOpen(NULL,PERIOD_M5,3), m5_c3=iClose(NULL,PERIOD_M5,3);
  556. double m5_haC1 = (m5_o1+m5_h1+m5_l1+m5_c1)/4.0;
  557. double m5_haC2 = (m5_o2+m5_h2+m5_l2+m5_c2)/4.0;
  558. double m5_haO2_apx = (m5_o3+m5_c3)/2.0;
  559. double m5_haO1 = (m5_haO2_apx + m5_haC2)/2.0;
  560. haBull5 = (m5_haC1 > m5_haO1);
  561. haStrength5 = MathAbs(m5_haC1 - m5_haO1) / (m5_h1 - m5_l1 + 0.00001);
  562. }
  563. if(haBull1 && haBull5) green += 15;
  564. else if(!haBull1 && !haBull5) red += 15;
  565. else if(haBull1 && haStrength1 > 0.5) green += 8;
  566. else if(!haBull1 && haStrength1 > 0.5) red += 8;
  567.  
  568. double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  569. double plusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
  570. double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
  571. if(adx > 25) {
  572. double diDiff = plusDI - minusDI;
  573. if(diDiff > 8) green += 12;
  574. else if(diDiff > 4) green += 8;
  575. else if(diDiff < -8) red += 12;
  576. else if(diDiff < -4) red += 8;
  577. } else if(adx > 15) {
  578. if(plusDI > minusDI) green += 4;
  579. else red += 4;
  580. } else {
  581. if(Close[1] > Open[1]) red += 3;
  582. else green += 3;
  583. }
  584.  
  585. double sup = Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 20, 2)];
  586. double res = High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 20, 2)];
  587. double distToRes = (res - Close[0]) / pip;
  588. double distToSup = (Close[0] - sup) / pip;
  589. if(distToRes < 8 && distToRes >= 0) red += 12;
  590. else if(distToRes < 15 && distToRes >= 0) red += 6;
  591. if(distToSup < 8 && distToSup >= 0) green += 12;
  592. else if(distToSup < 15 && distToSup >= 0) green += 6;
  593. if(g_hrn_price > 0) {
  594. double distToHRN = MathAbs(Close[0] - g_hrn_price) / pip;
  595. if(distToHRN < 5) {
  596. if(Close[0] > g_hrn_price) red += 8;
  597. else green += 8;
  598. }
  599. }
  600.  
  601. double macdMain = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, 1);
  602. double macdSig = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, 1);
  603. double macdPrev = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, 2);
  604. double macdSigPrev = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, 2);
  605. if(macdMain > macdSig && macdPrev <= macdSigPrev) green += 10;
  606. else if(macdMain < macdSig && macdPrev >= macdSigPrev) red += 10;
  607. else if(macdMain > macdSig) green += 5;
  608. else if(macdMain < macdSig) red += 5;
  609.  
  610. if(g_otcCallPct >= 75 && !haBull1) red += 15;
  611. else if(g_otcPutPct >= 75 && haBull1) green += 15;
  612. else if(g_otcCallPct >= 65 && !haBull1) red += 8;
  613. else if(g_otcPutPct >= 65 && haBull1) green += 8;
  614.  
  615. bool isHammer = (Low[1] == Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 3, 1)] &&
  616. Close[1] > Open[1] &&
  617. (Close[1] - Low[1]) > (High[1] - Close[1]) * 2);
  618. bool isShootingStar = (High[1] == High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 3, 1)] &&
  619. Close[1] < Open[1] &&
  620. (High[1] - Close[1]) > (Close[1] - Low[1]) * 2);
  621. if(isHammer) green += 10;
  622. if(isShootingStar) red += 10;
  623.  
  624. int streak = 0;
  625. bool streakDir = (Close[1] > Open[1]);
  626. for(int i = 1; i <= 8 && i < Bars; i++) {
  627. bool candleUp = (Close[i] > Open[i]);
  628. if(candleUp == streakDir) streak++;
  629. else break;
  630. }
  631. if(streak >= 5) {
  632. if(streakDir) red += 8;
  633. else green += 8;
  634. } else if(streak >= 4) {
  635. if(streakDir) red += 5;
  636. else green += 5;
  637. }
  638.  
  639. double diff = MathMax(-100.0, MathMin(100.0, green - red));
  640. gP = MathMax(8.0, MathMin(92.0, 50.0 + diff * 0.65));
  641. rP = 100.0 - gP;
  642. double dom = MathMax(gP, rP);
  643. if(dom >= 82) {
  644. reason = (gP > rP) ? "STRONG GREEN" : "STRONG RED";
  645. pC = (gP > rP) ? NEON_GREEN : NEON_RED;
  646. } else if(dom >= 72) {
  647. reason = (gP > rP) ? "GREEN" : "RED";
  648. pC = (gP > rP) ? NEON_GREEN : NEON_RED;
  649. } else if(dom >= 60) {
  650. reason = (gP > rP) ? "WEAK GREEN" : "WEAK RED";
  651. pC = (gP > rP) ? NEON_CYAN : NEON_ORANGE;
  652. } else {
  653. reason = "WAIT";
  654. pC = NEON_YELLOW;
  655. }
  656. }
  657.  
  658. //+------------------------------------------------------------------+
  659. // STRATEGY DETECTION (unchanged)
  660. //+------------------------------------------------------------------+
  661. string DetectMyStrategy(){
  662. int cc=g_otcCallPct,cp=g_otcPutPct,thr=STRATEGY_THRESHOLD;
  663. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TRAP_ONLY"){
  664. if(cc>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TRAP";g_strategySignal="PUT";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA RED";return "PUT";}
  665. if(cp>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TRAP";g_strategySignal="CALL";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA GREEN";return "CALL";}}
  666. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TREND_ONLY"){
  667. if(cc>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TREND";g_strategySignal="CALL";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA GREEN";return "CALL";}
  668. if(cp>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TREND";g_strategySignal="PUT";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA RED";return "PUT";}}
  669. g_strategyType="NONE";g_strategySignal="WAIT";g_strategyReason="Wait "+IntegerToString(thr)+"% + HA";return "WAIT";
  670. }
  671.  
  672. //+------------------------------------------------------------------+
  673. // ██ NEW: OTC CROWD WITH EXPONENTIAL WEIGHT (15 candles) ██
  674. //+------------------------------------------------------------------+
  675. void CalcOTCCrowd(){
  676. int cS=0,pS=0;
  677. int totalWeight=0;
  678. // Exponential weights: latest candle weight=15, then 13,11,9,... down to 1
  679. int weights[15];
  680. for(int w=0; w<15; w++) weights[w] = 15 - w*2; // 15,13,11,9,7,5,3,1,1,1... keep min 1
  681. for(int w=0; w<15; w++) if(weights[w]<1) weights[w]=1;
  682.  
  683. for(int i=1; i<=15 && i<Bars; i++){
  684. double rg=High[i]-Low[i];
  685. if(rg<=0) continue;
  686. double uw=(High[i]-MathMax(Open[i],Close[i]))/rg;
  687. double lw=(MathMin(Open[i],Close[i])-Low[i])/rg;
  688. int wgt = weights[i-1]; // i=1 -> index0 weight15
  689. totalWeight += wgt;
  690.  
  691. if(uw>0.70 && Close[i]<Open[i]) cS += 4 * wgt;
  692. if(lw>0.70 && Close[i]>Open[i]) pS += 4 * wgt;
  693. if(uw>0.55 && Close[i]<Open[i]) cS += 2 * wgt;
  694. if(lw>0.55 && Close[i]>Open[i]) pS += 2 * wgt;
  695. if(Close[i]>Open[i]) cS += 1 * wgt;
  696. else if(Close[i]<Open[i]) pS += 1 * wgt;
  697. }
  698. int tot=cS+pS;
  699. if(tot==0){g_otcCallPct=50;g_otcPutPct=50;}
  700. else{
  701. int rC=(int)(cS*100.0/tot);
  702. int rP=100-rC;
  703. if(rC>=rP){g_otcCallPct=MathMax(50,rC);g_otcPutPct=100-g_otcCallPct;}
  704. else{g_otcPutPct=MathMax(50,rP);g_otcCallPct=100-g_otcPutPct;}
  705. }
  706. }
  707.  
  708. //+------------------------------------------------------------------+
  709. // BRAIN SCORE (unchanged)
  710. //+------------------------------------------------------------------+
  711. double BrainSc(int &cp){
  712. double s=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  713. double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,LB,1)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,LB,1)];
  714. double bH=MathMax(Open[1],Close[1]),bL=MathMin(Open[1],Close[1]);
  715. if(High[1]>res&&bL<res)s-=4;if(Low[1]<sup&&bH>sup)s+=4;
  716. if(High[0]>res)s-=2;if(Low[0]<sup)s+=2;
  717. double atr=iATR(NULL,PERIOD_M1,14,1);
  718. if(atr!=0){double cn=(High[1]-Low[1])/atr,v1=(double)iVolume(NULL,PERIOD_M1,1),va=0;
  719. for(int i=2;i<=10;i++)va+=iVolume(NULL,PERIOD_M1,i);va/=9.0;
  720. double vr=va>0?v1/va:1;if(cn>1.2&&vr>1.5){if(Close[1]>Open[1])s-=3;else s+=3;}}
  721. int c=0;for(int i=1;i<=30;i++)if(Close[i]>Open[i])c++;
  722. cp=(int)(c*100.0/30.0);if(cp>=70)s-=5;if(cp<=30)s+=5;s*=1.5;
  723. int dj=0;for(int i=1;i<=8;i++){double bd=MathAbs(Close[i]-Open[i]),rg=High[i]-Low[i];if(rg<=0)continue;
  724. if(bd<rg*0.2)dj++;double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];
  725. if(uw>bd*3)s+=2;if(lw>bd*3)s-=2;}if(dj>=4)s*=1.5;
  726. int bu=0,be=0;for(int i=1;i<=8;i++){if(Close[i]>Open[i]){bu++;be=0;}else{be++;bu=0;}if(bu>=5)s-=3;if(be>=5)s+=3;}
  727. int h=TimeHour(TimeCurrent());double mul=1.0;
  728. if((h>=0&&h<=2)||(h>=8&&h<=11)||(h>=14&&h<=17))mul=1.20;if(h>=3&&h<=7)mul=0.90;
  729. return s*mul;
  730. }
  731.  
  732. //+------------------------------------------------------------------+
  733. // MICRO WICK (unchanged)
  734. //+------------------------------------------------------------------+
  735. 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;}
  736.  
  737. //+------------------------------------------------------------------+
  738. // VOLUME TRAP (unchanged)
  739. //+------------------------------------------------------------------+
  740. double VolumeTrapScore(){
  741. if(!VOLUME_PROFILE_TRAP||Bars<50)return 0;
  742. double cur=Close[0],hi=High[iHighest(NULL,0,MODE_HIGH,50,1)],lo=Low[iLowest(NULL,0,MODE_LOW,50,1)];
  743. 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};
  744. 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]++;}
  745. for(int z=0;z<zn;z++)if(zc[z]>0)vz[z]/=zc[z];
  746. int cz=(int)((cur-lo)/zs);if(cz<0)cz=0;if(cz>=zn)cz=zn-1;
  747. double vr=(double)Volume[1]/(vz[cz]+0.001);double wr=MicroWick();
  748. if(vr>2.0&&wr>0.65)return 25;if(vr>1.8&&wr>0.55)return 15;return 0;
  749. }
  750.  
  751. //+------------------------------------------------------------------+
  752. // ULTIMATE TRAP SCORE (unchanged)
  753. //+------------------------------------------------------------------+
  754. double UltimateTrapScore(){double wr=MicroWick(),v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  755. double avg=v2>0?v2:1.0,vr=v1/avg,rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),sc=0.0;
  756. if(wr>0.65)sc+=40;if(vr>2.0)sc+=30;if(rsi>75||rsi<25)sc+=20;
  757. if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))sc+=25;
  758. sc+=VolumeTrapScore();return MathMin(100.0,sc);}
  759.  
  760. //+------------------------------------------------------------------+
  761. // BROKER FORCE (unchanged)
  762. //+------------------------------------------------------------------+
  763. bool IsBrokerForce(double dummy=0){
  764. int sd=0;for(int i=1;i<=3;i++){if(Close[i]>Open[i])sd++;else sd--;}
  765. double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  766. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
  767. return(MathAbs(sd)==3&&v1>v2*2.0&&sp>BROKER_SPREAD_THRESHOLD);
  768. }
  769.  
  770. //+------------------------------------------------------------------+
  771. // NEURAL NETWORK (unchanged)
  772. //+------------------------------------------------------------------+
  773. double NeuralBiasFast(){double r=NeuralBias(0)*0.3+NeuralBias(1)*0.7;if(r>96)r=96;if(r<4)r=4;return r;}
  774. double NeuralBias(int s){
  775. double f[8];f[0]=fDoji(s)/100.0;f[1]=fWick(s)/100.0;f[2]=fVol()/100.0;f[3]=fMom(s)/100.0;
  776. f[4]=fSpread()/100.0;f[5]=fMem(s)/100.0;f[6]=fTick(s)/100.0;f[7]=fFrac(s)/100.0;
  777. double h[4]={0,0,0,0};for(int i=0;i<4;i++){for(int j=0;j<8;j++)h[i]+=f[j]*NW[j*4+i];h[i]=MathMax(0,h[i]-0.08);}
  778. double o=0;for(int i=0;i<4;i++)o+=h[i]*NW[32+i];double r=50.0+o*22.0;return r>96?96:r<4?4:r;
  779. }
  780. double fDoji(int s){int n=0;for(int i=s;i<s+5&&i<Bars;i++){double b=MathAbs(Open[i]-Close[i]),r=High[i]-Low[i];if(r>0&&b<r*0.25)n++;}return n*20.0;}
  781. double fWick(int s){double r=High[s]-Low[s];if(r==0)return 0;double u=(High[s]-MathMax(Open[s],Close[s]))/r,l=(MathMin(Open[s],Close[s])-Low[s])/r;return(u>0.65||l>0.65)?95:(u>0.5||l>0.5)?70:0;}
  782. double fVol(){if(Bars<11)return 0;double a=0;for(int i=1;i<=10;i++)a+=iVolume(NULL,PERIOD_M1,i);a/=10.0;if(a==0)return 0;double r=(double)iVolume(NULL,PERIOD_M1,0)/a;return r>3?95:r>2?75:r>1.5?50:0;}
  783. double fMom(int s){if(s+3>=Bars)return 0;return((Close[s]>Open[s]&&Close[s+1]<Open[s+1])||(Close[s]<Open[s]&&Close[s+1]>Open[s+1]))?88:0;}
  784. double fSpread(){double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);return sp>8?90:sp>5?70:sp>3?40:0;}
  785. double fMem(int s){if(s+8>=Bars)return 0;int r=0;for(int i=s;i<s+8&&i+2<Bars;i+=2){bool vB=(Low[i]>Low[i+1]&&Low[i+2]>Low[i+1]&&Close[i+2]>Open[i+2]);bool aT=(High[i]<High[i+1]&&High[i+2]<High[i+1]&&Close[i+2]<Open[i+2]);if(vB||aT)r++;}return(double)r*12.5;}
  786. double fTick(int s){if(s+5>=Bars)return 0;double vN=(double)iVolume(NULL,PERIOD_M1,s),vP=(double)iVolume(NULL,PERIOD_M1,s+1);if(vP==0)return 0;double vR=vN/vP,pc=MathAbs(Close[s]-Close[s+1])/Close[s+1]*100;if(vR>2.0&&pc<0.1)return 85;if(vR>1.5&&pc<0.05)return 60;return 0;}
  787. double fFrac(int s){if(s+4>=Bars||s<2)return 0;bool b=(Low[s]<Low[s-1]&&Low[s]<Low[s-2]&&Low[s]<Low[s+1]&&Low[s]<Low[s+2]);bool t=(High[s]>High[s-1]&&High[s]>High[s-2]&&High[s]>High[s+1]&&High[s]>High[s+2]);return(b||t)?90:0;}
  788.  
  789. //+------------------------------------------------------------------+
  790. // MAIN PREDICTION (unchanged)
  791. //+------------------------------------------------------------------+
  792. void CalcPrediction(double brain,double nb,int cp,double mai,int mts,double rsc,bool bf,double mw){
  793. string ms=DetectMyStrategy();bool sA=(ms!="WAIT");
  794.  
  795. if(sA&&g_strategyType=="TRAP"){
  796. 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;}
  797. 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;}}
  798.  
  799. double tS=UltimateTrapScore();bool bF2=IsBrokerForce();
  800.  
  801. 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;}}
  802.  
  803. 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;}
  804.  
  805. double gS=0,rS=0,ab=MathMax(0.70,MathMin(1.30,g_accuracy/65.0));
  806.  
  807. if(IsSidewaysMarket()){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  808. 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);
  809. 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;}
  810. if(nR)rS+=20;if(nS)gS+=20;}
  811.  
  812. 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;}}
  813.  
  814. if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")gS+=60;
  815. else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")rS+=60;
  816. else if(g_haM1=="HA BULLISH 1")gS+=30;else if(g_haM1=="HA BEARISH 1")rS+=30;
  817.  
  818. if(HA_ALIGN_FILTER && g_haBoth=="MIXED"){gS*=0.5;rS*=0.5;}
  819.  
  820. gS+=(nb-50)/50.0*22*ab;rS-=(nb-50)/50.0*22*ab;
  821.  
  822. double bn=MathMax(-1.0,MathMin(1.0,brain/10.0));gS+=bn*15*ab;rS-=bn*15*ab;
  823.  
  824. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  825. if(g_nearest_res>0&&(g_nearest_res-Close[0])<10*pip)rS+=12;
  826. if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<10*pip)gS+=12;
  827.  
  828. double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi1>70)rS+=6;if(rsi1<30)gS+=6;
  829.  
  830. double sn=MathMax(-1.0,MathMin(1.0,rsc/3.0));gS+=sn*8*ab;rS-=sn*8*ab;
  831.  
  832. double wRS=GetWickRejectSignal();gS+=(wRS>0?wRS:0);rS+=(wRS<0?MathAbs(wRS):0);
  833. double cPS=GetCommonPointSignal();gS+=(cPS>0?cPS:0);rS+=(cPS<0?MathAbs(cPS):0);
  834. int rd=DetectRSIDivergence();if(rd==1)gS+=20;if(rd==-1)rS+=20;
  835. int cp2=DetectClassicPatterns();if(cp2==1)gS+=12;if(cp2==-1)rS+=12;
  836. int qm=DetectQMR();if(qm==1)gS+=25;if(qm==-1)rS+=25;
  837. int sk=StreakReversalSignal();if(sk==1)gS+=18;if(sk==-1)rS+=18;
  838. 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;}
  839. int vs=SmartVolumeSignal();if(vs==1)gS+=12;if(vs==-1)rS+=12;
  840. if(!IsVolatilityGood()){gS*=0.5;rS*=0.5;}
  841.  
  842. double diff=MathMax(-100.0,MathMin(100.0,gS-rS));
  843. g_gProb=MathMax(8.0,MathMin(92.0,50.0+(diff/1.8)));g_rProb=100.0-g_gProb;
  844.  
  845. if(sA&&g_strategyType=="TREND"){
  846. if(ms=="CALL"){g_gProb=MathMax(g_gProb,85.0);g_rProb=100.0-g_gProb;}
  847. if(ms=="PUT"){g_rProb=MathMax(g_rProb,85.0);g_gProb=100.0-g_rProb;}
  848. g_gProb=MathMin(92.0,MathMax(8.0,g_gProb));g_rProb=100.0-g_gProb;}
  849.  
  850. double dom=MathMax(g_gProb,g_rProb);
  851. 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;}}}
  852. 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;}}}
  853. else{if(!sA){g_pAction="WAIT";g_pColor=NEON_YELLOW;}}
  854.  
  855. g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;
  856. }
  857.  
  858. //+------------------------------------------------------------------+
  859. // COMMON POINTS & WICK REJECTIONS (unchanged)
  860. //+------------------------------------------------------------------+
  861. void DetectCommonPoints(){
  862. if(!SHOW_COMMON_POINTS){g_commonCount=0;return;}
  863. if(Time[0]==g_lastCommonScan)return;g_lastCommonScan=Time[0];g_commonCount=0;
  864. datetime nowBar=Time[0];int periodSec=PeriodSeconds(PERIOD_M1);
  865. double m5h=iHigh(NULL,PERIOD_M5,iHighest(NULL,PERIOD_M5,MODE_HIGH,10,1));
  866. double m5l=iLow(NULL,PERIOD_M5,iLowest(NULL,PERIOD_M5,MODE_LOW,10,1));
  867. 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++;}
  868. 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++;}
  869. 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++;}
  870. 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++;}
  871. 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--;}
  872. }
  873.  
  874. void DrawCommonPoints(){
  875. 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));}
  876. if(!SHOW_COMMON_POINTS||g_commonCount==0)return;
  877. for(int i=0;i<g_commonCount;i++){if(TimeCurrent()>g_commonExpire[i])continue;if(IsLineNearby(g_commonPrice[i],8.0))continue;
  878. string id=PFX+"COMMON_"+IntegerToString(i),idL=PFX+"COMMON_L_"+IntegerToString(i),idH=PFX+"COMMON_HL_"+IntegerToString(i);color zc=DARK_BLUE_NEON;
  879. 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);
  880. ObjectCreate(0,id,OBJ_TEXT,0,Time[0],g_commonPrice[i]);ObjectSetText(id,"*",16,"Arial",zc);ObjectSetInteger(0,id,OBJPROP_BACK,false);
  881. string lbl=(g_commonType[i]=="CALL")?"^ CALL ZONE":"v PUT ZONE";
  882. 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);}
  883. }
  884.  
  885. void DetectWickRejections(){
  886. g_isSideways=IsSidewaysMarket();if(!SHOW_WICK_REJECT_LINES){g_wickLineCount=0;return;}
  887. if(Time[0]==g_lastWickScan)return;g_lastWickScan=Time[0];
  888. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double zone=WICK_ZONE_PIPS*pip*2;double cur=Close[0];
  889. g_wickLineCount=0;datetime now=Time[0],expT=now+PeriodSeconds(PERIOD_M1)*WICK_EXPIRE_BARS*2;
  890. for(int i=1;i<=40&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
  891. double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];double rl=0;bool fd=false;
  892. if(uw>rg*0.30){rl=High[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
  893. if(lw>rg*0.30){rl=Low[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
  894. if(!fd)continue;bool ex=false;
  895. for(int j=0;j<g_wickLineCount;j++)if(MathAbs(g_wickLinePrice[j]-rl)<zone){g_wickLineTouches[j]++;ex=true;break;}
  896. if(!ex&&g_wickLineCount<MAX_WICK_LINES){g_wickLinePrice[g_wickLineCount]=rl;g_wickLineTouches[g_wickLineCount]=1;g_wickLineExpire[g_wickLineCount]=expT;g_wickLineCount++;}}
  897. for(int i=g_wickLineCount-1;i>=0;i--)if(TimeCurrent()>g_wickLineExpire[i]){for(int j=i;j<g_wickLineCount-1;j++){g_wickLinePrice[j]=g_wickLinePrice[j+1];g_wickLineTouches[j]=g_wickLineTouches[j+1];g_wickLineExpire[j]=g_wickLineExpire[j+1];}g_wickLineCount--;}
  898. }
  899.  
  900. void DrawWickRejectLines(){
  901. for(int i=0;i<MAX_WICK_LINES;i++){SafeDel(PFX+"WICK_"+IntegerToString(i));SafeDel(PFX+"WICK_L_"+IntegerToString(i));}
  902. if(!SHOW_WICK_REJECT_LINES||!g_isSideways)return;
  903. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
  904. for(int i=0;i<g_wickLineCount;i++){if(TimeCurrent()>g_wickLineExpire[i])continue;if(MathAbs(cur-g_wickLinePrice[i])/pip>20.0)continue;if(IsLineNearby(g_wickLinePrice[i],5.0))continue;
  905. string id=PFX+"WICK_"+IntegerToString(i),idL=PFX+"WICK_L_"+IntegerToString(i);color lc=C'0,180,255';
  906. ObjectCreate(0,id,OBJ_HLINE,0,0,g_wickLinePrice[i]);ObjectSetInteger(0,id,OBJPROP_COLOR,lc);ObjectSetInteger(0,id,OBJPROP_WIDTH,2);ObjectSetInteger(0,id,OBJPROP_STYLE,STYLE_DOT);ObjectSetInteger(0,id,OBJPROP_BACK,false);
  907. string lbl="W"+IntegerToString(g_wickLineTouches[i])+"x";
  908. ObjectCreate(0,idL,OBJ_TEXT,0,Time[0]+PeriodSeconds(PERIOD_M1)*2,g_wickLinePrice[i]);ObjectSetText(idL,lbl,9,"Arial Bold",lc);ObjectSetInteger(0,idL,OBJPROP_BACK,false);}
  909. }
  910.  
  911. double GetWickRejectSignal(){if(!g_isSideways||g_wickLineCount==0)return 0;double sc=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  912. for(int i=0;i<g_wickLineCount;i++){double d=MathAbs(Close[0]-g_wickLinePrice[i])/pip;bool iS=(g_wickLinePrice[i]<Close[0]);
  913. if(d<5){if(iS)sc+=15*g_wickLineTouches[i];else sc-=15*g_wickLineTouches[i];}else if(d<10){if(iS)sc+=8*g_wickLineTouches[i];else sc-=8*g_wickLineTouches[i];}}return MathMax(-40,MathMin(40,sc));}
  914. double GetCommonPointSignal(){if(g_commonCount==0)return 0;double sc=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  915. for(int i=0;i<g_commonCount;i++){if(TimeCurrent()>g_commonExpire[i])continue;double d=MathAbs(Close[0]-g_commonPrice[i])/pip;if(d<8){if(g_commonType[i]=="CALL")sc+=25;else sc-=25;}}return MathMax(-30,MathMin(30,sc));}
  916.  
  917. //+------------------------------------------------------------------+
  918. // HIDDEN HTF LEVELS (unchanged)
  919. //+------------------------------------------------------------------+
  920. void DetectHiddenLevels(){g_htfLevelCount=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double curP=Close[0];
  921. double rU=MathCeil(curP/(10*pip))*(10*pip),rD=MathFloor(curP/(10*pip))*(10*pip);
  922. if(MathAbs(curP-rU)/pip<=15)AddLevel(rU,"ROUND","RESISTANCE",TimeCurrent(),8,true);
  923. if(MathAbs(curP-rD)/pip<=15)AddLevel(rD,"ROUND","SUPPORT",TimeCurrent(),8,true);
  924. DetectHTFLevels(PERIOD_M5,"M5",3,pip);DetectHTFLevels(PERIOD_M15,"M15",5,pip);DetectHTFLevels(PERIOD_M30,"M30",7,pip);DetectHTFLevels(PERIOD_H1,"H1",9,pip);
  925. SortLevelsByStrength();}
  926.  
  927. void DetectHTFLevels(ENUM_TIMEFRAMES tf,string tfN,int bS,double pip){int bars=MathMin(50,iBars(NULL,tf));if(bars<10)return;double curP=Close[0];
  928. for(int i=2;i<bars-2;i++){if(IsSwingHigh(tf,i,2)){double d=MathAbs(curP-iHigh(NULL,tf,i))/pip;if(d<=20)AddLevel(iHigh(NULL,tf,i),tfN,"RESISTANCE",iTime(NULL,tf,i),bS+(20-(int)d)/2,false);}
  929. 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);}}}
  930.  
  931. 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;}
  932. 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;}
  933.  
  934. void AddLevel(double price,string tf,string type,datetime time,int strength,bool isRound){if(g_htfLevelCount>=50)return;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  935. for(int i=0;i<g_htfLevelCount;i++)if(MathAbs(g_htfLevels[i].price-price)/pip<5)return;
  936. g_htfLevels[g_htfLevelCount].price=price;g_htfLevels[g_htfLevelCount].timeframe=tf;g_htfLevels[g_htfLevelCount].type=type;g_htfLevels[g_htfLevelCount].time=time;g_htfLevels[g_htfLevelCount].strength=strength;g_htfLevels[g_htfLevelCount].isRoundNumber=isRound;g_htfLevelCount++;}
  937.  
  938. 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;}}
  939.  
  940. void DrawHiddenLevels(){for(int i=0;i<50;i++){SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i));SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i)+"_LBL");}
  941. int dc=MathMin(10,g_htfLevelCount);int drawn=0;
  942. for(int i=0;i<dc&&drawn<5;i++){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;if(MathAbs(Close[0]-g_htfLevels[i].price)/pip>30)continue;if(IsLineNearby(g_htfLevels[i].price,5.0))continue;
  943. string nm=PFX+"HTF_LEVEL_"+IntegerToString(drawn);color lc=g_htfLevels[i].isRoundNumber?NEON_PURPLE:(StringFind(g_htfLevels[i].type,"SUPPORT")>=0?NEON_GREEN:NEON_RED);
  944. 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);
  945. string ln=nm+"_LBL";ObjectCreate(0,ln,OBJ_TEXT,0,Time[0],g_htfLevels[i].price);ObjectSetText(ln,StringFormat("%s %s S:%d",g_htfLevels[i].timeframe,g_htfLevels[i].type,g_htfLevels[i].strength),9,"Arial",lc);drawn++;}}
  946.  
  947. //+------------------------------------------------------------------+
  948. // REVERSAL DETECTION (unchanged)
  949. //+------------------------------------------------------------------+
  950. string DetectSuddenReversal(){string reason="";if(Close[1]<Open[1]&&Close[0]>Open[0]){reason="BULL REVERSAL";if(iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,0)<30)return reason;}if(Close[1]>Open[1]&&Close[0]<Open[0]){reason="BEAR REVERSAL";if(iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,0)>70)return reason;}return "";}
  951.  
  952. //+------------------------------------------------------------------+
  953. // DRAWING HELPERS (unchanged)
  954. //+------------------------------------------------------------------+
  955. void SafeDel(string id){if(ObjectFind(0,id)>=0)ObjectDelete(0,id);}
  956. 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);}
  957. void HideSPM(){for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);if(StringFind(nm,PFX)==0)continue;int tp=(int)ObjectGetInteger(0,nm,OBJPROP_TYPE);if(tp==OBJ_LABEL||tp==OBJ_RECTANGLE_LABEL||tp==OBJ_TEXT)ObjectDelete(0,nm);}}
  958. void NuclearDeleteAll(){for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);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);}}
  959. void DelDashboard(){for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);if(StringFind(nm,PFX)!=0)continue;if(StringFind(nm,"NEAREST_RES")>=0)continue;if(StringFind(nm,"NEAREST_SUP")>=0)continue;if(StringFind(nm,"HRN_LINE")>=0)continue;if(StringFind(nm,"HRN_LBL")>=0)continue;if(StringFind(nm,"candle_timer")>=0)continue;if(StringFind(nm,"HTF_LEVEL")>=0)continue;if(StringFind(nm,"COMMON_")>=0)continue;if(StringFind(nm,"WICK_")>=0)continue;ObjectDelete(nm);}}
  960.  
  961. //+------------------------------------------------------------------+
  962. // ML WEIGHTS (unchanged)
  963. //+------------------------------------------------------------------+
  964. 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;}
  965. 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);}}
  966. 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();}
  967.  
  968. //+------------------------------------------------------------------+
  969. // ACCURACY TRACKING (unchanged)
  970. //+------------------------------------------------------------------+
  971. void UpdateAccuracy(){if(Bars<5||Time[0]==g_acc_lastBar)return;g_acc_lastBar=Time[0];if(g_lastPredBar==Time[1]&&MathAbs(g_lastPredGreen-50.0)>10.0){bool aG=(Close[1]>Open[1]),pG=(g_lastPredGreen>50.0),win=(aG==pG);if(win){g_acc_correct++;g_lossStreak=0;}else g_lossStreak++;g_acc_total++;if(g_acc_total>0)g_accuracy=MathMax(40.0,MathMin(90.0,(double)g_acc_correct/g_acc_total*100.0));if(ML_ADAPTIVE&&g_lastPredGreen>50.0&&g_lastPredGreen<100.0)UpdateMLWeights(win);}g_lastPredGreen=g_frozen_gProb;g_lastPredBar=Time[0];}
  972. 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;}
  973. 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]));}}
  974.  
  975. //+------------------------------------------------------------------+
  976. // MARKET MODE & HELPERS (unchanged)
  977. //+------------------------------------------------------------------+
  978. 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";}
  979. 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;}
  980. 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;}
  981. double GetDynamicThreshold(){if(g_accuracy<55)return 90.0;if(g_accuracy<60)return 85.0;if(g_accuracy<65)return 80.0;if(g_accuracy<70)return 75.0;if(g_accuracy>80)return 70.0;if(g_accuracy>75)return 72.0;return 75.0;}
  982.  
  983. //+------------------------------------------------------------------+
  984. // SIGNAL DETECTORS (unchanged)
  985. //+------------------------------------------------------------------+
  986. 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;}
  987. 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;}
  988. double GetADXStrength(){if(Bars<20)return 0;return iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);}
  989. 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;}
  990. 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;}
  991.  
  992. //+------------------------------------------------------------------+
  993. // CLASSIC PATTERNS (unchanged)
  994. //+------------------------------------------------------------------+
  995. 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;
  996. 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++;}}}
  997. 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;else if(Close[0]<MathMin(sh[0],sh[1]))return -1;}}
  998. 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;else if(Close[0]>MathMax(sl[0],sl[1]))return 1;}}return 0;}
  999.  
  1000. //+------------------------------------------------------------------+
  1001. // QMR PATTERN (unchanged)
  1002. //+------------------------------------------------------------------+
  1003. int DetectQMR(){if(Bars<40)return 0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double sH[10],sL[10];int sHB[10],sLB[10];int hC=0,lC=0;
  1004. for(int i=3;i<40&&hC<10;i++)if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){sH[hC]=High[i];sHB[hC]=i;hC++;}
  1005. for(int i=3;i<40&&lC<10;i++)if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){sL[lC]=Low[i];sLB[lC]=i;lC++;}
  1006. if(hC<2||lC<2)return 0;
  1007. for(int iA=0;iA<hC;iA++)for(int iC2=0;iC2<hC;iC2++){if(iA==iC2)continue;if(sHB[iA]<=sHB[iC2])continue;if(sH[iC2]>=sH[iA]-10*pip)continue;
  1008. for(int iB=0;iB<lC;iB++){if(sHB[iA]<=sLB[iB])continue;if(sLB[iB]<=sHB[iC2])continue;
  1009. for(int iD=0;iD<lC;iD++){if(iB==iD)continue;if(sHB[iC2]<=sLB[iD])continue;if(sL[iD]>=sL[iB])continue;
  1010. bool m3=false,m5=false;if(Bars>=8){double o1=Open[3],c1=Close[3],o2=Open[0],c2=Close[0];double b1=MathAbs(c1-o1);if(c2>o2&&c1<o1&&MathAbs(c2-o2)>b1*0.5)m3=true;}
  1011. if(iBars(NULL,PERIOD_M5)>=3){double o1=iOpen(NULL,PERIOD_M5,2),c1=iClose(NULL,PERIOD_M5,2),o2=iOpen(NULL,PERIOD_M5,1),c2=iClose(NULL,PERIOD_M5,1);double b1=MathAbs(c1-o1);if(c2>o2&&c1<o1&&MathAbs(c2-o2)>b1*0.5)m5=true;}
  1012. if(m3||m5)if(Close[0]>sL[iD]&&Close[0]<sH[iC2]){qmrA=sH[iA];qmrB=sL[iB];qmrC=sH[iC2];qmrD=sL[iD];qmrActive=true;qmrExpire=TimeCurrent()+900;return 1;}}}}
  1013. for(int iA=0;iA<lC;iA++)for(int iC2=0;iC2<lC;iC2++){if(iA==iC2)continue;if(sLB[iA]<=sLB[iC2])continue;if(sL[iC2]<=sL[iA]+10*pip)continue;
  1014. for(int iB=0;iB<hC;iB++){if(sLB[iA]<=sHB[iB])continue;if(sHB[iB]<=sLB[iC2])continue;
  1015. for(int iD=0;iD<hC;iD++){if(iB==iD)continue;if(sLB[iC2]<=sHB[iD])continue;if(sH[iD]>=sH[iB])continue;
  1016. bool m3=false,m5=false;if(Bars>=8){double o1=Open[3],c1=Close[3],o2=Open[0],c2=Close[0];double b1=MathAbs(c1-o1);if(c2<o2&&c1>o1&&MathAbs(c2-o2)>b1*0.5)m3=true;}
  1017. if(iBars(NULL,PERIOD_M5)>=3){double o1=iOpen(NULL,PERIOD_M5,2),c1=iClose(NULL,PERIOD_M5,2),o2=iOpen(NULL,PERIOD_M5,1),c2=iClose(NULL,PERIOD_M5,1);double b1=MathAbs(c1-o1);if(c2<o2&&c1>o1&&MathAbs(c2-o2)>b1*0.5)m5=true;}
  1018. if(m3||m5)if(Close[0]<sH[iD]&&Close[0]>sL[iC2]){qmrA=sL[iA];qmrB=sH[iB];qmrC=sL[iC2];qmrD=sH[iD];qmrActive=true;qmrExpire=TimeCurrent()+900;return -1;}}}}
  1019. return 0;}
  1020.  
  1021. //+------------------------------------------------------------------+
  1022. // ██ NEW HRN SYSTEM (unchanged) ██
  1023. //+------------------------------------------------------------------+
  1024. void AddRNLevel(double &arr[], int &cnt, double lv) {
  1025. if(cnt >= 100) return;
  1026. for(int i = 0; i < cnt; i++) if(MathAbs(arr[i] - lv) < 0.000001) return;
  1027. arr[cnt] = lv; cnt++;
  1028. }
  1029. double ScoreRoundNumber(double level, double pip) {
  1030. double score = 0, tol = 3 * pip;
  1031. int touches = 0, rejections_up = 0, rejections_down = 0;
  1032. for(int i = 1; i <= LOOKBACK && i < Bars; i++) {
  1033. double h = High[i], l = Low[i], c = Close[i], o = Open[i];
  1034. if(h >= level - tol && l <= level + tol) {
  1035. touches++;
  1036. if(l <= level + tol && c > level + tol) {
  1037. rejections_up++;
  1038. double body_low = MathMin(o, c), lower_wick = body_low - l, range = h - l;
  1039. if(range > 0 && lower_wick > range * 0.5) score += 5;
  1040. }
  1041. if(h >= level - tol && c < level - tol) {
  1042. rejections_down++;
  1043. double body_high = MathMax(o, c), upper_wick = h - body_high, range = h - l;
  1044. if(range > 0 && upper_wick > range * 0.5) score += 5;
  1045. }
  1046. }
  1047. }
  1048. score += touches * 3;
  1049. score += rejections_up * 8 + rejections_down * 8;
  1050. if(touches >= 4) score += 15;
  1051. else if(touches >= 3) score += 10;
  1052. else if(touches >= 2) score += 5;
  1053. return score;
  1054. }
  1055. double FindBestHiddenRoundNumber(double curPrice) {
  1056. bool jpy = (StringFind(Symbol(), "JPY") >= 0);
  1057. double pip = jpy ? 0.01 : 0.0001;
  1058. int dg = (int)MarketInfo(Symbol(), MODE_DIGITS);
  1059. if(dg <= 0) dg = 5;
  1060. double levels[]; int levelCount = 0; ArrayResize(levels, 100);
  1061. double base100 = MathFloor(curPrice / (100 * pip)) * (100 * pip);
  1062. for(int i = -1; i <= 2; i++) AddRNLevel(levels, levelCount, base100 + i * 100 * pip);
  1063. double base50 = MathFloor(curPrice / (50 * pip)) * (50 * pip);
  1064. for(int i = -2; i <= 3; i++) AddRNLevel(levels, levelCount, base50 + i * 50 * pip);
  1065. double base25 = MathFloor(curPrice / (25 * pip)) * (25 * pip);
  1066. for(int i = -3; i <= 4; i++) AddRNLevel(levels, levelCount, base25 + i * 25 * pip);
  1067. double base10 = MathFloor(curPrice / (10 * pip)) * (10 * pip);
  1068. for(int i = -5; i <= 6; i++) AddRNLevel(levels, levelCount, base10 + i * 10 * pip);
  1069. double base5 = MathFloor(curPrice / (5 * pip)) * (5 * pip);
  1070. for(int i = -4; i <= 5; i++) AddRNLevel(levels, levelCount, base5 + i * 5 * pip);
  1071. double bestLevel = 0, bestScore = -1;
  1072. for(int i = 0; i < levelCount; i++) {
  1073. double lv = levels[i], dist = MathAbs(curPrice - lv) / pip;
  1074. if(dist > 60) continue;
  1075. double distPenalty = (dist>40)?20:(dist>30)?10:(dist>20)?5:0;
  1076. double score = ScoreRoundNumber(lv, pip) - distPenalty;
  1077. if(score < 5) continue;
  1078. if(score > bestScore) { bestScore = score; bestLevel = lv; }
  1079. }
  1080. if(bestLevel == 0) {
  1081. double nearest100 = MathRound(curPrice / (100 * pip)) * (100 * pip);
  1082. double nearest50 = MathRound(curPrice / (50 * pip)) * (50 * pip);
  1083. double nearest25 = MathRound(curPrice / (25 * pip)) * (25 * pip);
  1084. double nearest10 = MathRound(curPrice / (10 * pip)) * (10 * pip);
  1085. double nearest5 = MathRound(curPrice / (5 * pip)) * (5 * pip);
  1086. double d100 = MathAbs(curPrice - nearest100), d50 = MathAbs(curPrice - nearest50);
  1087. double d25 = MathAbs(curPrice - nearest25), d10 = MathAbs(curPrice - nearest10), d5 = MathAbs(curPrice - nearest5);
  1088. if(d100 < 30 * pip) bestLevel = nearest100;
  1089. else if(d50 < 20 * pip) bestLevel = nearest50;
  1090. else if(d25 < 15 * pip) bestLevel = nearest25;
  1091. else if(d10 < 10 * pip) bestLevel = nearest10;
  1092. else bestLevel = nearest5;
  1093. }
  1094. g_hrn_score = bestScore;
  1095. return NormalizeDouble(bestLevel, dg);
  1096. }
  1097. void ScanHRNLevels(){
  1098. g_rj_cnt=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
  1099. 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];
  1100. 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++;}}}
  1101. 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++;}}}}
  1102. 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;}}
  1103. }
  1104. double FindNearestHRN(double cur){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;if(g_rj_cnt==0)return MathRound(cur/(10*pip))*(10*pip);double best=-1,lv=0;for(int i=0;i<g_rj_cnt;i++){double d=MathAbs(cur-g_rj[i].price)/pip;if(d>50)continue;double sc=(double)g_rj[i].touches/(d+1.0);if(sc>best){best=sc;lv=g_rj[i].price;}}return lv>0?lv:MathRound(cur/(10*pip))*(10*pip);}
  1105. void UpdateHRN(){
  1106. if(Bars < LOOKBACK + 10) return;
  1107. 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;
  1108. if(Time[0] != g_hrn_scan_bar) {
  1109. double newHrn = FindBestHiddenRoundNumber(Close[0]);
  1110. if(g_hrn_price == 0 || MathAbs(newHrn - g_hrn_price) > 2 * pip) {
  1111. g_hrn_price = newHrn; g_hrn_is_sup = (Close[0] > g_hrn_price);
  1112. g_hrn_brk_bars = 0; g_hrn_confirmed_break = false;
  1113. }
  1114. g_hrn_scan_bar = Time[0];
  1115. }
  1116. double tol = 1 * pip;
  1117. if(g_hrn_is_sup) {
  1118. if(Bars >= 3) {
  1119. bool candle1_below = (Close[1] < g_hrn_price - tol);
  1120. bool candle2_below = (Close[2] < g_hrn_price - tol);
  1121. if(candle1_below && candle2_below) { g_hrn_confirmed_break = true; g_hrn_brk_bars = HRN_CONFIRM_BARS; }
  1122. else if(candle1_below) g_hrn_brk_bars = 1;
  1123. else g_hrn_brk_bars = 0;
  1124. }
  1125. } else {
  1126. if(Bars >= 3) {
  1127. bool candle1_above = (Close[1] > g_hrn_price + tol);
  1128. bool candle2_above = (Close[2] > g_hrn_price + tol);
  1129. if(candle1_above && candle2_above) { g_hrn_confirmed_break = true; g_hrn_brk_bars = HRN_CONFIRM_BARS; }
  1130. else if(candle1_above) g_hrn_brk_bars = 1;
  1131. else g_hrn_brk_bars = 0;
  1132. }
  1133. }
  1134. if(g_hrn_brk_bars >= HRN_CONFIRM_BARS) {
  1135. double newHrn = FindBestHiddenRoundNumber(Close[0]);
  1136. if(MathAbs(newHrn - g_hrn_price) > 3 * pip) {
  1137. g_hrn_price = newHrn; g_hrn_is_sup = (Close[0] > g_hrn_price);
  1138. g_hrn_brk_bars = 0; g_hrn_confirmed_break = false;
  1139. Print("HRN SHIFTED to: ", DoubleToString(g_hrn_price, dg), " | Type: ", (g_hrn_is_sup ? "SUPPORT" : "RESISTANCE"), " | Score: ", DoubleToString(g_hrn_score, 1));
  1140. } else { g_hrn_is_sup = (Close[0] > g_hrn_price); g_hrn_brk_bars = 0; g_hrn_confirmed_break = false; }
  1141. }
  1142. g_hrn_str = DoubleToString(NormalizeDouble(g_hrn_price, dg), dg);
  1143. color hrnColor = g_hrn_is_sup ? NEON_GREEN : NEON_RED;
  1144. if(g_hrn_brk_bars == 1) hrnColor = NEON_YELLOW;
  1145. DrawHLine(PFX + "HRN_LINE", g_hrn_price, hrnColor, 3, STYLE_SOLID);
  1146. string ln = PFX + "HRN_LBL"; SafeDel(ln);
  1147. string typeStr = g_hrn_is_sup ? "SUP" : "RES";
  1148. string confStr = (g_hrn_brk_bars == 1) ? " [1/2]" : (g_hrn_confirmed_break ? " [SHIFTING]" : "");
  1149. ObjectCreate(0, ln, OBJ_TEXT, 0, Time[0] + Period() * 60 * 2, g_hrn_price);
  1150. ObjectSetText(ln, "HRN " + typeStr + " " + g_hrn_str + confStr, 10, "Arial Bold", hrnColor);
  1151. ObjectSetInteger(0, ln, OBJPROP_BACK, false);
  1152. }
  1153.  
  1154. //+------------------------------------------------------------------+
  1155. // S/R LEVELS (unchanged)
  1156. //+------------------------------------------------------------------+
  1157. void AddRes(double lv){if(lv<=0)return;for(int i=0;i<resCount;i++)if(MathAbs(ResLevels[i]-lv)<10*Point)return;if(resCount>=MAX_LEVELS){for(int i=0;i<MAX_LEVELS-1;i++)ResLevels[i]=ResLevels[i+1];resCount=MAX_LEVELS-1;}ResLevels[resCount++]=lv;}
  1158. void AddSup(double lv){if(lv<=0)return;for(int i=0;i<supCount;i++)if(MathAbs(SupLevels[i]-lv)<10*Point)return;if(supCount>=MAX_LEVELS){for(int i=0;i<MAX_LEVELS-1;i++)SupLevels[i]=SupLevels[i+1];supCount=MAX_LEVELS-1;}SupLevels[supCount++]=lv;}
  1159. void DrawNearestSR(){for(int i=0;i<20;i++){SafeDel(PFX+"RES_"+IntegerToString(i));SafeDel(PFX+"SUP_"+IntegerToString(i));}SafeDel(PFX+"NEAREST_RES");SafeDel(PFX+"NEAREST_SUP");if(!SHOW_SR_LINES)return;
  1160. double cur=Close[0];g_nearest_res=0;g_nearest_sup=0;double mR=999999,mS=999999;
  1161. for(int i=0;i<resCount;i++)if(ResLevels[i]>cur&&(ResLevels[i]-cur)<mR){mR=ResLevels[i]-cur;g_nearest_res=ResLevels[i];}
  1162. for(int i=0;i<supCount;i++)if(SupLevels[i]<cur&&(cur-SupLevels[i])<mS){mS=cur-SupLevels[i];g_nearest_sup=SupLevels[i];}
  1163. if(g_nearest_res>0&&!IsLineNearby(g_nearest_res,5.0))DrawHLine(PFX+"NEAREST_RES",g_nearest_res,NEON_RED,2,STYLE_SOLID);
  1164. if(g_nearest_sup>0&&!IsLineNearby(g_nearest_sup,5.0))DrawHLine(PFX+"NEAREST_SUP",g_nearest_sup,NEON_GREEN,2,STYLE_SOLID);}
  1165. 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;}}
  1166. void UpdateSR(){if(Time[0]==lastSRBar)return;lastSRBar=Time[0];if(Bars<15)return;double nR=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,10,1)],nS=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,10,1)],cur=Close[0];if(nR>0&&cur<nR-5*Point)AddRes(nR);if(nS>0&&cur>nS+5*Point)AddSup(nS);if(resCount<1)AddRes(High[1]);if(supCount<1)AddSup(Low[1]);DrawNearestSR();CheckBRK();}
  1167.  
  1168. //+------------------------------------------------------------------+
  1169. // TIMER (unchanged)
  1170. //+------------------------------------------------------------------+
  1171. 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;datetime tt=Time[0]+ps+60;double tp=High[0]+(Point*15);if(ObjectFind(0,nm)<0){ObjectCreate(0,nm,OBJ_TEXT,0,tt,tp);ObjectSetInteger(0,nm,OBJPROP_BACK,false);ObjectSetInteger(0,nm,OBJPROP_SELECTABLE,false);}ObjectSetInteger(0,nm,OBJPROP_TIME,tt);ObjectSetDouble(0,nm,OBJPROP_PRICE,tp);int mm=rem/60,ss=rem%60;string t=(mm>0?IntegerToString(mm)+":":"")+(ss<10?"0":"")+IntegerToString(ss)+"s";ObjectSetText(nm,t,13,"Arial Bold",NEON_YELLOW);}
  1172.  
  1173. //+------------------------------------------------------------------+
  1174. // NEURAL WEIGHTS INIT (unchanged)
  1175. //+------------------------------------------------------------------+
  1176. void InitNW(){NW[0]=0.852;NW[1]=0.724;NW[2]=0.913;NW[3]=0.681;NW[4]=0.795;NW[5]=0.836;NW[6]=0.772;NW[7]=0.894;NW[8]=0.623;NW[9]=0.748;NW[10]=0.887;NW[11]=0.716;NW[12]=0.661;NW[13]=0.829;NW[14]=0.753;NW[15]=0.942;NW[16]=0.784;NW[17]=0.697;NW[18]=0.871;NW[19]=0.735;NW[20]=0.813;NW[21]=0.768;NW[22]=0.932;NW[23]=0.674;NW[24]=0.845;NW[25]=0.709;NW[26]=0.888;NW[27]=0.651;NW[28]=0.921;NW[29]=0.743;NW[30]=0.802;NW[31]=0.867;NW[32]=1.24;NW[33]=-0.93;NW[34]=1.15;NW[35]=-1.08;}
  1177.  
  1178. //+------------------------------------------------------------------+
  1179. // ██ UI DRAWING - BIGGER FONTS (updated other pairs cube) ██
  1180. //+------------------------------------------------------------------+
  1181. 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);}
  1182. 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);}
  1183. 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);}
  1184. 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);}
  1185.  
  1186. //+------------------------------------------------------------------+
  1187. // OTHER PAIRS CUBE (updated with correlation indicators)
  1188. //+------------------------------------------------------------------+
  1189. void DrawOtherPairsCube(int x,int y,int w,int h){
  1190. Bx("c20",x,y,w,h,BG_DARK2,NEON_GOLD);
  1191. Tx("c20_l",x+10,y+6,"OTHER PAIRS",NEON_CYAN,11,true);
  1192. if(g_pairCount==0){
  1193. Tx("c20_v0",x+10,y+34,"No signals",CGR,11,false);
  1194. return;
  1195. }
  1196. int lY=32;
  1197. for(int i=0;i<g_pairCount && i<5;i++){
  1198. string sp=g_pairNames[i]; // already contains (+) or (-)
  1199. if(StringLen(sp)>14) sp=StringSubstr(sp,0,14);
  1200. string txt=sp+" "+g_pairSigs[i]+" "+DoubleToString(g_pairConfs[i],0)+"%";
  1201. color sc=(g_pairSigs[i]=="CALL")?NEON_GREEN:NEON_RED;
  1202. Tx("c20_p"+IntegerToString(i),x+10,y+lY,txt,sc,11,true);
  1203. lY+=19;
  1204. }
  1205. }
  1206.  
  1207. //+------------------------------------------------------------------+
  1208. // OTC QUICK CUBE (unchanged)
  1209. //+------------------------------------------------------------------+
  1210. void DrawOTCQuickCube(int x,int y,int w,int h){
  1211. Bx("c_quick",x,y,w,h,BG_DARK2,NEON_LIME);
  1212. Tx("c_quick_l",x+10,y+6,"OTC QUICK",NEON_CYAN,11,true);
  1213. int age=(int)(TimeCurrent()-Time[0]);
  1214. int ps=Period()*60;
  1215. int rem=ps-age;
  1216. if(rem<0) rem=0;
  1217. int mm=rem/60, ss=rem%60;
  1218. string tl=(mm>0?IntegerToString(mm)+"m ":"")+IntegerToString(ss)+"s";
  1219. Tx("c_quick_t",x+10,y+30,"Time: "+tl,NEON_GOLD,13,true);
  1220. double spread=MarketInfo(Symbol(),MODE_SPREAD);
  1221. color spC=(spread<=BROKER_SPREAD_THRESHOLD)?NEON_GREEN:NEON_ORANGE;
  1222. Tx("c_quick_s",x+10,y+54,"Spread: "+DoubleToString(spread,0),spC,12,true);
  1223. double v1=iVolume(NULL,PERIOD_M1,1), v2=iVolume(NULL,PERIOD_M1,2);
  1224. double vr=(v2>0)?v1/v2:0;
  1225. color vC=(vr>1.5)?NEON_RED:NEON_CYAN;
  1226. Tx("c_quick_v",x+10,y+76,"Vol: "+DoubleToString(vr,1)+"x",vC,14,true);
  1227. string es=GetEntryStatus();
  1228. color eC=GetEntryColor();
  1229. Tx("c_quick_e",x+10,y+100,es,eC,11,true);
  1230. }
  1231.  
  1232. //+------------------------------------------------------------------+
  1233. // ENTRY STATUS FUNCTIONS (unchanged)
  1234. //+------------------------------------------------------------------+
  1235. string GetEntryStatus(){
  1236. int age=(int)(TimeCurrent()-Time[0]);
  1237. int ps=Period()*60;
  1238. int rem=ps-age;
  1239. if(rem<0) rem=0;
  1240. string ms=DetectMyStrategy();
  1241. if(ms!="WAIT"){
  1242. string type=(g_strategyType=="TRAP")?"TRAP":"TREND";
  1243. if(ENTRY_MODE=="FLAG"){
  1244. if(age<FLAG_MIN_SEC) return type+" WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s";
  1245. if(rem<MIN_REMAINING_SEC) return type+" EXPIRED";
  1246. if(age>FLAG_MAX_SEC) return type+" LATE";
  1247. return type+" OPEN "+IntegerToString(rem)+"s";
  1248. }
  1249. if(age<TIME_MIN_SEC) return type+" WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s";
  1250. if(age>TIME_MAX_SEC) return type+" CLOSED";
  1251. return type+" OPEN "+IntegerToString(age)+"s";
  1252. }
  1253. if(ENTRY_MODE=="FLAG"){
  1254. if(age<FLAG_MIN_SEC) return "WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s";
  1255. if(rem<MIN_REMAINING_SEC) return "EXPIRED";
  1256. if(age>FLAG_MAX_SEC) return "LATE";
  1257. return "OPEN "+IntegerToString(rem)+"s left";
  1258. }
  1259. if(age<TIME_MIN_SEC) return "WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s";
  1260. if(age>TIME_MAX_SEC) return "CLOSED";
  1261. return "OPEN "+IntegerToString(age)+"s";
  1262. }
  1263. color GetEntryColor(){
  1264. string s=GetEntryStatus();
  1265. if(StringFind(s,"TRAP OPEN")>=0) return NEON_PURPLE;
  1266. if(StringFind(s,"TREND OPEN")>=0) return NEON_LIME;
  1267. if(StringFind(s,"OPEN")>=0) return NEON_GREEN;
  1268. if(StringFind(s,"WAIT")>=0) return NEON_YELLOW;
  1269. if(StringFind(s,"LATE")>=0 || StringFind(s,"EXPIRED")>=0 || StringFind(s,"CLOSED")>=0) return NEON_ORANGE;
  1270. return NEON_RED;
  1271. }
  1272.  
  1273. //+------------------------------------------------------------------+
  1274. // DIRECTION OK (unchanged)
  1275. //+------------------------------------------------------------------+
  1276. bool DirectionOK(){
  1277. if(!ENABLE_ENTRY_ZONE) return true;
  1278. double cur=Close[0], lo=Low[0], hi=High[0], rg=hi-lo;
  1279. if(rg==0) return true;
  1280. double pos=(cur-lo)/rg*100.0;
  1281. if(MathMax(g_calc_gProb,g_calc_rProb)>=85) return true;
  1282. string ms=DetectMyStrategy();
  1283. if(ms=="CALL") return(pos>REVERSAL_PCT);
  1284. if(ms=="PUT") return(pos<(100.0-REVERSAL_PCT));
  1285. if(StringFind(g_adv1,"CALL")>=0) return(pos>REVERSAL_PCT && (hi-cur)<rg*WICK_PCT);
  1286. if(StringFind(g_adv1,"PUT")>=0) return(pos<(100.0-REVERSAL_PCT) && (cur-lo)<rg*WICK_PCT);
  1287. return true;
  1288. }
  1289.  
  1290. //+------------------------------------------------------------------+
  1291. // ENTRY PRECISION OK (unchanged)
  1292. //+------------------------------------------------------------------+
  1293. bool EntryPrecisionOK(){
  1294. if(TRADE_MODE=="GOD") return true;
  1295. if(g_calc_gProb>80 && Close[0]<Open[0]) return false;
  1296. if(g_calc_rProb>80 && Close[0]>Open[0]) return false;
  1297. return true;
  1298. }
  1299.  
  1300. //+------------------------------------------------------------------+
  1301. // CONSENSUS FILTER (unchanged)
  1302. //+------------------------------------------------------------------+
  1303. bool ConsensusOK(){
  1304. if(!CONSENSUS_FILTER) return true;
  1305. string ms=DetectMyStrategy();
  1306. if(ms=="WAIT") return true;
  1307. bool haAgree=false;
  1308. if(ms=="CALL" && (g_haM1=="HA BULLISH 1" || g_haBoth=="BOTH BULL")) haAgree=true;
  1309. if(ms=="PUT" && (g_haM1=="HA BEARISH 1" || g_haBoth=="BOTH BEAR")) haAgree=true;
  1310. return haAgree;
  1311. }
  1312.  
  1313. //+------------------------------------------------------------------+
  1314. // TELEGRAM NOTIFICATION (unchanged)
  1315. //+------------------------------------------------------------------+
  1316. void SendTelegramAlert(string message){
  1317. if(!ENABLE_TELEGRAM) return;
  1318. if(StringLen(TELEGRAM_TOKEN)<10 || StringLen(TELEGRAM_CHAT_ID)<5) return;
  1319. string url="https://api.telegram.org/bot"+TELEGRAM_TOKEN+"/sendMessage";;
  1320. string params="?chat_id="+TELEGRAM_CHAT_ID+"&text="+message;
  1321. string headers="Content-Type: application/x-www-form-urlencoded";
  1322. string cookie="",result="";
  1323. char post[],result_data[];
  1324. int timeout=5000;
  1325. ArrayResize(post,StringToCharArray(params,post,0,WHOLE_ARRAY,CP_UTF8)-1);
  1326. int res=WebRequest("POST",url,headers,timeout,post,result_data,result);
  1327. if(res==-1) Print("Telegram: WebRequest failed.");
  1328. }
  1329.  
  1330. //+------------------------------------------------------------------+
  1331. // ██ MAIN DRAW FUNCTION (unchanged except other pairs cube) ██
  1332. //+------------------------------------------------------------------+
  1333. void Draw(){
  1334. HideSPM(); DelDashboard();
  1335. int W=DASH_W, G=8, CW=(W-2*G)/3, CH=110, cx=POS_X+G, yy=POS_Y;
  1336. int cp=0; double brain=BrainSc(cp); double nb=NeuralBiasFast(); double mw=MicroWick(); bool bf=IsBrokerForce();
  1337. g_marketMode=DetectMarketMode(brain,g_rsc,cp,nb);
  1338. if(StringLen(g_prevMode)>0 && g_prevMode!=g_marketMode){ g_signalTime=0; g_finalSignal="WAIT"; }
  1339. g_prevMode=g_marketMode;
  1340. CalcOTCCrowd(); UpdateAccuracy(); UpdateWeights();
  1341. double mai=CalcAdvancedMicroAI(); int mts=CalcAdvancedMicroTrap();
  1342. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  1343. UpdateRiskControl();
  1344. CheckMTFConfirmation();
  1345. double tfaScore=CalcAdvancedTFA(g_tfa_detail);
  1346. color ha1C=(g_haM1=="HA BULLISH 1")?NEON_GREEN:(g_haM1=="HA BEARISH 1")?NEON_RED:NEON_YELLOW;
  1347. color ha5C=(g_haM5=="HA BULLISH 5")?NEON_GREEN:(g_haM5=="HA BEARISH 5")?NEON_RED:NEON_YELLOW;
  1348. color biasClr; string biasStr=CalcAdvancedMarketBias(biasClr,brain,g_rsc);
  1349. string ms=DetectMyStrategy();
  1350. color stratC=(g_strategyType=="TRAP")?NEON_PURPLE:(g_strategyType=="TREND")?NEON_GREEN:CGR;
  1351. string stratLabel=(g_strategyType=="TRAP")?"TRAP "+ms:(g_strategyType=="TREND")?"TREND "+ms:"NO STRATEGY";
  1352. string finalSig=g_finalSignal; color sigC=NEON_YELLOW;
  1353. if(finalSig=="CALL") sigC=NEON_GREEN; else if(finalSig=="PUT") sigC=NEON_RED;
  1354. else if(finalSig=="WEAK CALL") sigC=NEON_CYAN; else if(finalSig=="WEAK PUT") sigC=NEON_ORANGE;
  1355.  
  1356. // ROW 1 - PAIR, SIGNAL, PREDICTION
  1357. Cube("c1",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"PAIR",NEON_CYAN,Symbol(),NEON_BLUE,15);
  1358. Cube("c2",cx+CW+G,yy,CW,CH,sigC,BG_DARK2,"SIGNAL",NEON_CYAN,finalSig,sigC,16);
  1359. double gP,rP; string rsn; color pClr;
  1360. CalcAdvancedPrediction(gP,rP,rsn,pClr);
  1361. g_frozen_gProb=gP; g_frozen_rProb=rP; g_frozen_pAction=rsn; g_frozen_pColor=pClr; g_last_freeze_bar=Time[0];
  1362. Bx("c_pred",cx+2*(CW+G),yy,CW,CH,BG_DARK2,pClr);
  1363. Tx("c_pred_l",cx+2*(CW+G)+10,yy+5,"NEXT CANDLE",NEON_CYAN,11,true);
  1364. int bW=CW-20, gBW=(int)(gP/100.0*bW), rBW=(int)(rP/100.0*bW);
  1365. if(gBW<3) gBW=3; if(rBW<3) rBW=3;
  1366. Bx("c_pred_gbg",cx+2*(CW+G)+10,yy+26,bW,8,BG_DARK4,BG_DARK4);
  1367. Bx("c_pred_gfg",cx+2*(CW+G)+10,yy+26,gBW,8,NEON_GREEN,NEON_GREEN);
  1368. Tx("c_pred_gp",cx+2*(CW+G)+10,yy+36,"G:"+DoubleToString(gP,0)+"%",NEON_GREEN,12,true);
  1369. Bx("c_pred_rbg",cx+2*(CW+G)+10,yy+54,bW,8,BG_DARK4,BG_DARK4);
  1370. Bx("c_pred_rfg",cx+2*(CW+G)+10,yy+54,rBW,8,NEON_RED,NEON_RED);
  1371. Tx("c_pred_rp",cx+2*(CW+G)+10,yy+64,"R:"+DoubleToString(rP,0)+"%",NEON_RED,12,true);
  1372. Tx("c_pred_a",cx+2*(CW+G)+10,yy+82,rsn,pClr,12,true);
  1373. NeonBar("c_pred_b",cx+2*(CW+G)+10,yy+96,bW,8,MathMax(gP,rP),pClr);
  1374. yy+=CH+G;
  1375.  
  1376. // ROW 2 - BRAIN, SPM, SESSION
  1377. Cube("c4",cx,yy,CW,CH,NEON_CYAN,BG_DARK3,"BRAIN",NEON_CYAN,(brain>=0?"+":"")+DoubleToString(brain,1),(brain>0)?NEON_GREEN:NEON_RED,18);
  1378. Cube("c5",cx+CW+G,yy,CW,CH,NEON_CYAN,BG_DARK3,"SPM",NEON_CYAN,(g_rsc>=0?"+":"")+DoubleToString(g_rsc,1),(g_rsc>0)?NEON_GREEN:NEON_RED,18);
  1379. color sClr=CGR; string sName=GetCurrentSession(sClr); bool isAct=IsSessionActive();
  1380. Bx("c_ses",cx+2*(CW+G),yy,CW,CH,BG_DARK2,sClr);
  1381. Tx("c_ses_l",cx+2*(CW+G)+10,yy+5,"SESSION",NEON_CYAN,11,true);
  1382. Tx("c_ses_v",cx+2*(CW+G)+10,yy+28,sName,sClr,16,true);
  1383. int gH=TimeHour(TimeGMT()), gM=TimeMinute(TimeGMT());
  1384. Tx("c_ses_t",cx+2*(CW+G)+10,yy+56,"GMT "+(gH<10?"0":"")+IntegerToString(gH)+":"+(gM<10?"0":"")+IntegerToString(gM),NEON_WHITE,13,false);
  1385. Tx("c_ses_s",cx+2*(CW+G)+10,yy+80,isAct?"ACTIVE":"LOW VOL",isAct?NEON_GREEN:NEON_ORANGE,12,true);
  1386. yy+=CH+G;
  1387.  
  1388. // ROW 3 - NEURAL AI, CROWD, STRATEGY
  1389. 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,18);
  1390. NeonBar("c7b",cx+12,yy+92,CW-24,8,nb,(nb>72)?NEON_ORANGE:(nb<35)?NEON_CYAN:NEON_GREEN);
  1391. Bx("c8",cx+CW+G,yy,CW,CH,BG_DARK2,NEON_CYAN);
  1392. Tx("c8_l",cx+CW+G+10,yy+5,"CROWD",NEON_CYAN,11,true);
  1393. Tx("c8_c",cx+CW+G+10,yy+30,"CALL "+IntegerToString(g_otcCallPct)+"%",NEON_RED,15,true);
  1394. Tx("c8_p",cx+CW+G+10,yy+56,"PUT "+IntegerToString(g_otcPutPct)+"%",NEON_GREEN,15,true);
  1395. Tx("c8_b",cx+CW+G+10,yy+84,"OTC Crowd",NEON_GOLD,11,false);
  1396. Cube("c_strat",cx+2*(CW+G),yy,CW,CH,stratC,BG_DARK3,"STRATEGY",NEON_CYAN,stratLabel,stratC,13);
  1397. yy+=CH+G;
  1398.  
  1399. // ROW 4 - MICRO AI, MICRO TRAP, TFA
  1400. color maC; string maDir;
  1401. if(mai>72){ maC=NEON_ORANGE; maDir="TRAP RISK!"; }
  1402. else if(mai>55){ maC=NEON_YELLOW; maDir="CAUTION"; }
  1403. else if(mai>45){ maC=NEON_CYAN; maDir="NEUTRAL"; }
  1404. else{ maC=NEON_GREEN; maDir="SAFE"; }
  1405. Cube("c_mai",cx,yy,CW,CH,maC,BG_DARK2,"MICRO AI",NEON_CYAN,DoubleToString(mai,0)+"%",maC,18);
  1406. NeonBar("c_mai_b",cx+12,yy+92,CW-24,8,mai,maC);
  1407. color mtsC=(mts>=90)?NEON_PURPLE:(mts>=75)?NEON_RED:(mts>=50)?NEON_ORANGE:NEON_GREEN;
  1408. string mtsL=(mts>=90)?"EXTREME TRAP":(mts>=75)?"HIGH TRAP":(mts>=50)?"MEDIUM":"CLEAR";
  1409. Cube("c_mts",cx+CW+G,yy,CW,CH,mtsC,BG_DARK2,"MICRO TRAP",NEON_CYAN,"SCORE "+IntegerToString(mts),mtsC,16);
  1410. NeonBar("c_mts_b",cx+CW+G+12,yy+92,CW-24,8,MathMin(100,mts),mtsC);
  1411. int tfaInt=(int)tfaScore; color tfaColor; string tfaLabel;
  1412. if(tfaInt>=5){ tfaLabel="STRONG"; tfaColor=NEON_GREEN; }
  1413. else if(tfaInt>=4){ tfaLabel="GOOD"; tfaColor=NEON_LIME; }
  1414. else if(tfaInt>=3){ tfaLabel="MEDIUM"; tfaColor=NEON_YELLOW; }
  1415. else if(tfaInt>=2){ tfaLabel="WEAK"; tfaColor=NEON_ORANGE; }
  1416. else{ tfaLabel="POOR"; tfaColor=C'100,100,120'; }
  1417. color tfaBC=tfaColor; string dirTxt="";
  1418. if(g_haM1=="HA BEARISH 1"||g_haM5=="HA BEARISH 5"){ tfaBC=NEON_RED; dirTxt=" [DOWN]"; }
  1419. else if(g_haM1=="HA BULLISH 1"||g_haM5=="HA BULLISH 5"){ tfaBC=NEON_GREEN; dirTxt=" [UP]"; }
  1420. else{ dirTxt=" [MIX]"; }
  1421. Bx("c_tfa",cx+2*(CW+G),yy,CW,CH,BG_DARK3,tfaBC);
  1422. Tx("c_tfa_l",cx+2*(CW+G)+10,yy+5,"TFA SCORE",NEON_CYAN,11,true);
  1423. Tx("c_tfa_v",cx+2*(CW+G)+10,yy+28,IntegerToString(tfaInt)+"/6 "+tfaLabel+dirTxt,tfaBC,13,true);
  1424. Tx("c_tfa_d",cx+2*(CW+G)+10,yy+56,g_tfa_detail,CGR,10,false);
  1425. NeonBar("c_tfa_b",cx+2*(CW+G)+10,yy+92,CW-20,8,(double)tfaInt/6.0*100.0,tfaBC);
  1426. yy+=CH+G;
  1427.  
  1428. // ROW 5 - FRACTAL, MARKET BIAS, S/R
  1429. double frac=CalcAdvancedFractal();
  1430. color frC=(frac>=75)?NEON_RED:(frac>=50)?NEON_ORANGE:(frac>=25)?NEON_YELLOW:NEON_GREEN;
  1431. string frT=(frac>=75)?"TRAP ZONE!":(frac>=50)?"WARNING":(frac>=25)?"CAUTION":"CLEAR";
  1432. Cube("c_frc",cx,yy,CW,CH,frC,BG_DARK2,"FRACTAL",NEON_CYAN,frT,frC,14);
  1433. NeonBar("c_frc_b",cx+12,yy+92,CW-24,8,frac,frC);
  1434. Bx("c_bias",cx+CW+G,yy,CW,CH,BG_DARK2,biasClr);
  1435. Tx("c_bias_l",cx+CW+G+10,yy+5,"MARKET BIAS",NEON_CYAN,11,true);
  1436. Tx("c_bias_v",cx+CW+G+10,yy+28,biasStr,biasClr,15,true);
  1437. Tx("c_bias_m",cx+CW+G+10,yy+56,"MODE: "+g_marketMode,(g_marketMode=="TREND")?NEON_GREEN:(g_marketMode=="REVERSAL")?NEON_RED:NEON_YELLOW,12,false);
  1438. color accC=(g_accuracy>=70)?NEON_GREEN:(g_accuracy>=60)?NEON_YELLOW:NEON_RED;
  1439. Tx("c_bias_a",cx+CW+G+10,yy+80,"ACC: "+DoubleToString(g_accuracy,1)+"%",accC,13,false);
  1440. NeonBar("c_bias_b",cx+CW+G+10,yy+96,CW-20,8,g_accuracy,accC);
  1441. int dg_sr=(int)MarketInfo(Symbol(),MODE_DIGITS); if(dg_sr<=0) dg_sr=5;
  1442. Bx("c18",cx+2*(CW+G),yy,CW,CH,BG_DARK2,NEON_CYAN);
  1443. Tx("c18_l",cx+2*(CW+G)+10,yy+4,"S/R LEVELS",NEON_CYAN,11,true);
  1444. Tx("c18_r",cx+2*(CW+G)+10,yy+28,"R: "+(g_nearest_res>0?DoubleToString(g_nearest_res,dg_sr):"--"),NEON_RED,14,true);
  1445. Tx("c18_s",cx+2*(CW+G)+10,yy+56,"S: "+(g_nearest_sup>0?DoubleToString(g_nearest_sup,dg_sr):"--"),NEON_GREEN,14,true);
  1446. Tx("c18_b",cx+2*(CW+G)+10,yy+84,g_brk_str,g_brk_color,13,true);
  1447. yy+=CH+G;
  1448.  
  1449. // ROW 6 - WICKS, HA CANDLES, REVERSAL
  1450. color wickC=(mw>0.70)?NEON_RED:(mw>0.50)?NEON_ORANGE:NEON_GREEN;
  1451. Bx("c15",cx,yy,CW,CH,BG_DARK2,wickC);
  1452. Tx("c15_l",cx+10,yy+5,"WICKS",NEON_CYAN,11,true);
  1453. Tx("c15_v",cx+10,yy+30,DoubleToString(mw,2),wickC,20,true);
  1454. Tx("c15_b",cx+10,yy+62,(mw>0.70)?"KILL SHOT":(mw>0.50)?"HIGH":"LOW",wickC,13,false);
  1455. NeonBar("c15_bar",cx+10,yy+92,CW-20,8,mw*100,wickC);
  1456. Bx("c_ha",cx+CW+G,yy,CW,CH,BG_DARK2,ha1C);
  1457. Tx("c_ha_l",cx+CW+G+10,yy+5,"HA CANDLES",NEON_CYAN,11,true);
  1458. Tx("c_ha_m1",cx+CW+G+10,yy+30,"M1: "+g_haM1,ha1C,14,true);
  1459. Tx("c_ha_m5",cx+CW+G+10,yy+56,"M5: "+g_haM5,ha5C,14,true);
  1460. string haComb=""; color haCombC=NEON_YELLOW;
  1461. if(g_haM1=="HA BULLISH 1" && g_haM5=="HA BULLISH 5"){ haComb="BOTH BULL"; haCombC=NEON_GREEN; }
  1462. else if(g_haM1=="HA BEARISH 1" && g_haM5=="HA BEARISH 5"){ haComb="BOTH BEAR"; haCombC=NEON_RED; }
  1463. else haComb="MIXED";
  1464. Tx("c_ha_c",cx+CW+G+10,yy+84,haComb,haCombC,13,true);
  1465. string revReason=DetectSuddenReversal(); color revColor=NEON_YELLOW;
  1466. if(StringFind(revReason,"BULL")>=0) revColor=NEON_GREEN;
  1467. if(StringFind(revReason,"BEAR")>=0) revColor=NEON_RED;
  1468. Bx("c_reason",cx+2*(CW+G),yy,CW,CH,BG_DARK2,revColor);
  1469. Tx("c_reason_l",cx+2*(CW+G)+10,yy+5,"REVERSAL",NEON_CYAN,11,true);
  1470. if(StringLen(revReason)>0){
  1471. string sr=revReason; if(StringLen(sr)>30) sr=StringSubstr(sr,0,28)+"..";
  1472. Tx("c_reason_v",cx+2*(CW+G)+10,yy+34,sr,revColor,13,false);
  1473. } else Tx("c_reason_v",cx+2*(CW+G)+10,yy+34,"No reversal",CGR,13,false);
  1474. yy+=CH+G;
  1475.  
  1476. // ROW 7 - HRN, OTHER PAIRS, OTC QUICK
  1477. int bottomW = (W - 2*G - 2*G) / 3;
  1478. int bottomH = 125;
  1479. yy += 5;
  1480. int x1 = cx;
  1481. Bx("c_hrn", x1, yy, bottomW, bottomH, BG_DARK2, NEON_PINK);
  1482. Tx("c_hrn_l", x1+8, yy+6, "HRN LEVEL", NEON_PINK, 11, true);
  1483. Tx("c_hrn_v", x1+8, yy+30, g_hrn_str, NEON_PINK, 15, true);
  1484. Tx("c_hrn_t", x1+8, yy+58, (g_hrn_is_sup?"SUPPORT":"RESISTANCE"), NEON_PINK, 12, false);
  1485. string scoreStr = "Score: "+DoubleToString(g_hrn_score,0);
  1486. color scoreC = (g_hrn_score>=30)?NEON_GREEN:(g_hrn_score>=15)?NEON_YELLOW:NEON_ORANGE;
  1487. Tx("c_hrn_sc", x1+8, yy+80, scoreStr, scoreC, 12, false);
  1488. Tx("c_hrn_b", x1+8, yy+100, "Brk "+IntegerToString(g_hrn_brk_bars)+"/"+IntegerToString(HRN_CONFIRM_BARS), NEON_PINK, 12, false);
  1489. Tx("c_hrn_s", x1+8, yy+118, g_isSideways?"SIDEWAYS":"TRENDING", g_isSideways?NEON_YELLOW:NEON_GREEN, 11, false);
  1490. int x2 = x1 + bottomW + G;
  1491. DrawOtherPairsCube(x2, yy, bottomW, bottomH);
  1492. int x3 = x2 + bottomW + G;
  1493. DrawOTCQuickCube(x3, yy, bottomW, bottomH);
  1494.  
  1495. // FILTER STATUS BAR
  1496. yy += bottomH + 5;
  1497. int fsW = W - 2*G;
  1498. color fsC = (g_filterStatus=="ALL CLEAR")?NEON_GREEN:
  1499. (g_filterStatus=="TRAP ACTIVE"||g_filterStatus=="TREND ACTIVE")?NEON_LIME:
  1500. (StringFind(g_filterStatus,"LOCK")>=0)?NEON_RED:NEON_ORANGE;
  1501. Bx("c_filter", cx, yy, fsW, 22, BG_DARK3, fsC);
  1502. Tx("c_filter_v", cx+10, yy+4, "FILTER: "+g_filterStatus, fsC, 12, true);
  1503.  
  1504. UpdateTimer(); HideSPM(); ChartRedraw();
  1505. }
  1506.  
  1507. //+------------------------------------------------------------------+
  1508. // RISK CONTROL (unchanged)
  1509. //+------------------------------------------------------------------+
  1510. void UpdateRiskControl(){
  1511. static datetime llt=0;
  1512. if(ENABLE_RISK_LOCK){
  1513. if(g_lossStreak>=MAX_LOSS_STREAK){
  1514. g_tradingStopped=true;
  1515. llt=TimeCurrent();
  1516. g_filterStatus="RISK LOCK "+IntegerToString(g_lossStreak)+"L";
  1517. }
  1518. if(g_tradingStopped && TimeCurrent()-llt>3600){
  1519. g_tradingStopped=false;
  1520. g_lossStreak=0;
  1521. g_filterStatus="RISK UNLOCK";
  1522. }
  1523. }
  1524. }
  1525.  
  1526. //+------------------------------------------------------------------+
  1527. // ██ FINAL SIGNAL ENGINE (with accuracy reverse) ██
  1528. //+------------------------------------------------------------------+
  1529. void FinalSignalEngine(double brain,int cp,int mts){
  1530. g_filterStatus="ALL CLEAR";
  1531.  
  1532. // RISK CONTROL CHECK
  1533. if(ENABLE_RISK_CONTROL && g_tradingStopped){
  1534. g_finalSignal="WAIT";
  1535. g_finalColor=NEON_ORANGE;
  1536. g_filterStatus="RISK LOCKED";
  1537. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1538. return;
  1539. }
  1540.  
  1541. // SESSION FILTER CHECK
  1542. if(ENABLE_SESSION_FILTER && !IsSessionActive()){
  1543. g_finalSignal="WAIT";
  1544. g_finalColor=NEON_ORANGE;
  1545. g_filterStatus="SESSION OFF";
  1546. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1547. return;
  1548. }
  1549.  
  1550. // MTF CONFIRMATION CHECK
  1551. if(MTF_CONFIRM && !g_mtfConfirmed){
  1552. g_finalSignal="WAIT";
  1553. g_finalColor=NEON_ORANGE;
  1554. g_filterStatus="MTF NO CONF";
  1555. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1556. return;
  1557. }
  1558.  
  1559. // SPIKE FILTER CHECK
  1560. if(ENABLE_SPIKE_FILTER && IsBigCandle(1)){
  1561. g_finalSignal="WAIT";
  1562. g_finalColor=NEON_ORANGE;
  1563. g_filterStatus="SPIKE BLOCK";
  1564. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1565. return;
  1566. }
  1567.  
  1568. // LAST SECOND BLOCK CHECK
  1569. if(ENABLE_LAST_SEC_BLOCK){
  1570. int age=(int)(TimeCurrent()-Time[0]);
  1571. int ps=Period()*60;
  1572. int rem=ps-age;
  1573. if(rem<0) rem=0;
  1574. if(rem < MIN_REMAINING_SEC){
  1575. g_finalSignal="WAIT";
  1576. g_finalColor=NEON_ORANGE;
  1577. g_filterStatus="LAST SEC BLOCK";
  1578. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1579. return;
  1580. }
  1581. }
  1582.  
  1583. // MIN CONFIDENCE CHECK
  1584. double conf=MathMax(g_calc_gProb,g_calc_rProb);
  1585. if(conf < MIN_CONFIDENCE){
  1586. g_finalSignal="WAIT";
  1587. g_finalColor=NEON_YELLOW;
  1588. g_filterStatus="LOW CONF "+DoubleToString(conf,0)+"%";
  1589. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1590. return;
  1591. }
  1592.  
  1593. // ██ ACCURACY REVERSE LOGIC ██
  1594. bool reverseSignal = false;
  1595. if(g_accuracy < 45.0 && g_acc_total > 20) {
  1596. reverseSignal = true;
  1597. g_filterStatus = "REVERSE MODE (ACC " + DoubleToString(g_accuracy,1) + "%)";
  1598. }
  1599.  
  1600. // STRATEGY SIGNAL FIRST
  1601. string ms=DetectMyStrategy();
  1602. if(ms!="WAIT"){
  1603. if(CONSENSUS_FILTER && !ConsensusOK()){
  1604. g_finalSignal="WAIT";
  1605. g_finalColor=NEON_ORANGE;
  1606. g_filterStatus="NO CONSENSUS";
  1607. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1608. return;
  1609. }
  1610. if(ENABLE_ENTRY_ZONE && !DirectionOK()){
  1611. g_finalSignal="WAIT";
  1612. g_finalColor=NEON_ORANGE;
  1613. g_filterStatus="BAD ENTRY ZONE";
  1614. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1615. return;
  1616. }
  1617. if(!EntryPrecisionOK()){
  1618. g_finalSignal="WAIT";
  1619. g_finalColor=NEON_ORANGE;
  1620. g_filterStatus="PRECISION FAIL";
  1621. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1622. return;
  1623. }
  1624. // Apply reverse if needed
  1625. if(reverseSignal) {
  1626. if(ms=="CALL") ms="PUT";
  1627. else if(ms=="PUT") ms="CALL";
  1628. }
  1629. g_finalSignal=ms;
  1630. g_finalColor=(ms=="CALL")?NEON_GREEN:NEON_RED;
  1631. g_filterStatus=(g_strategyType=="TRAP")?"TRAP ACTIVE":"TREND ACTIVE";
  1632. if(reverseSignal) g_filterStatus += " (REV)";
  1633. if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT"){
  1634. g_finalSignal=ms; g_signalTime=TimeCurrent();
  1635. }
  1636. SendSignalNotification(ms,conf);
  1637. return;
  1638. }
  1639.  
  1640. // NORMAL SIGNAL LOGIC
  1641. double th=FAST_MODE?70:68;
  1642. string rawSignal = "WAIT";
  1643. if(g_calc_gProb>th) rawSignal="CALL";
  1644. else if(g_calc_rProb>th) rawSignal="PUT";
  1645. else if(g_calc_gProb>60) rawSignal="WEAK CALL";
  1646. else if(g_calc_rProb>60) rawSignal="WEAK PUT";
  1647.  
  1648. // Apply reverse if needed
  1649. if(reverseSignal) {
  1650. if(rawSignal=="CALL") rawSignal="PUT";
  1651. else if(rawSignal=="PUT") rawSignal="CALL";
  1652. else if(rawSignal=="WEAK CALL") rawSignal="WEAK PUT";
  1653. else if(rawSignal=="WEAK PUT") rawSignal="WEAK CALL";
  1654. }
  1655. g_finalSignal = rawSignal;
  1656.  
  1657. // ENTRY ZONE CHECK
  1658. if((g_finalSignal=="CALL" || g_finalSignal=="PUT") && ENABLE_ENTRY_ZONE && !DirectionOK()){
  1659. g_finalSignal="WAIT";
  1660. g_finalColor=NEON_ORANGE;
  1661. g_filterStatus="BAD ENTRY ZONE";
  1662. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1663. return;
  1664. }
  1665. if((g_finalSignal=="CALL" || g_finalSignal=="PUT") && !EntryPrecisionOK()){
  1666. g_finalSignal="WAIT";
  1667. g_finalColor=NEON_ORANGE;
  1668. g_filterStatus="PRECISION FAIL";
  1669. if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent();
  1670. return;
  1671. }
  1672.  
  1673. if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT")
  1674. g_signalTime=TimeCurrent();
  1675.  
  1676. if(g_finalSignal=="CALL"){
  1677. g_finalColor=NEON_GREEN;
  1678. g_filterStatus=reverseSignal?"GREEN SIGNAL (REV)":"GREEN SIGNAL";
  1679. SendSignalNotification("CALL",conf);
  1680. }
  1681. else if(g_finalSignal=="PUT"){
  1682. g_finalColor=NEON_RED;
  1683. g_filterStatus=reverseSignal?"RED SIGNAL (REV)":"RED SIGNAL";
  1684. SendSignalNotification("PUT",conf);
  1685. }
  1686. else if(g_finalSignal=="WEAK CALL"){
  1687. g_finalColor=NEON_CYAN;
  1688. g_filterStatus=reverseSignal?"WEAK GREEN (REV)":"WEAK GREEN";
  1689. }
  1690. else if(g_finalSignal=="WEAK PUT"){
  1691. g_finalColor=NEON_ORANGE;
  1692. g_filterStatus=reverseSignal?"WEAK RED (REV)":"WEAK RED";
  1693. }
  1694. else{
  1695. g_finalColor=NEON_YELLOW;
  1696. }
  1697. }
  1698.  
  1699. //+------------------------------------------------------------------+
  1700. // SEND SIGNAL NOTIFICATION (unchanged)
  1701. //+------------------------------------------------------------------+
  1702. void SendSignalNotification(string sig,double conf){
  1703. if(!ENABLE_NOTIFY) return;
  1704. string msg=Symbol()+" | "+sig+" | "+DoubleToString(conf,0)+"% | "+g_filterStatus;
  1705. if(msg==g_lastNotified) return;
  1706. if(TimeCurrent()-StringToTime(TimeToString(TimeCurrent()))<10) return;
  1707. g_lastNotified=msg;
  1708. Alert(msg);
  1709. SendNotification(msg);
  1710. if(ENABLE_TELEGRAM){
  1711. string tgMsg="*AIBRAIN Signal*\n"+Symbol()+"\n"+sig+"\nConf: "+DoubleToString(conf,0)+"%\n"+g_filterStatus;
  1712. SendTelegramAlert(tgMsg);
  1713. }
  1714. Print(msg);
  1715. }
  1716.  
  1717. //+------------------------------------------------------------------+
  1718. // BROADCAST SIGNAL (unchanged)
  1719. //+------------------------------------------------------------------+
  1720. void BroadcastSignal(){
  1721. double conf=MathMax(g_frozen_gProb,g_frozen_rProb);if(conf<55)return;
  1722. string fn="OTC_Signals_Master.txt",pair=Symbol();
  1723. string sig=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
  1724. int exp=(int)(TimeCurrent()+65);
  1725. string line=pair+"|"+sig+"|"+DoubleToString(conf,0)+"|"+IntegerToString((int)TimeCurrent())+"|"+IntegerToString(exp);
  1726. int h=FileOpen(fn,FILE_READ|FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);
  1727. if(h==INVALID_HANDLE){h=FileOpen(fn,FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);if(h==INVALID_HANDLE)return;FileWriteString(h,line+"\n");FileClose(h);return;}
  1728. string content="";while(!FileIsEnding(h)){string ex=FileReadString(h);if(StringLen(ex)>10&&StringFind(ex,pair+"|")!=0)content+=ex+"\n";}
  1729. content=line+"\n"+content;
  1730. string lns[];int cnt=0,pos=0;int f=StringFind(content,"\n",pos);
  1731. while(f!=-1&&cnt<100){ArrayResize(lns,cnt+1);lns[cnt]=StringSubstr(content,pos,f-pos);cnt++;pos=f+1;f=StringFind(content,"\n",pos);}
  1732. if(pos<StringLen(content)){ArrayResize(lns,cnt+1);lns[cnt]=StringSubstr(content,pos);cnt++;}
  1733. if(cnt>50){content="";for(int i=0;i<50;i++)if(StringLen(lns[i])>10)content+=lns[i]+"\n";}
  1734. FileSeek(h,0,SEEK_SET);FileWriteString(h,content);FileFlush(h);FileClose(h);
  1735. }
  1736.  
  1737. //+------------------------------------------------------------------+
  1738. // HELPER: HA DIRECTION (unchanged)
  1739. //+------------------------------------------------------------------+
  1740. string GetPairHADirection(string pair){
  1741. double open1 = iOpen(pair, PERIOD_M1, 1);
  1742. double high1 = iHigh(pair, PERIOD_M1, 1);
  1743. double low1 = iLow(pair, PERIOD_M1, 1);
  1744. double close1= iClose(pair, PERIOD_M1, 1);
  1745. double open2 = iOpen(pair, PERIOD_M1, 2);
  1746. double high2 = iHigh(pair, PERIOD_M1, 2);
  1747. double low2 = iLow(pair, PERIOD_M1, 2);
  1748. double close2= iClose(pair, PERIOD_M1, 2);
  1749. double open3 = iOpen(pair, PERIOD_M1, 3);
  1750. double close3= iClose(pair, PERIOD_M1, 3);
  1751. if(open1==0||high1==0||low1==0||close1==0||open2==0||close2==0||open3==0||close3==0) return "NEUTRAL";
  1752. double haClose1 = (open1+high1+low1+close1)/4.0;
  1753. double haClose2 = (open2+high2+low2+close2)/4.0;
  1754. double haOpen2_approx = (open3+close3)/2.0;
  1755. double haOpen1 = (haOpen2_approx + haClose2)/2.0;
  1756. if(haClose1 > haOpen1) return "BULL";
  1757. else if(haClose1 < haOpen1) return "BEAR";
  1758. return "NEUTRAL";
  1759. }
  1760. double GetPairVolumeRatio(string pair){
  1761. double v1 = iVolume(pair, PERIOD_M1, 1);
  1762. double v2 = iVolume(pair, PERIOD_M1, 2);
  1763. if(v2 <= 0) return 1.0;
  1764. return v1 / v2;
  1765. }
  1766.  
  1767. //+------------------------------------------------------------------+
  1768. // ██ SCAN SIGNALS WITH CORRELATION AND BOOST ██
  1769. //+------------------------------------------------------------------+
  1770. double CalculateCorrelation(string sym1, string sym2) {
  1771. int bars = MathMin(iBars(sym1, PERIOD_M1, 100), iBars(sym2, PERIOD_M1, 100));
  1772. if(bars < 50) return 0;
  1773. double sum1=0, sum2=0, sum1sq=0, sum2sq=0, sum12=0;
  1774. for(int i=0; i<bars; i++) {
  1775. double c1 = iClose(sym1, PERIOD_M1, i);
  1776. double c2 = iClose(sym2, PERIOD_M1, i);
  1777. if(c1==0 || c2==0) continue;
  1778. sum1 += c1; sum2 += c2;
  1779. sum1sq += c1*c1; sum2sq += c2*c2;
  1780. sum12 += c1*c2;
  1781. }
  1782. int n = bars;
  1783. double numerator = n*sum12 - sum1*sum2;
  1784. double denom = sqrt((n*sum1sq - sum1*sum1) * (n*sum2sq - sum2*sum2));
  1785. if(denom == 0) return 0;
  1786. return numerator / denom;
  1787. }
  1788.  
  1789. void ScanSignals() {
  1790. g_pairCount = 0;
  1791. string fn = "OTC_Signals_Master.txt";
  1792. string cur = Symbol();
  1793. int h = FileOpen(fn, FILE_READ|FILE_TXT|FILE_SHARE_READ);
  1794. if(h == INVALID_HANDLE) return;
  1795.  
  1796. datetime now = TimeCurrent();
  1797. double boostConf = 0;
  1798. int boostCount = 0;
  1799. string currentPred = (g_frozen_gProb > g_frozen_rProb) ? "CALL" : "PUT";
  1800.  
  1801. while(!FileIsEnding(h) && g_pairCount < 8) {
  1802. string ln = FileReadString(h);
  1803. if(StringLen(ln) < 15) continue;
  1804. int p1 = StringFind(ln, "|");
  1805. int p2 = StringFind(ln, "|", p1+1);
  1806. int p3 = StringFind(ln, "|", p2+1);
  1807. int p4 = StringFind(ln, "|", p3+1);
  1808. if(p1<0||p2<0||p3<0||p4<0) continue;
  1809.  
  1810. string pair = StringSubstr(ln, 0, p1);
  1811. if(pair == cur) continue;
  1812.  
  1813. string sig = StringSubstr(ln, p1+1, p2-p1-1);
  1814. double conf = StringToDouble(StringSubstr(ln, p2+1, p3-p2-1));
  1815. int expTime = (int)StringToInteger(StringSubstr(ln, p4+1));
  1816.  
  1817. if(conf < 62) continue;
  1818. if(expTime < (int)(now - 15)) continue; // max 15 sec old
  1819.  
  1820. string haDir = GetPairHADirection(pair);
  1821. bool haMatch = (sig=="CALL" && haDir=="BULL") || (sig=="PUT" && haDir=="BEAR");
  1822. if(!haMatch) continue;
  1823.  
  1824. double vr = GetPairVolumeRatio(pair);
  1825. if(vr > 2.0) continue;
  1826.  
  1827. // Correlation
  1828. double corr = CalculateCorrelation(cur, pair);
  1829. bool positiveCorr = (corr > 0.5);
  1830. bool negativeCorr = (corr < -0.5);
  1831. string corrStr = positiveCorr ? "(+)" : (negativeCorr ? "(-)" : "");
  1832.  
  1833. // Effective signal for current pair
  1834. string effectiveSig = sig;
  1835. if(negativeCorr) effectiveSig = (sig=="CALL") ? "PUT" : "CALL";
  1836.  
  1837. // Boost if effective matches current prediction
  1838. if(effectiveSig == currentPred && g_frozen_gProb > 55 && g_frozen_rProb > 55) {
  1839. boostCount++;
  1840. boostConf += conf * (positiveCorr ? 1.0 : 0.8);
  1841. }
  1842.  
  1843. // Store for display (max 5)
  1844. if(g_pairCount < 5) {
  1845. g_pairNames[g_pairCount] = pair + corrStr;
  1846. g_pairSigs[g_pairCount] = sig;
  1847. g_pairConfs[g_pairCount] = conf;
  1848. g_pairCount++;
  1849. }
  1850. }
  1851. FileClose(h);
  1852.  
  1853. // Apply boost to prediction confidence
  1854. if(boostCount >= 2 && !g_tradingStopped) {
  1855. double boost = MathMin(15.0, boostConf / 10.0);
  1856. g_calc_gProb += boost;
  1857. g_calc_rProb -= boost;
  1858. if(g_calc_gProb > 92) g_calc_gProb = 92;
  1859. if(g_calc_rProb < 8) g_calc_rProb = 8;
  1860. g_filterStatus = "BOOST+" + DoubleToString(boost,0) + "%";
  1861. }
  1862. }
  1863.  
  1864. //+------------------------------------------------------------------+
  1865. // READ SPM (unchanged)
  1866. //+------------------------------------------------------------------+
  1867. void ReadSPM(){
  1868. datetime cb=Time[0];if(cb==g_last_bar&&TimeCurrent()-g_spm_t<5)return;
  1869. double v1=iCustom(NULL,PERIOD_M1,SPM_FILE,0,0),v2=iCustom(NULL,PERIOD_M1,SPM_FILE,1,0);
  1870. if(v1!=EMPTY_VALUE&&v1!=0){double sm=0.7;g_rsc=g_rsc*(1.0-sm)+v1*sm;}
  1871. if(v2!=EMPTY_VALUE&&v2!=0){double sm=0.7;g_tfa=g_tfa*(1.0-sm)+v2*sm;}
  1872. g_last_bar=cb;g_spm_t=TimeCurrent();
  1873. }
  1874.  
  1875. //+------------------------------------------------------------------+
  1876. // INIT
  1877. //+------------------------------------------------------------------+
  1878. int OnInit(){
  1879. InitNW();NuclearDeleteAll();
  1880. resCount=0;supCount=0;lastSRBar=0;g_hrn_price=0;g_hrn_brk_bars=0;g_hrn_scan_bar=0;
  1881. g_hrn_score=0;g_hrn_confirmed_break=false;
  1882. g_nearest_res=0;g_nearest_sup=0;g_rj_cnt=0;g_pairCount=0;
  1883. g_marketMode="RANGE";g_prevMode="";g_last_freeze_bar=0;
  1884. g_lastNotified="";g_copiedPair="";g_accuracy=ValidateHistoricalAccuracy();
  1885. g_acc_correct=0;g_acc_total=0;g_acc_lastBar=0;
  1886. g_lastPredGreen=50.0;g_lastPredBar=0;g_lastLogBar=0;
  1887. g_lossStreak=0;g_tradingStopped=false;g_stopStartTime=0;
  1888. g_strategyType="NONE";g_strategySignal="WAIT";g_strategyReason="";
  1889. g_frozen_gProb=50;g_frozen_rProb=50;g_calc_gProb=50;g_calc_rProb=50;
  1890. g_commonCount=0;g_wickLineCount=0;g_tfa_detail="";g_htfLevelCount=0;g_lastLevelScan=0;
  1891. g_mtfConfirmed=true;g_filterStatus="ALL CLEAR";
  1892. LoadMLWeights();EventSetTimer(1);
  1893.  
  1894. string filters="";
  1895. if(ENABLE_SESSION_FILTER) filters+="Session ";
  1896. if(ENABLE_SPIKE_FILTER) filters+="Spike ";
  1897. if(ENABLE_LAST_SEC_BLOCK) filters+="LastSec ";
  1898. if(ENABLE_RISK_CONTROL) filters+="Risk ";
  1899. if(ENABLE_ENTRY_ZONE) filters+="EntryZone ";
  1900. if(MTF_CONFIRM) filters+="MTF ";
  1901. if(CONSENSUS_FILTER) filters+="Consensus ";
  1902. if(ENABLE_NOTIFY) filters+="Notify ";
  1903.  
  1904. Print("===========================================");
  1905. Print("AIBRAIN v45.1 FINAL LOADED");
  1906. Print("HRN: Real Round Numbers + 2-Candle Close");
  1907. Print("Crowd: Exponential weighted 15 candles");
  1908. Print("Other Pairs: Correlation filter + boost");
  1909. Print("Accuracy reverse: Enabled below 45%");
  1910. Print("Active Filters: ",filters);
  1911. Print("Telegram: ",ENABLE_TELEGRAM?"ON":"OFF");
  1912. Print("===========================================");
  1913.  
  1914. return INIT_SUCCEEDED;
  1915. }
  1916.  
  1917. //+------------------------------------------------------------------+
  1918. // DEINIT
  1919. //+------------------------------------------------------------------+
  1920. void OnDeinit(const int r){
  1921. EventKillTimer();Comment("");
  1922. for(int i=ObjectsTotal()-1;i>=0;i--){string nm=ObjectName(i);if(StringFind(nm,PFX)==0)ObjectDelete(nm);}
  1923. }
  1924.  
  1925. //+------------------------------------------------------------------+
  1926. // ON TIMER
  1927. //+------------------------------------------------------------------+
  1928. void OnTimer(){
  1929. if(Bars<50)return;
  1930. static datetime last5min=0;
  1931. if(Time[0]/300 != last5min/300){ DetectHiddenLevels(); last5min=Time[0]; }
  1932. ReadSPM();CalcHA();UpdateHRN();UpdateSR();
  1933. DetectCommonPoints();DetectWickRejections();
  1934. DrawCommonPoints();DrawWickRejectLines();DrawHiddenLevels();DrawNearestSR();
  1935. int cp=0;double brain=BrainSc(cp);double nb=NeuralBiasFast();double mw=MicroWick();bool bf=IsBrokerForce();
  1936. double mai=CalcAdvancedMicroAI();int mts=CalcAdvancedMicroTrap();
  1937. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  1938. // Scan signals after prediction to get current predicted direction
  1939. ScanSignals(); // Now uses g_frozen_gProb/g_frozen_rProb for boost
  1940. FinalSignalEngine(brain,cp,mts);
  1941. BroadcastSignal();
  1942. Draw();
  1943. }
  1944.  
  1945. //+------------------------------------------------------------------+
  1946. // ON CALCULATE
  1947. //+------------------------------------------------------------------+
  1948. int OnCalculate(const int rates_total,const int prev_calculated,
  1949. const datetime &time[],const double &open[],
  1950. const double &high[],const double &low[],const double &close[],
  1951. const long &tick_volume[],const long &volume[],const int &spread[]){
  1952. return(rates_total);
  1953. }
  1954. //+------------------------------------------------------------------+
RAW Paste Data Copied
Public Pastes
Hello
Not a member of Fast Pastebin Alternative yet?
Sign Up, it unlocks many cool features!
 
We use cookies for various purposes including analytics. By continuing to use Fast Pastebin Alternative, you agree to our use of cookies as described in the Privacy Policy.  OK, I Understand