1. //+------------------------------------------------------------------+
  2. //| AIBRAIN OTC v45.1 - FINAL WITH YOUR VOLUME LOGIC |
  3. //| Fixed: OTC Quick Cube volume = 2-candle avg + no repaint |
  4. //+------------------------------------------------------------------+
  5. #property copyright "AIBRAIN ULTIMATE - KM RANA"
  6. #property version "45.1"
  7. #property strict
  8. #property indicator_chart_window
  9.  
  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 double NW[36];
  93. static double g_rsc=0,g_tfa=3;
  94. static datetime g_spm_t=0,g_last_bar=0;
  95. double ResLevels[MAX_LEVELS],SupLevels[MAX_LEVELS];
  96. int resCount=0,supCount=0;
  97. datetime lastSRBar=0;
  98. static double g_nearest_res=0,g_nearest_sup=0;
  99. static string g_brk_str="NO BRK";
  100. static color g_brk_color=CGR;
  101. struct RejLevel{double price;int touches;};
  102. static RejLevel g_rj[MAX_REJ];
  103. static int g_rj_cnt=0;
  104.  
  105. static double g_hrn_price=0;
  106. static bool g_hrn_is_sup=true;
  107. static int g_hrn_brk_bars=0;
  108. static datetime g_hrn_scan_bar=0;
  109. static string g_hrn_str="--";
  110. static double g_hrn_score=0;
  111. static bool g_hrn_confirmed_break=false;
  112.  
  113. static string g_otcCallPct=50,g_otcPutPct=50;
  114. static string g_pairNames[8],g_pairSigs[8];
  115. static double g_pairConfs[8];
  116. static int g_pairCount=0;
  117. static double g_frozen_gProb=50,g_frozen_rProb=50;
  118. static string g_frozen_pAction="UNCERTAIN";
  119. static color g_frozen_pColor=NEON_YELLOW;
  120. static double g_calc_gProb=50,g_calc_rProb=50;
  121. static string g_calc_pAction="UNCERTAIN";
  122. static color g_calc_pColor=NEON_YELLOW;
  123. static double g_gProb=50,g_rProb=50;
  124. static string g_pAction="UNCERTAIN";
  125. static color g_pColor=NEON_YELLOW;
  126. static datetime g_last_freeze_bar=0;
  127. static double g_accuracy=65.0;
  128. static int g_acc_correct=0,g_acc_total=0;
  129. static datetime g_acc_lastBar=0;
  130. static double g_lastPredGreen=50.0;
  131. static datetime g_lastPredBar=0;
  132. static string g_finalSignal="WAIT";
  133. static color g_finalColor=NEON_YELLOW;
  134. static datetime g_signalTime=0;
  135. static string g_lastNotified="";
  136. static string g_marketMode="RANGE",g_prevMode="";
  137. static int g_lossStreak=0;
  138. static bool g_tradingStopped=false;
  139. static string g_strategyType="NONE";
  140. static string g_strategyReason="";
  141. static double qmrA=0,qmrB=0,qmrC=0,qmrD=0;
  142. static bool qmrActive=false;
  143. static datetime qmrExpire=0;
  144. #define MAX_COMMON_PTS 5
  145. static double g_commonPrice[MAX_COMMON_PTS];
  146. static datetime g_commonTime[MAX_COMMON_PTS];
  147. static int g_commonCount=0;
  148. static datetime g_commonExpire[MAX_COMMON_PTS];
  149. static string g_commonType[MAX_COMMON_PTS];
  150. static datetime g_lastCommonScan=0;
  151. #define MAX_WICK_LINES 5
  152. static double g_wickLinePrice[MAX_WICK_LINES];
  153. static int g_wickLineTouches[MAX_WICK_LINES];
  154. static datetime g_wickLineExpire[MAX_WICK_LINES];
  155. static int g_wickLineCount=0;
  156. static datetime g_lastWickScan=0;
  157. static bool g_isSideways=false;
  158. static string g_tfa_detail="";
  159. static HTFLevel g_htfLevels[50];
  160. static int g_htfLevelCount=0;
  161. static bool g_mtfConfirmed=true;
  162. static string g_filterStatus="ALL CLEAR";
  163.  
  164. //+------------------------------------------------------------------+
  165. // HA CANDLE CALCULATION (unchanged)
  166. //+------------------------------------------------------------------+
  167. void CalcHA(){
  168. if(Bars<10) return;
  169. ArraySetAsSeries(Open,true); ArraySetAsSeries(High,true); ArraySetAsSeries(Low,true); ArraySetAsSeries(Close,true);
  170. static double haO1[500],haC1[500]; static datetime lb1=0;
  171. ArraySetAsSeries(haO1,true); ArraySetAsSeries(haC1,true);
  172. datetime c1=iTime(NULL,PERIOD_M1,0);
  173. if(c1!=lb1){ lb1=c1; int lim=MathMin(iBars(NULL,PERIOD_M1),500);
  174. for(int i=lim-1;i>=0;i--){ haC1[i]=(Open[i]+High[i]+Low[i]+Close[i])/4.0;
  175. if(i==lim-1) haO1[i]=(Open[i]+Close[i])/2.0; else haO1[i]=(haO1[i+1]+haC1[i+1])/2.0; }}
  176. double d1=MathAbs(haC1[1]-haO1[1]),r1=High[1]-Low[1];
  177. bool dz=(r1>0&&d1<r1*0.1),b1=(!dz&&haC1[1]>haO1[1]),be1=(!dz&&haC1[1]<haO1[1]);
  178. if(b1){g_haM1="HA BULLISH 1";g_haM1Color=clrLime;}
  179. else if(be1){g_haM1="HA BEARISH 1";g_haM1Color=clrRed;}
  180. else{g_haM1="HA DOJI 1";g_haM1Color=clrYellow;}
  181.  
  182. if(iBars(NULL,PERIOD_M5)>=10){
  183. static double haO5[200],haC5[200]; static datetime lb5=0;
  184. ArraySetAsSeries(haO5,true); ArraySetAsSeries(haC5,true);
  185. datetime c5=iTime(NULL,PERIOD_M5,0);
  186. if(c5!=lb5){ lb5=c5; int lim=MathMin(iBars(NULL,PERIOD_M5),200);
  187. 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);
  188. 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; }}
  189. double d5=MathAbs(haC5[1]-haO5[1]),r5=iHigh(NULL,PERIOD_M5,1)-iLow(NULL,PERIOD_M5,1);
  190. bool dz5=(r5>0&&d5<r5*0.1),b5=(!dz5&&haC5[1]>haO5[1]),be5=(!dz5&&haC5[1]<haO5[1]);
  191. if(b5){g_haM5="HA BULLISH 5";g_haM5Color=clrLime;}
  192. else if(be5){g_haM5="HA BEARISH 5";g_haM5Color=clrRed;}
  193. else{g_haM5="HA DOJI 5";g_haM5Color=clrYellow;}
  194. if(b1&&b5)g_haBoth="BOTH BULL"; else if(be1&&be5)g_haBoth="BOTH BEAR"; else g_haBoth="MIXED";
  195. }else{g_haM5="5 --";g_haM5Color=clrGray;g_haBoth="HA --";}
  196. }
  197.  
  198. //+------------------------------------------------------------------+
  199. // HELPER FUNCTIONS
  200. //+------------------------------------------------------------------+
  201. bool IsLineNearby(double price,double pipTol=3.0){
  202. bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=pipTol*pip;
  203. for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i);
  204. if((int)ObjectGetInteger(0,nm,OBJPROP_TYPE)==OBJ_HLINE){
  205. double lp=ObjectGetDouble(0,nm,OBJPROP_PRICE); if(MathAbs(lp-price)<tol) return true; }}
  206. return false;
  207. }
  208.  
  209. string GetCurrentSession(color &sC){
  210. int h=TimeHour(TimeGMT());
  211. if(h>=12&&h<16){sC=NEON_GOLD;return "LON+NY";}
  212. if(h>=7&&h<9){sC=NEON_CYAN;return "ASI+LON";}
  213. if(h>=7&&h<16){sC=NEON_GREEN;return "LONDON";}
  214. if(h>=12&&h<21){sC=NEON_BLUE;return "NEW YORK";}
  215. if(h>=0&&h<9){sC=NEON_ORANGE;return "ASIA";}
  216. sC=C'100,100,120'; return "SYDNEY";
  217. }
  218. bool IsSessionActive(){int h=TimeHour(TimeGMT());return(h>=7&&h<=21);}
  219. 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);}
  220. bool CheckMTFConfirmation(){
  221. if(!MTF_CONFIRM) return true;
  222. bool m1Bull=(Close[1]>Open[1]);
  223. bool m5Bull=false,m15Bull=false;
  224. if(iBars(NULL,PERIOD_M5)>=3) m5Bull=(iClose(NULL,PERIOD_M5,1)>iOpen(NULL,PERIOD_M5,1));
  225. if(iBars(NULL,PERIOD_M15)>=3) m15Bull=(iClose(NULL,PERIOD_M15,1)>iOpen(NULL,PERIOD_M15,1));
  226. int bullCount=0,bearCount=0;
  227. if(m1Bull) bullCount++; else bearCount++;
  228. if(m5Bull) bullCount++; else bearCount++;
  229. if(m15Bull) bullCount++; else bearCount++;
  230. g_mtfConfirmed=(bullCount>=2 || bearCount>=2);
  231. return g_mtfConfirmed;
  232. }
  233. double Tanh(double x){
  234. double exp2x = MathExp(2.0 * x);
  235. return (exp2x - 1.0) / (exp2x + 1.0);
  236. }
  237. double CalcFractalDimension(int period){
  238. if(period < 2) return 1.5;
  239. double sum = 0.0;
  240. for(int i = 1; i < period; i++){
  241. double range1 = High[i] - Low[i];
  242. double range2 = High[i+1] - Low[i+1];
  243. if(range1 <= 0.0 || range2 <= 0.0) continue;
  244. sum += MathLog(range1 / range2 + 0.001) * MathLog((double)i / (double)period);
  245. }
  246. double result = 2.0 - sum / period;
  247. if(result < 1.0) result = 1.0;
  248. if(result > 2.0) result = 2.0;
  249. return result;
  250. }
  251. double DetectBrokerTrap(int lookback){
  252. int bull = 0, bear = 0;
  253. for(int i = 1; i <= lookback; i++){
  254. if(Close[i] > Open[i]) bull++;
  255. else if(Close[i] < Open[i]) bear++;
  256. }
  257. double crowd = (bull > bear) ? (double)bull / lookback : (double)bear / lookback;
  258. double priceMove = MathAbs(Close[1] - Close[lookback]) / (Close[lookback] + 0.00001);
  259. if(crowd > 0.7 && priceMove < 0.002) return 0.9;
  260. if(crowd > 0.6 && priceMove > 0.001) return 0.5;
  261. return 0.3;
  262. }
  263. double QuickMedian(double &arr[], int size){
  264. double sorted[20];
  265. for(int i = 0; i < size; i++) sorted[i] = arr[i];
  266. for(int i = 0; i < size-1; i++)
  267. for(int j = i+1; j < size; j++)
  268. if(sorted[i] > sorted[j]){
  269. double tmp = sorted[i];
  270. sorted[i] = sorted[j];
  271. sorted[j] = tmp;
  272. }
  273. return (sorted[size/2] + sorted[(size-1)/2]) / 2.0;
  274. }
  275. double CalcAdvancedTFA(string &detail){
  276. if(Bars < 30){ detail = "Bars low"; return 3.0; }
  277. double score = 0; string p = "";
  278. double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  279. double adxSc = (adx>=25)?1.0:(adx>=20)?0.6:(adx>=15)?0.3:0.1;
  280. score += adxSc; p += "ADX:" + ((adxSc>=0.6)?"+":"-") + " ";
  281. double v1 = iVolume(NULL, PERIOD_M1, 1);
  282. double vA = 0; for(int i=2; i<=6; i++) vA += iVolume(NULL, PERIOD_M1, i);
  283. vA = (vA>0)? vA/5.0 : 1;
  284. double vr = v1 / vA;
  285. double volSc = (vr>=2.0)?1.0:(vr>=1.5)?0.7:(vr>=1.1)?0.4:0.1;
  286. score += volSc; p += "VOL:" + ((volSc>=0.5)?"+":"-") + " ";
  287. double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  288. double rsiSc = 0.2;
  289. if(rsi>=60 || rsi<=40) rsiSc = 1.0;
  290. else if(rsi>=55 || rsi<=45) rsiSc = 0.6;
  291. else if(rsi>=50 || rsi<=50) rsiSc = 0.3;
  292. score += rsiSc; p += "RSI:" + ((rsiSc>=0.6)?"+":"-") + " ";
  293. double atr = iATR(NULL, PERIOD_M1, 14, 1);
  294. double cs = High[1] - Low[1];
  295. double atrSc = 0.2;
  296. if(atr > 0){
  297. double r = cs / atr;
  298. if(r>=0.7 && r<=1.5) atrSc = 1.0;
  299. else if(r>=0.5 && r<=2.0) atrSc = 0.6;
  300. else atrSc = 0.3;
  301. }
  302. score += atrSc; p += "ATR:" + ((atrSc>=0.6)?"+":"-") + " ";
  303. double body = MathAbs(Close[1] - Open[1]);
  304. double range = High[1] - Low[1];
  305. double bdySc = 0.2;
  306. if(range > 0){
  307. double br = body / range;
  308. if(br>=0.6) bdySc = 1.0;
  309. else if(br>=0.4) bdySc = 0.6;
  310. else if(br>=0.2) bdySc = 0.3;
  311. }
  312. score += bdySc; p += "BODY:" + ((bdySc>=0.6)?"+":"-") + " ";
  313. double sesSc = IsSessionActive() ? 1.0 : 0.4;
  314. score += sesSc; p += "SES:" + ((sesSc>=0.7)?"+":"-");
  315. double finalScore = MathMin(6.0, score);
  316. int rounded = (int)MathRound(finalScore);
  317. string scoreStr = IntegerToString(rounded) + "/6";
  318. string dir = "MIX";
  319. if(g_haM1=="HA BULLISH 1" && g_haM5=="HA BULLISH 5") dir = "STRONG UP";
  320. else if(g_haM1=="HA BEARISH 1" && g_haM5=="HA BEARISH 5") dir = "STRONG DOWN";
  321. else if(g_haM1=="HA BULLISH 1" || g_haM5=="HA BULLISH 5") dir = "UP";
  322. else if(g_haM1=="HA BEARISH 1" || g_haM5=="HA BEARISH 5") dir = "DOWN";
  323. detail = p + " | " + scoreStr + " " + dir;
  324. g_tfa_detail = detail;
  325. return finalScore;
  326. }
  327. double CalcAdvancedMicroAI(){
  328. if(Bars<20) return 50.0; double score=50.0;
  329. for(int i=1;i<=5;i++){double r=High[i]-Low[i];if(r<=0)continue;
  330. 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;
  331. if(uw>0.60)score-=w*15; if(lw>0.60)score+=w*15;}
  332. 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;}
  333. score+=(pos5/5.0-0.5)*20.0;
  334. 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;
  335. double vl1=(double)iVolume(NULL,PERIOD_M1,1),vA=0;
  336. for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);vA/=5.0;
  337. 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;}
  338. double r1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),r5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
  339. 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;
  340. return MathMax(5.0,MathMin(95.0,score));
  341. }
  342. double VolumeTrapScore();
  343. int CalcAdvancedMicroTrap(){
  344. if(Bars<20)return 0;int score=0;double r=High[1]-Low[1];
  345. if(r>0){double uw=(High[1]-MathMax(Open[1],Close[1]))/r,lw=(MathMin(Open[1],Close[1])-Low[1])/r;
  346. 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;}
  347. double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  348. if(v2>0&&v1/v2>2.0)score+=25;else if(v2>0&&v1/v2>1.5)score+=12;
  349. double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
  350. if(rsi>78||rsi<22)score+=20;else if(rsi>72||rsi<28)score+=10;
  351. if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))score+=25;
  352. 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]);
  353. if(aG||aR)score+=15;
  354. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);if(sp>BROKER_SPREAD_THRESHOLD*1.5)score+=10;
  355. score+=(int)VolumeTrapScore();return MathMin(100,score);
  356. }
  357. double CalcAdvancedFractal(){
  358. if(Bars<15)return 0;double score=0;
  359. for(int i=2;i<=8&&i+2<Bars;i++){
  360. 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;}
  361. 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;}}
  362. 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++;}
  363. if(dj>=3)score+=25;
  364. 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;}
  365. return MathMin(100,score);
  366. }
  367. string CalcAdvancedMarketBias(color &bC,double brain,double rsc){
  368. if(Bars<30){bC=NEON_YELLOW;return "CALCULATING";}
  369. double score=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  370. double pc=Close[0]-Close[10];
  371. 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;
  372. double hh1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hh2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)];
  373. double ll1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],ll2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)];
  374. 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;
  375. double ema20=0,ema20p=0;for(int i=0;i<20;i++)ema20+=Close[i];ema20/=20;
  376. for(int i=1;i<=20&&i<Bars;i++)ema20p+=Close[i];ema20p/=20;
  377. if(ema20>ema20p)score+=3;else if(ema20<ema20p)score-=3;
  378. double ema50=0;for(int i=0;i<50&&i<Bars;i++)ema50+=Close[i];ema50/=MathMin(50,Bars);
  379. if(ema20>ema50)score+=3;else score-=3;
  380. 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++;}
  381. if(gC>=7)score+=3;else if(rC>=7)score-=3;else if(gC>=5)score+=1;else if(rC>=5)score-=1;
  382. 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");
  383. if(m1B&&m5B)score+=4;else if(m1Be&&m5Be)score-=4;else if(m1B)score+=2;else if(m1Be)score-=2;
  384. 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);
  385. if(adx>20){if(pDI>mDI+5)score+=4;else if(mDI>pDI+5)score-=4;}
  386. if(brain>3)score-=2;else if(brain<-3)score+=2;
  387. if(Close[1]>Open[1])score+=1;else if(Close[1]<Open[1])score-=1;
  388. if(rsc>2)score+=1;else if(rsc<-2)score-=1;
  389. if(score>=12){bC=NEON_GREEN;return "STRONG BULL";}
  390. if(score>=7){bC=NEON_GREEN;return "BULLISH";}
  391. if(score>=3){bC=NEON_CYAN;return "LIGHT BULL";}
  392. if(score<=-12){bC=NEON_RED;return "STRONG BEAR";}
  393. if(score<=-7){bC=NEON_RED;return "BEARISH";}
  394. if(score<=-3){bC=NEON_ORANGE;return "LIGHT BEAR";}
  395. bC=NEON_YELLOW;return "NEUTRAL";
  396. }
  397. void CalcAdvancedPrediction(double &gP, double &rP, string &reason, color &pC){
  398. if(Bars < 50){ gP = 50; rP = 50; reason = "Bars low"; pC = NEON_YELLOW; return; }
  399. bool jpy = (StringFind(Symbol(), "JPY") >= 0);
  400. double pip = jpy ? 0.01 : 0.0001;
  401. double green = 0, red = 0;
  402. double body1 = MathAbs(Close[1] - Open[1]);
  403. double range1 = High[1] - Low[1];
  404. if(range1 > 0) {
  405. double wick_ratio = (range1 - body1) / range1;
  406. double upper_wick = High[1] - MathMax(Open[1], Close[1]);
  407. double lower_wick = MathMin(Open[1], Close[1]) - Low[1];
  408. if(upper_wick > range1 * 0.60 && Close[1] > Open[1]) red += 22;
  409. else if(lower_wick > range1 * 0.60 && Close[1] < Open[1]) green += 22;
  410. else if(wick_ratio > 0.55) { if(upper_wick > lower_wick) red += 12; else green += 12; }
  411. }
  412. double rsi = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 1);
  413. double cci = iCCI(NULL, PERIOD_M1, 14, PRICE_TYPICAL, 1);
  414. double stochK = iStochastic(NULL, PERIOD_M1, 5, 3, 3, MODE_SMA, 0, MODE_MAIN, 1);
  415. int oversold_signals = 0, overbought_signals = 0;
  416. if(rsi < 30) oversold_signals++; else if(rsi > 70) overbought_signals++;
  417. if(cci < -120) oversold_signals++; else if(cci > 120) overbought_signals++;
  418. if(stochK < 20) oversold_signals++; else if(stochK > 80) overbought_signals++;
  419. if(oversold_signals >= 3) green += 18;
  420. else if(oversold_signals >= 2) green += 12;
  421. else if(overbought_signals >= 3) red += 18;
  422. else if(overbought_signals >= 2) red += 12;
  423. double rsiPrev = iRSI(NULL, PERIOD_M1, 14, PRICE_CLOSE, 5);
  424. double low1 = Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 5, 1)];
  425. double low2 = Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 5, 6)];
  426. double high1 = High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 5, 1)];
  427. double high2 = High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 5, 6)];
  428. if(low1 < low2 && rsi > rsiPrev && rsi < 45) green += 15;
  429. if(high1 > high2 && rsi < rsiPrev && rsi > 55) red += 15;
  430. double v1 = iVolume(NULL, PERIOD_M1, 1);
  431. double vAvg = 0; for(int i=2; i<=10; i++) vAvg += iVolume(NULL, PERIOD_M1, i);
  432. vAvg = (vAvg > 0) ? vAvg / 9.0 : 1.0;
  433. double vol_ratio = (vAvg > 0) ? v1 / vAvg : 1.0;
  434. if(vol_ratio > 2.0) { if(Close[1] > Open[1]) red += 20; else green += 20; }
  435. else if(vol_ratio > 1.5) { if(Close[1] > Open[1]) red += 12; else green += 12; }
  436. else if(vol_ratio > 1.2) { if(Close[1] > Open[1]) green += 5; else red += 5; }
  437. double m1_haC1 = (Open[1]+High[1]+Low[1]+Close[1])/4.0;
  438. double m1_haC2 = (Open[2]+High[2]+Low[2]+Close[2])/4.0;
  439. double m1_haO2_apx = (Open[3]+Close[3])/2.0;
  440. double m1_haO1 = (m1_haO2_apx + m1_haC2)/2.0;
  441. bool haBull1 = (m1_haC1 > m1_haO1);
  442. double haStrength1 = MathAbs(m1_haC1 - m1_haO1) / (High[1] - Low[1] + 0.00001);
  443. bool haBull5 = false;
  444. double haStrength5 = 0;
  445. if(iBars(NULL, PERIOD_M5) >= 5) {
  446. double m5_o1=iOpen(NULL,PERIOD_M5,1), m5_h1=iHigh(NULL,PERIOD_M5,1);
  447. double m5_l1=iLow(NULL,PERIOD_M5,1), m5_c1=iClose(NULL,PERIOD_M5,1);
  448. double m5_o2=iOpen(NULL,PERIOD_M5,2), m5_h2=iHigh(NULL,PERIOD_M5,2);
  449. double m5_l2=iLow(NULL,PERIOD_M5,2), m5_c2=iClose(NULL,PERIOD_M5,2);
  450. double m5_o3=iOpen(NULL,PERIOD_M5,3), m5_c3=iClose(NULL,PERIOD_M5,3);
  451. double m5_haC1 = (m5_o1+m5_h1+m5_l1+m5_c1)/4.0;
  452. double m5_haC2 = (m5_o2+m5_h2+m5_l2+m5_c2)/4.0;
  453. double m5_haO2_apx = (m5_o3+m5_c3)/2.0;
  454. double m5_haO1 = (m5_haO2_apx + m5_haC2)/2.0;
  455. haBull5 = (m5_haC1 > m5_haO1);
  456. haStrength5 = MathAbs(m5_haC1 - m5_haO1) / (m5_h1 - m5_l1 + 0.00001);
  457. }
  458. if(haBull1 && haBull5) green += 15;
  459. else if(!haBull1 && !haBull5) red += 15;
  460. else if(haBull1 && haStrength1 > 0.5) green += 8;
  461. else if(!haBull1 && haStrength1 > 0.5) red += 8;
  462. double adx = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MAIN, 1);
  463. double plusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_PLUSDI, 1);
  464. double minusDI = iADX(NULL, PERIOD_M1, 14, PRICE_CLOSE, MODE_MINUSDI, 1);
  465. if(adx > 25) {
  466. double diDiff = plusDI - minusDI;
  467. if(diDiff > 8) green += 12;
  468. else if(diDiff > 4) green += 8;
  469. else if(diDiff < -8) red += 12;
  470. else if(diDiff < -4) red += 8;
  471. } else if(adx > 15) {
  472. if(plusDI > minusDI) green += 4;
  473. else red += 4;
  474. } else { if(Close[1] > Open[1]) red += 3; else green += 3; }
  475. double sup = Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 20, 2)];
  476. double res = High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 20, 2)];
  477. double distToRes = (res - Close[0]) / pip;
  478. double distToSup = (Close[0] - sup) / pip;
  479. if(distToRes < 8 && distToRes >= 0) red += 12;
  480. else if(distToRes < 15 && distToRes >= 0) red += 6;
  481. if(distToSup < 8 && distToSup >= 0) green += 12;
  482. else if(distToSup < 15 && distToSup >= 0) green += 6;
  483. if(g_hrn_price > 0) {
  484. double distToHRN = MathAbs(Close[0] - g_hrn_price) / pip;
  485. if(distToHRN < 5) { if(Close[0] > g_hrn_price) red += 8; else green += 8; }
  486. }
  487. double macdMain = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, 1);
  488. double macdSig = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, 1);
  489. double macdPrev = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, 2);
  490. double macdSigPrev = iMACD(NULL, PERIOD_M1, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, 2);
  491. if(macdMain > macdSig && macdPrev <= macdSigPrev) green += 10;
  492. else if(macdMain < macdSig && macdPrev >= macdSigPrev) red += 10;
  493. else if(macdMain > macdSig) green += 5;
  494. else if(macdMain < macdSig) red += 5;
  495. if(g_otcCallPct >= 75 && !haBull1) red += 15;
  496. else if(g_otcPutPct >= 75 && haBull1) green += 15;
  497. else if(g_otcCallPct >= 65 && !haBull1) red += 8;
  498. else if(g_otcPutPct >= 65 && haBull1) green += 8;
  499. bool isHammer = (Low[1] == Low[iLowest(NULL, PERIOD_M1, MODE_LOW, 3, 1)] && Close[1] > Open[1] && (Close[1] - Low[1]) > (High[1] - Close[1]) * 2);
  500. bool isShootingStar = (High[1] == High[iHighest(NULL, PERIOD_M1, MODE_HIGH, 3, 1)] && Close[1] < Open[1] && (High[1] - Close[1]) > (Close[1] - Low[1]) * 2);
  501. if(isHammer) green += 10;
  502. if(isShootingStar) red += 10;
  503. int streak = 0; bool streakDir = (Close[1] > Open[1]);
  504. for(int i = 1; i <= 8 && i < Bars; i++) { bool candleUp = (Close[i] > Open[i]); if(candleUp == streakDir) streak++; else break; }
  505. if(streak >= 5) { if(streakDir) red += 8; else green += 8; }
  506. else if(streak >= 4) { if(streakDir) red += 5; else green += 5; }
  507. double diff = MathMax(-100.0, MathMin(100.0, green - red));
  508. gP = MathMax(8.0, MathMin(92.0, 50.0 + diff * 0.65));
  509. rP = 100.0 - gP;
  510. double dom = MathMax(gP, rP);
  511. if(dom >= 82) { reason = (gP > rP) ? "STRONG GREEN" : "STRONG RED"; pC = (gP > rP) ? NEON_GREEN : NEON_RED; }
  512. else if(dom >= 72) { reason = (gP > rP) ? "GREEN" : "RED"; pC = (gP > rP) ? NEON_GREEN : NEON_RED; }
  513. else if(dom >= 60) { reason = (gP > rP) ? "WEAK GREEN" : "WEAK RED"; pC = (gP > rP) ? NEON_CYAN : NEON_ORANGE; }
  514. else { reason = "WAIT"; pC = NEON_YELLOW; }
  515. }
  516. string DetectMyStrategy(){
  517. int cc=g_otcCallPct,cp=g_otcPutPct,thr=STRATEGY_THRESHOLD;
  518. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TRAP_ONLY"){
  519. if(cc>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TRAP";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA RED";return "PUT";}
  520. if(cp>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TRAP";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA GREEN";return "CALL";}}
  521. if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TREND_ONLY"){
  522. if(cc>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TREND";g_strategyReason="CALL "+IntegerToString(cc)+"% + HA GREEN";return "CALL";}
  523. if(cp>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TREND";g_strategyReason="PUT "+IntegerToString(cp)+"% + HA RED";return "PUT";}}
  524. g_strategyType="NONE"; g_strategyReason="Wait "+IntegerToString(thr)+"% + HA"; return "WAIT";
  525. }
  526. void CalcOTCCrowd(){
  527. int cS=0,pS=0;
  528. int weights[15];
  529. for(int w=0; w<15; w++) weights[w] = 15 - w*2; for(int w=0; w<15; w++) if(weights[w]<1) weights[w]=1;
  530. for(int i=1; i<=15 && i<Bars; i++){
  531. double rg=High[i]-Low[i]; if(rg<=0) continue;
  532. double uw=(High[i]-MathMax(Open[i],Close[i]))/rg,lw=(MathMin(Open[i],Close[i])-Low[i])/rg;
  533. int wgt = weights[i-1];
  534. if(uw>0.70 && Close[i]<Open[i]) cS += 4 * wgt;
  535. if(lw>0.70 && Close[i]>Open[i]) pS += 4 * wgt;
  536. if(uw>0.55 && Close[i]<Open[i]) cS += 2 * wgt;
  537. if(lw>0.55 && Close[i]>Open[i]) pS += 2 * wgt;
  538. if(Close[i]>Open[i]) cS += 1 * wgt;
  539. else if(Close[i]<Open[i]) pS += 1 * wgt;
  540. }
  541. int tot=cS+pS; if(tot==0){g_otcCallPct=50;g_otcPutPct=50;}
  542. else{
  543. int rC=(int)(cS*100.0/tot),rP=100-rC;
  544. if(rC>=rP){g_otcCallPct=MathMax(50,rC);g_otcPutPct=100-g_otcCallPct;}
  545. else{g_otcPutPct=MathMax(50,rP);g_otcCallPct=100-g_otcPutPct;}
  546. }
  547. }
  548. double BrainSc(int &cp){
  549. double s=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  550. double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,LB,1)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,LB,1)];
  551. double bH=MathMax(Open[1],Close[1]),bL=MathMin(Open[1],Close[1]);
  552. if(High[1]>res&&bL<res)s-=4;if(Low[1]<sup&&bH>sup)s+=4;
  553. if(High[0]>res)s-=2;if(Low[0]<sup)s+=2;
  554. double atr=iATR(NULL,PERIOD_M1,14,1);
  555. if(atr!=0){double cn=(High[1]-Low[1])/atr,v1=(double)iVolume(NULL,PERIOD_M1,1),va=0;
  556. for(int i=2;i<=10;i++)va+=iVolume(NULL,PERIOD_M1,i);va/=9.0;
  557. double vr=va>0?v1/va:1;if(cn>1.2&&vr>1.5){if(Close[1]>Open[1])s-=3;else s+=3;}}
  558. int c=0;for(int i=1;i<=30;i++)if(Close[i]>Open[i])c++;
  559. cp=(int)(c*100.0/30.0);if(cp>=70)s-=5;if(cp<=30)s+=5;s*=1.5;
  560. 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;
  561. if(bd<rg*0.2)dj++;double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];
  562. if(uw>bd*3)s+=2;if(lw>bd*3)s-=2;}if(dj>=4)s*=1.5;
  563. 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;}
  564. int h=TimeHour(TimeCurrent());double mul=1.0;
  565. if((h>=0&&h<=2)||(h>=8&&h<=11)||(h>=14&&h<=17))mul=1.20;if(h>=3&&h<=7)mul=0.90;
  566. return s*mul;
  567. }
  568. 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;}
  569. double VolumeTrapScore(){
  570. if(!VOLUME_PROFILE_TRAP||Bars<50)return 0;
  571. double cur=Close[0],hi=High[iHighest(NULL,0,MODE_HIGH,50,1)],lo=Low[iLowest(NULL,0,MODE_LOW,50,1)];
  572. 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};
  573. 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]++;}
  574. for(int z=0;z<zn;z++)if(zc[z]>0)vz[z]/=zc[z];
  575. int cz=(int)((cur-lo)/zs);if(cz<0)cz=0;if(cz>=zn)cz=zn-1;
  576. double vr=(double)Volume[1]/(vz[cz]+0.001);double wr=MicroWick();
  577. if(vr>2.0&&wr>0.65)return 25;if(vr>1.8&&wr>0.55)return 15;return 0;
  578. }
  579. double UltimateTrapScore(){double wr=MicroWick(),v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  580. double avg=v2>0?v2:1.0,vr=v1/avg,rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1),sc=0.0;
  581. if(wr>0.65)sc+=40;if(vr>2.0)sc+=30;if(rsi>75||rsi<25)sc+=20;
  582. if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))sc+=25;
  583. sc+=VolumeTrapScore();return MathMin(100.0,sc);}
  584. bool IsBrokerForce(double dummy=0){
  585. int sd=0;for(int i=1;i<=3;i++){if(Close[i]>Open[i])sd++;else sd--;}
  586. double v1=(double)iVolume(NULL,PERIOD_M1,1),v2=(double)iVolume(NULL,PERIOD_M1,2);
  587. double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);
  588. return(MathAbs(sd)==3&&v1>v2*2.0&&sp>BROKER_SPREAD_THRESHOLD);
  589. }
  590. double NeuralBiasFast(){double r=NeuralBias(0)*0.3+NeuralBias(1)*0.7;if(r>96)r=96;if(r<4)r=4;return r;}
  591. double NeuralBias(int s){
  592. 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;
  593. f[4]=fSpread()/100.0;f[5]=fMem(s)/100.0;f[6]=fTick(s)/100.0;f[7]=fFrac(s)/100.0;
  594. 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);}
  595. 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;
  596. }
  597. 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;}
  598. 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;}
  599. 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;}
  600. 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;}
  601. double fSpread(){double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);return sp>8?90:sp>5?70:sp>3?40:0;}
  602. 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;}
  603. 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;}
  604. 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;}
  605. void CalcPrediction(double brain,double nb,int cp,double mai,int mts,double rsc,bool bf,double mw){
  606. string ms=DetectMyStrategy();bool sA=(ms!="WAIT");
  607. if(sA&&g_strategyType=="TRAP"){
  608. 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;}
  609. 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;}}
  610. double tS=UltimateTrapScore();bool bF2=IsBrokerForce();
  611. 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;}}
  612. 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;}
  613. double gS=0,rS=0,ab=MathMax(0.70,MathMin(1.30,g_accuracy/65.0));
  614. if(IsSidewaysMarket()){bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  615. 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);
  616. 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;}
  617. if(nR)rS+=20;if(nS)gS+=20;}
  618. 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;}}
  619. if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")gS+=60;
  620. else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")rS+=60;
  621. else if(g_haM1=="HA BULLISH 1")gS+=30;else if(g_haM1=="HA BEARISH 1")rS+=30;
  622. if(HA_ALIGN_FILTER && g_haBoth=="MIXED"){gS*=0.5;rS*=0.5;}
  623. gS+=(nb-50)/50.0*22*ab;rS-=(nb-50)/50.0*22*ab;
  624. double bn=MathMax(-1.0,MathMin(1.0,brain/10.0));gS+=bn*15*ab;rS-=bn*15*ab;
  625. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  626. if(g_nearest_res>0&&(g_nearest_res-Close[0])<10*pip)rS+=12;
  627. if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<10*pip)gS+=12;
  628. double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi1>70)rS+=6;if(rsi1<30)gS+=6;
  629. double sn=MathMax(-1.0,MathMin(1.0,rsc/3.0));gS+=sn*8*ab;rS-=sn*8*ab;
  630. double wRS=GetWickRejectSignal();gS+=(wRS>0?wRS:0);rS+=(wRS<0?MathAbs(wRS):0);
  631. double cPS=GetCommonPointSignal();gS+=(cPS>0?cPS:0);rS+=(cPS<0?MathAbs(cPS):0);
  632. int rd=DetectRSIDivergence();if(rd==1)gS+=20;if(rd==-1)rS+=20;
  633. int cp2=DetectClassicPatterns();if(cp2==1)gS+=12;if(cp2==-1)rS+=12;
  634. int qm=DetectQMR();if(qm==1)gS+=25;if(qm==-1)rS+=25;
  635. int sk=StreakReversalSignal();if(sk==1)gS+=18;if(sk==-1)rS+=18;
  636. 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;}
  637. int vs=SmartVolumeSignal();if(vs==1)gS+=12;if(vs==-1)rS+=12;
  638. if(!IsVolatilityGood()){gS*=0.5;rS*=0.5;}
  639. double diff=MathMax(-100.0,MathMin(100.0,gS-rS));
  640. g_gProb=MathMax(8.0,MathMin(92.0,50.0+(diff/1.8)));g_rProb=100.0-g_gProb;
  641. if(sA&&g_strategyType=="TREND"){
  642. if(ms=="CALL"){g_gProb=MathMax(g_gProb,85.0);g_rProb=100.0-g_gProb;}
  643. if(ms=="PUT"){g_rProb=MathMax(g_rProb,85.0);g_gProb=100.0-g_rProb;}
  644. g_gProb=MathMin(92.0,MathMax(8.0,g_gProb));g_rProb=100.0-g_gProb;}
  645. double dom=MathMax(g_gProb,g_rProb);
  646. 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;}}}
  647. 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;}}}
  648. else{if(!sA){g_pAction="WAIT";g_pColor=NEON_YELLOW;}}
  649. g_calc_gProb=g_gProb;g_calc_rProb=g_rProb;g_calc_pAction=g_pAction;g_calc_pColor=g_pColor;
  650. }
  651. void DetectCommonPoints(){
  652. if(!SHOW_COMMON_POINTS){g_commonCount=0;return;}
  653. if(Time[0]==g_lastCommonScan)return;g_lastCommonScan=Time[0];g_commonCount=0;
  654. datetime nowBar=Time[0];int periodSec=PeriodSeconds(PERIOD_M1);
  655. double m5h=iHigh(NULL,PERIOD_M5,iHighest(NULL,PERIOD_M5,MODE_HIGH,10,1));
  656. double m5l=iLow(NULL,PERIOD_M5,iLowest(NULL,PERIOD_M5,MODE_LOW,10,1));
  657. 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++;}
  658. 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++;}
  659. 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++;}
  660. 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++;}
  661. 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--;}
  662. }
  663. void DrawCommonPoints(){
  664. 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));}
  665. if(!SHOW_COMMON_POINTS||g_commonCount==0)return;
  666. for(int i=0;i<g_commonCount;i++){if(TimeCurrent()>g_commonExpire[i])continue;if(IsLineNearby(g_commonPrice[i],8.0))continue;
  667. string id=PFX+"COMMON_"+IntegerToString(i),idL=PFX+"COMMON_L_"+IntegerToString(i),idH=PFX+"COMMON_HL_"+IntegerToString(i);color zc=DARK_BLUE_NEON;
  668. 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);
  669. ObjectCreate(0,id,OBJ_TEXT,0,Time[0],g_commonPrice[i]);ObjectSetText(id,"*",16,"Arial",zc);ObjectSetInteger(0,id,OBJPROP_BACK,false);
  670. string lbl=(g_commonType[i]=="CALL")?"^ CALL ZONE":"v PUT ZONE";
  671. 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);}
  672. }
  673. void DetectWickRejections(){
  674. g_isSideways=IsSidewaysMarket();if(!SHOW_WICK_REJECT_LINES){g_wickLineCount=0;return;}
  675. if(Time[0]==g_lastWickScan)return;g_lastWickScan=Time[0];
  676. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double zone=WICK_ZONE_PIPS*pip*2;double cur=Close[0];
  677. g_wickLineCount=0;datetime now=Time[0],expT=now+PeriodSeconds(PERIOD_M1)*WICK_EXPIRE_BARS*2;
  678. for(int i=1;i<=40&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue;
  679. double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i];double rl=0;bool fd=false;
  680. if(uw>rg*0.30){rl=High[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
  681. if(lw>rg*0.30){rl=Low[i];if(MathAbs(cur-rl)<zone*3)fd=true;}
  682. if(!fd)continue;bool ex=false;
  683. for(int j=0;j<g_wickLineCount;j++)if(MathAbs(g_wickLinePrice[j]-rl)<zone){g_wickLineTouches[j]++;ex=true;break;}
  684. if(!ex&&g_wickLineCount<MAX_WICK_LINES){g_wickLinePrice[g_wickLineCount]=rl;g_wickLineTouches[g_wickLineCount]=1;g_wickLineExpire[g_wickLineCount]=expT;g_wickLineCount++;}}
  685. 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--;}
  686. }
  687. void DrawWickRejectLines(){
  688. for(int i=0;i<MAX_WICK_LINES;i++){SafeDel(PFX+"WICK_"+IntegerToString(i));SafeDel(PFX+"WICK_L_"+IntegerToString(i));}
  689. if(!SHOW_WICK_REJECT_LINES||!g_isSideways)return;
  690. bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double cur=Close[0];
  691. 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;
  692. string id=PFX+"WICK_"+IntegerToString(i),idL=PFX+"WICK_L_"+IntegerToString(i);color lc=C'0,180,255';
  693. 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);
  694. string lbl="W"+IntegerToString(g_wickLineTouches[i])+"x";
  695. 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);}
  696. }
  697. 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;
  698. for(int i=0;i<g_wickLineCount;i++){double d=MathAbs(Close[0]-g_wickLinePrice[i])/pip;bool iS=(g_wickLinePrice[i]<Close[0]);
  699. 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));}
  700. double GetCommonPointSignal(){if(g_commonCount==0)return 0;double sc=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;
  701. 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));}
  702. void DetectHiddenLevels(){g_htfLevelCount=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001;double curP=Close[0];
  703. double rU=MathCeil(curP/(10*pip))*(10*pip),rD=MathFloor(curP/(10*pip))*(10*pip);
  704. if(MathAbs(curP-rU)/pip<=15)AddLevel(rU,"ROUND","RESISTANCE",TimeCurrent(),8,true);
  705. if(MathAbs(curP-rD)/pip<=15)AddLevel(rD,"ROUND","SUPPORT",TimeCurrent(),8,true);
  706. DetectHTFLevels(PERIOD_M5,"M5",3,pip);DetectHTFLevels(PERIOD_M15,"M15",5,pip);DetectHTFLevels(PERIOD_M30,"M30",7,pip);DetectHTFLevels(PERIOD_H1,"H1",9,pip);
  707. SortLevelsByStrength();}
  708. 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];
  709. 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);}
  710. 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);}}}
  711. 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;}
  712. 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;}
  713. 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;
  714. for(int i=0;i<g_htfLevelCount;i++)if(MathAbs(g_htfLevels[i].price-price)/pip<5)return;
  715. 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++;}
  716. 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;}}
  717. void DrawHiddenLevels(){for(int i=0;i<50;i++){SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i));SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i)+"_LBL");}
  718. int dc=MathMin(10,g_htfLevelCount);int drawn=0;
  719. 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;
  720. 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);
  721. 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);
  722. 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++;}}
  723. 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 "";}
  724. void SafeDel(string id){if(ObjectFind(0,id)>=0)ObjectDelete(0,id);}
  725. 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);}
  726. 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);}}
  727. 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);}}
  728. 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);}}
  729. 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;}
  730. 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);}}
  731. 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();}
  732. 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];}
  733. 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;}
  734. 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]));}}
  735. 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";}
  736. 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;}
  737. 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;}
  738. 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;}
  739. 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;}
  740. 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;}
  741. double GetADXStrength(){if(Bars<20)return 0;return iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);}
  742. 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;}
  743. 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;}
  744. 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;
  745. 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++;}}}
  746. 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;}}
  747. 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;}
  748. 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;
  749. 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++;}
  750. 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++;}
  751. if(hC<2||lC<2)return 0;
  752. 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;
  753. for(int iB=0;iB<lC;iB++){if(sHB[iA]<=sLB[iB])continue;if(sLB[iB]<=sHB[iC2])continue;
  754. for(int iD=0;iD<lC;iD++){if(iB==iD)continue;if(sHB[iC2]<=sLB[iD])continue;if(sL[iD]>=sL[iB])continue;
  755. 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;}
  756. 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;}
  757. 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;}}}}
  758. 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;
  759. for(int iB=0;iB<hC;iB++){if(sLB[iA]<=sHB[iB])continue;if(sHB[iB]<=sLB[iC2])continue;
  760. for(int iD=0;iD<hC;iD++){if(iB==iD)continue;if(sLB[iC2]<=sHB[iD])continue;if(sH[iD]>=sH[iB])continue;
  761. 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;}
  762. 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;}
  763. 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;}}}}
  764. return 0;}
  765. void AddRNLevel(double &arr[], int &cnt, double lv) { if(cnt >= 100) return; for(int i=0;i<cnt;i++) if(MathAbs(arr[i]-lv)<0.000001) return; arr[cnt]=lv; cnt++; }
  766. double ScoreRoundNumber(double level, double pip) {
  767. double score=0, tol=3*pip; int touches=0, rejections_up=0, rejections_down=0;
  768. for(int i=1;i<=LOOKBACK && i<Bars;i++){ double h=High[i], l=Low[i], c=Close[i], o=Open[i];
  769. if(h>=level-tol && l<=level+tol){ touches++;
  770. if(l<=level+tol && c>level+tol){ rejections_up++; double body_low=MathMin(o,c), lower_wick=body_low-l, range=h-l; if(range>0 && lower_wick>range*0.5) score+=5; }
  771. if(h>=level-tol && c<level-tol){ rejections_down++; double body_high=MathMax(o,c), upper_wick=h-body_high, range=h-l; if(range>0 && upper_wick>range*0.5) score+=5; } } }
  772. score += touches*3; score += rejections_up*8 + rejections_down*8;
  773. if(touches>=4) score+=15; else if(touches>=3) score+=10; else if(touches>=2) score+=5;
  774. return score;
  775. }
  776. double FindBestHiddenRoundNumber(double curPrice) {
  777. 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;
  778. double levels[]; int levelCount=0; ArrayResize(levels,100);
  779. double base100=MathFloor(curPrice/(100*pip))*(100*pip); for(int i=-1;i<=2;i++) AddRNLevel(levels,levelCount,base100+i*100*pip);
  780. double base50=MathFloor(curPrice/(50*pip))*(50*pip); for(int i=-2;i<=3;i++) AddRNLevel(levels,levelCount,base50+i*50*pip);
  781. double base25=MathFloor(curPrice/(25*pip))*(25*pip); for(int i=-3;i<=4;i++) AddRNLevel(levels,levelCount,base25+i*25*pip);
  782. double base10=MathFloor(curPrice/(10*pip))*(10*pip); for(int i=-5;i<=6;i++) AddRNLevel(levels,levelCount,base10+i*10*pip);
  783. double base5=MathFloor(curPrice/(5*pip))*(5*pip); for(int i=-4;i<=5;i++) AddRNLevel(levels,levelCount,base5+i*5*pip);
  784. double bestLevel=0,bestScore=-1;
  785. for(int i=0;i<levelCount;i++){ double lv=levels[i], dist=MathAbs(curPrice-lv)/pip; if(dist>60) continue; double distPenalty=(dist>40)?20:(dist>30)?10:(dist>20)?5:0; double score=ScoreRoundNumber(lv,pip)-distPenalty; if(score<5) continue; if(score>bestScore){ bestScore=score; bestLevel=lv; } }
  786. if(bestLevel==0){ double nearest100=MathRound(curPrice/(100*pip))*(100*pip), nearest50=MathRound(curPrice/(50*pip))*(50*pip), nearest25=MathRound(curPrice/(25*pip))*(25*pip), nearest10=MathRound(curPrice/(10*pip))*(10*pip), nearest5=MathRound(curPrice/(5*pip))*(5*pip);
  787. double d100=MathAbs(curPrice-nearest100), d50=MathAbs(curPrice-nearest50), d25=MathAbs(curPrice-nearest25), d10=MathAbs(curPrice-nearest10), d5=MathAbs(curPrice-nearest5);
  788. if(d100<30*pip) bestLevel=nearest100; else if(d50<20*pip) bestLevel=nearest50; else if(d25<15*pip) bestLevel=nearest25; else if(d10<10*pip) bestLevel=nearest10; else bestLevel=nearest5; }
  789. g_hrn_score=bestScore; return NormalizeDouble(bestLevel,dg);
  790. }
  791. void ScanHRNLevels(){ g_rj_cnt=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double cur=Close[0];
  792. 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];
  793. 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++; } } }
  794. 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++; } } } }
  795. 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; } }
  796. 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); }
  797. void UpdateHRN(){
  798. if(Bars<LOOKBACK+10) return; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; int dg=(int)MarketInfo(Symbol(),MODE_DIGITS); if(dg<=0) dg=5;
  799. if(Time[0]!=g_hrn_scan_bar){ double newHrn=FindBestHiddenRoundNumber(Close[0]); if(g_hrn_price==0 || MathAbs(newHrn-g_hrn_price)>2*pip){ g_hrn_price=newHrn; g_hrn_is_sup=(Close[0]>g_hrn_price); g_hrn_brk_bars=0; g_hrn_confirmed_break=false; } g_hrn_scan_bar=Time[0]; }
  800. double tol=1*pip;
  801. if(g_hrn_is_sup){ if(Bars>=3){ bool candle1_below=(Close[1]<g_hrn_price-tol), candle2_below=(Close[2]<g_hrn_price-tol); if(candle1_below && candle2_below){ g_hrn_confirmed_break=true; g_hrn_brk_bars=HRN_CONFIRM_BARS; } else if(candle1_below) g_hrn_brk_bars=1; else g_hrn_brk_bars=0; } }
  802. else{ if(Bars>=3){ bool candle1_above=(Close[1]>g_hrn_price+tol), candle2_above=(Close[2]>g_hrn_price+tol); if(candle1_above && candle2_above){ g_hrn_confirmed_break=true; g_hrn_brk_bars=HRN_CONFIRM_BARS; } else if(candle1_above) g_hrn_brk_bars=1; else g_hrn_brk_bars=0; } }
  803. if(g_hrn_brk_bars>=HRN_CONFIRM_BARS){ double newHrn=FindBestHiddenRoundNumber(Close[0]); if(MathAbs(newHrn-g_hrn_price)>3*pip){ g_hrn_price=newHrn; g_hrn_is_sup=(Close[0]>g_hrn_price); g_hrn_brk_bars=0; g_hrn_confirmed_break=false; Print("HRN SHIFTED to: ",DoubleToString(g_hrn_price,dg)," | Type: ",(g_hrn_is_sup?"SUPPORT":"RESISTANCE")," | Score: ",DoubleToString(g_hrn_score,1)); } else{ g_hrn_is_sup=(Close[0]>g_hrn_price); g_hrn_brk_bars=0; g_hrn_confirmed_break=false; } }
  804. g_hrn_str=DoubleToString(NormalizeDouble(g_hrn_price,dg),dg);
  805. color hrnColor=g_hrn_is_sup?NEON_GREEN:NEON_RED; if(g_hrn_brk_bars==1) hrnColor=NEON_YELLOW;
  806. DrawHLine(PFX+"HRN_LINE",g_hrn_price,hrnColor,3,STYLE_SOLID);
  807. string ln=PFX+"HRN_LBL"; SafeDel(ln); string typeStr=g_hrn_is_sup?"SUP":"RES"; string confStr=(g_hrn_brk_bars==1)?" [1/2]":(g_hrn_confirmed_break?" [SHIFTING]":"");
  808. ObjectCreate(0,ln,OBJ_TEXT,0,Time[0]+Period()*60*2,g_hrn_price); ObjectSetText(ln,"HRN "+typeStr+" "+g_hrn_str+confStr,10,"Arial Bold",hrnColor); ObjectSetInteger(0,ln,OBJPROP_BACK,false);
  809. }
  810. 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;}
  811. 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;}
  812. 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;
  813. double cur=Close[0];g_nearest_res=0;g_nearest_sup=0;double mR=999999,mS=999999;
  814. for(int i=0;i<resCount;i++)if(ResLevels[i]>cur&&(ResLevels[i]-cur)<mR){mR=ResLevels[i]-cur;g_nearest_res=ResLevels[i];}
  815. for(int i=0;i<supCount;i++)if(SupLevels[i]<cur&&(cur-SupLevels[i])<mS){mS=cur-SupLevels[i];g_nearest_sup=SupLevels[i];}
  816. if(g_nearest_res>0&&!IsLineNearby(g_nearest_res,5.0))DrawHLine(PFX+"NEAREST_RES",g_nearest_res,NEON_RED,2,STYLE_SOLID);
  817. if(g_nearest_sup>0&&!IsLineNearby(g_nearest_sup,5.0))DrawHLine(PFX+"NEAREST_SUP",g_nearest_sup,NEON_GREEN,2,STYLE_SOLID);}
  818. 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;}}
  819. 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();}
  820. 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);}
  821. 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;}
  822. 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);}
  823. 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);}
  824. 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);}
  825. 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);}
  826. void DrawOtherPairsCube(int x,int y,int w,int h){
  827. Bx("c20",x,y,w,h,BG_DARK2,NEON_GOLD);
  828. Tx("c20_l",x+10,y+6,"OTHER PAIRS",NEON_CYAN,11,true);
  829. if(g_pairCount==0){ Tx("c20_v0",x+10,y+34,"No signals",CGR,11,false); return; }
  830. int lY=32;
  831. for(int i=0;i<g_pairCount && i<5;i++){ string sp=g_pairNames[i]; if(StringLen(sp)>14) sp=StringSubstr(sp,0,14); string txt=sp+" "+g_pairSigs[i]+" "+DoubleToString(g_pairConfs[i],0)+"%"; color sc=(g_pairSigs[i]=="CALL")?NEON_GREEN:NEON_RED; Tx("c20_p"+IntegerToString(i),x+10,y+lY,txt,sc,11,true); lY+=19; }
  832. }
  833. //+------------------------------------------------------------------+
  834. // UPDATED OTC QUICK CUBE WITH YOUR VOLUME LOGIC (2 CANDLE AVG)
  835. //+------------------------------------------------------------------+
  836. void DrawOTCQuickCube(int x,int y,int w,int h){
  837. Bx("c_quick",x,y,w,h,BG_DARK2,NEON_LIME);
  838. Tx("c_quick_l",x+10,y+6,"OTC QUICK",NEON_CYAN,11,true);
  839. int age=(int)(TimeCurrent()-Time[0]);
  840. int ps=Period()*60;
  841. int rem=ps-age;
  842. if(rem<0) rem=0;
  843. int mm=rem/60, ss=rem%60;
  844. string tl=(mm>0?IntegerToString(mm)+"m ":"")+IntegerToString(ss)+"s";
  845. Tx("c_quick_t",x+10,y+30,"Time: "+tl,NEON_GOLD,13,true);
  846. double spread=MarketInfo(Symbol(),MODE_SPREAD);
  847. color spC=(spread<=BROKER_SPREAD_THRESHOLD)?NEON_GREEN:NEON_ORANGE;
  848. Tx("c_quick_s",x+10,y+54,"Spread: "+DoubleToString(spread,0),spC,12,true);
  849.  
  850. // ===== YOUR VOLUME FORMULA (2 previous candles average) =====
  851. double v1 = iVolume(NULL, PERIOD_M1, 1); // last closed candle
  852. double v2 = iVolume(NULL, PERIOD_M1, 2);
  853. double v3 = iVolume(NULL, PERIOD_M1, 3);
  854. double avgVol = (v2 + v3) / 2.0;
  855. double volRatio = (avgVol > 0) ? v1 / avgVol : 1.0;
  856. bool isBullish = (Close[1] > Open[1]); // direction of that closed candle
  857. string arrow = isBullish ? "▲" : "▼";
  858. color vColor;
  859. string vLabel;
  860. if(volRatio > 1.5) {
  861. vColor = isBullish ? NEON_GREEN : NEON_RED;
  862. vLabel = "STRONG";
  863. }
  864. else if(volRatio > 1.1) {
  865. vColor = NEON_YELLOW;
  866. vLabel = "NORMAL";
  867. }
  868. else {
  869. vColor = NEON_CYAN;
  870. vLabel = "WEAK";
  871. }
  872. string volText = "Vol: " + DoubleToString(volRatio,1) + "x " + arrow + " (" + vLabel + ")";
  873. Tx("c_quick_v", x+10, y+76, volText, vColor, 12, true);
  874. // ===== END VOLUME =====
  875.  
  876. string es=GetEntryStatus();
  877. color eC=GetEntryColor();
  878. Tx("c_quick_e",x+10,y+100,es,eC,11,true);
  879. }
  880. string GetEntryStatus(){
  881. int age=(int)(TimeCurrent()-Time[0]); int ps=Period()*60; int rem=ps-age; if(rem<0) rem=0; string ms=DetectMyStrategy();
  882. if(ms!="WAIT"){ string type=(g_strategyType=="TRAP")?"TRAP":"TREND";
  883. if(ENTRY_MODE=="FLAG"){ if(age<FLAG_MIN_SEC) return type+" WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s"; if(rem<MIN_REMAINING_SEC) return type+" EXPIRED"; if(age>FLAG_MAX_SEC) return type+" LATE"; return type+" OPEN "+IntegerToString(rem)+"s"; }
  884. if(age<TIME_MIN_SEC) return type+" WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s"; if(age>TIME_MAX_SEC) return type+" CLOSED"; return type+" OPEN "+IntegerToString(age)+"s"; }
  885. if(ENTRY_MODE=="FLAG"){ if(age<FLAG_MIN_SEC) return "WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s"; if(rem<MIN_REMAINING_SEC) return "EXPIRED"; if(age>FLAG_MAX_SEC) return "LATE"; return "OPEN "+IntegerToString(rem)+"s left"; }
  886. if(age<TIME_MIN_SEC) return "WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s"; if(age>TIME_MAX_SEC) return "CLOSED"; return "OPEN "+IntegerToString(age)+"s";
  887. }
  888. color GetEntryColor(){
  889. string s=GetEntryStatus();
  890. if(StringFind(s,"TRAP OPEN")>=0) return NEON_PURPLE;
  891. if(StringFind(s,"TREND OPEN")>=0) return NEON_LIME;
  892. if(StringFind(s,"OPEN")>=0) return NEON_GREEN;
  893. if(StringFind(s,"WAIT")>=0) return NEON_YELLOW;
  894. if(StringFind(s,"LATE")>=0 || StringFind(s,"EXPIRED")>=0 || StringFind(s,"CLOSED")>=0) return NEON_ORANGE;
  895. return NEON_RED;
  896. }
  897. bool DirectionOK(){
  898. if(!ENABLE_ENTRY_ZONE) return true;
  899. double cur=Close[0], lo=Low[0], hi=High[0], rg=hi-lo;
  900. if(rg==0) return true;
  901. double pos=(cur-lo)/rg*100.0;
  902. if(MathMax(g_calc_gProb,g_calc_rProb)>=85) return true;
  903. string ms=DetectMyStrategy();
  904. if(ms=="CALL") return(pos>REVERSAL_PCT);
  905. if(ms=="PUT") return(pos<(100.0-REVERSAL_PCT));
  906. if(StringFind(g_adv1,"CALL")>=0) return(pos>REVERSAL_PCT && (hi-cur)<rg*WICK_PCT);
  907. if(StringFind(g_adv1,"PUT")>=0) return(pos<(100.0-REVERSAL_PCT) && (cur-lo)<rg*WICK_PCT);
  908. return true;
  909. }
  910. bool EntryPrecisionOK(){
  911. if(TRADE_MODE=="GOD") return true;
  912. if(g_calc_gProb>80 && Close[0]<Open[0]) return false;
  913. if(g_calc_rProb>80 && Close[0]>Open[0]) return false;
  914. return true;
  915. }
  916. bool ConsensusOK(){
  917. if(!CONSENSUS_FILTER) return true;
  918. string ms=DetectMyStrategy();
  919. if(ms=="WAIT") return true;
  920. bool haAgree=false;
  921. if(ms=="CALL" && (g_haM1=="HA BULLISH 1" || g_haBoth=="BOTH BULL")) haAgree=true;
  922. if(ms=="PUT" && (g_haM1=="HA BEARISH 1" || g_haBoth=="BOTH BEAR")) haAgree=true;
  923. return haAgree;
  924. }
  925. void SendTelegramAlert(string message){
  926. if(!ENABLE_TELEGRAM) return;
  927. if(StringLen(TELEGRAM_TOKEN)<10 || StringLen(TELEGRAM_CHAT_ID)<5) return;
  928. string params="?chat_id="+TELEGRAM_CHAT_ID+"&text="+message;
  929. string headers="Content-Type: application/x-www-form-urlencoded";
  930. char post[],result_data[]; int timeout=5000;
  931. ArrayResize(post,StringToCharArray(params,post,0,WHOLE_ARRAY,CP_UTF8)-1);
  932. int res=WebRequest("POST",url,headers,timeout,post,result_data,result);
  933. if(res==-1) Print("Telegram: WebRequest failed.");
  934. }
  935. void Draw(){
  936. HideSPM(); DelDashboard();
  937. int W=DASH_W, G=8, CW=(W-2*G)/3, CH=110, cx=POS_X+G, yy=POS_Y;
  938. int cp=0; double brain=BrainSc(cp); double nb=NeuralBiasFast(); double mw=MicroWick(); bool bf=IsBrokerForce();
  939. g_marketMode=DetectMarketMode(brain,g_rsc,cp,nb);
  940. if(StringLen(g_prevMode)>0 && g_prevMode!=g_marketMode){ g_signalTime=0; g_finalSignal="WAIT"; }
  941. g_prevMode=g_marketMode;
  942. CalcOTCCrowd(); UpdateAccuracy(); UpdateWeights();
  943. double mai=CalcAdvancedMicroAI(); int mts=CalcAdvancedMicroTrap();
  944. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  945. UpdateRiskControl();
  946. CheckMTFConfirmation();
  947. double tfaScore=CalcAdvancedTFA(g_tfa_detail);
  948. color ha1C=(g_haM1=="HA BULLISH 1")?NEON_GREEN:(g_haM1=="HA BEARISH 1")?NEON_RED:NEON_YELLOW;
  949. color ha5C=(g_haM5=="HA BULLISH 5")?NEON_GREEN:(g_haM5=="HA BEARISH 5")?NEON_RED:NEON_YELLOW;
  950. color biasClr; string biasStr=CalcAdvancedMarketBias(biasClr,brain,g_rsc);
  951. string ms=DetectMyStrategy();
  952. color stratC=(g_strategyType=="TRAP")?NEON_PURPLE:(g_strategyType=="TREND")?NEON_GREEN:CGR;
  953. string stratLabel=(g_strategyType=="TRAP")?"TRAP "+ms:(g_strategyType=="TREND")?"TREND "+ms:"NO STRATEGY";
  954. string finalSig=g_finalSignal; color sigC=NEON_YELLOW;
  955. if(finalSig=="CALL") sigC=NEON_GREEN; else if(finalSig=="PUT") sigC=NEON_RED;
  956. else if(finalSig=="WEAK CALL") sigC=NEON_CYAN; else if(finalSig=="WEAK PUT") sigC=NEON_ORANGE;
  957. // ROW 1
  958. Cube("c1",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"PAIR",NEON_CYAN,Symbol(),NEON_BLUE,15);
  959. Cube("c2",cx+CW+G,yy,CW,CH,sigC,BG_DARK2,"SIGNAL",NEON_CYAN,finalSig,sigC,16);
  960. double gP,rP; string rsn; color pClr;
  961. CalcAdvancedPrediction(gP,rP,rsn,pClr);
  962. g_frozen_gProb=gP; g_frozen_rProb=rP; g_frozen_pAction=rsn; g_frozen_pColor=pClr; g_last_freeze_bar=Time[0];
  963. Bx("c_pred",cx+2*(CW+G),yy,CW,CH,BG_DARK2,pClr);
  964. Tx("c_pred_l",cx+2*(CW+G)+10,yy+5,"NEXT CANDLE",NEON_CYAN,11,true);
  965. int bW=CW-20, gBW=(int)(gP/100.0*bW), rBW=(int)(rP/100.0*bW);
  966. if(gBW<3) gBW=3; if(rBW<3) rBW=3;
  967. Bx("c_pred_gbg",cx+2*(CW+G)+10,yy+26,bW,8,BG_DARK4,BG_DARK4);
  968. Bx("c_pred_gfg",cx+2*(CW+G)+10,yy+26,gBW,8,NEON_GREEN,NEON_GREEN);
  969. Tx("c_pred_gp",cx+2*(CW+G)+10,yy+36,"G:"+DoubleToString(gP,0)+"%",NEON_GREEN,12,true);
  970. Bx("c_pred_rbg",cx+2*(CW+G)+10,yy+54,bW,8,BG_DARK4,BG_DARK4);
  971. Bx("c_pred_rfg",cx+2*(CW+G)+10,yy+54,rBW,8,NEON_RED,NEON_RED);
  972. Tx("c_pred_rp",cx+2*(CW+G)+10,yy+64,"R:"+DoubleToString(rP,0)+"%",NEON_RED,12,true);
  973. Tx("c_pred_a",cx+2*(CW+G)+10,yy+82,rsn,pClr,12,true);
  974. NeonBar("c_pred_b",cx+2*(CW+G)+10,yy+96,bW,8,MathMax(gP,rP),pClr);
  975. yy+=CH+G;
  976. // ROW 2
  977. 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);
  978. 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);
  979. color sClr=CGR; string sName=GetCurrentSession(sClr); bool isAct=IsSessionActive();
  980. Bx("c_ses",cx+2*(CW+G),yy,CW,CH,BG_DARK2,sClr);
  981. Tx("c_ses_l",cx+2*(CW+G)+10,yy+5,"SESSION",NEON_CYAN,11,true);
  982. Tx("c_ses_v",cx+2*(CW+G)+10,yy+28,sName,sClr,16,true);
  983. int gH=TimeHour(TimeGMT()), gM=TimeMinute(TimeGMT());
  984. 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);
  985. Tx("c_ses_s",cx+2*(CW+G)+10,yy+80,isAct?"ACTIVE":"LOW VOL",isAct?NEON_GREEN:NEON_ORANGE,12,true);
  986. yy+=CH+G;
  987. // ROW 3
  988. 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);
  989. NeonBar("c7b",cx+12,yy+92,CW-24,8,nb,(nb>72)?NEON_ORANGE:(nb<35)?NEON_CYAN:NEON_GREEN);
  990. Bx("c8",cx+CW+G,yy,CW,CH,BG_DARK2,NEON_CYAN);
  991. Tx("c8_l",cx+CW+G+10,yy+5,"CROWD",NEON_CYAN,11,true);
  992. Tx("c8_c",cx+CW+G+10,yy+30,"CALL "+IntegerToString(g_otcCallPct)+"%",NEON_RED,15,true);
  993. Tx("c8_p",cx+CW+G+10,yy+56,"PUT "+IntegerToString(g_otcPutPct)+"%",NEON_GREEN,15,true);
  994. Tx("c8_b",cx+CW+G+10,yy+84,"OTC Crowd",NEON_GOLD,11,false);
  995. Cube("c_strat",cx+2*(CW+G),yy,CW,CH,stratC,BG_DARK3,"STRATEGY",NEON_CYAN,stratLabel,stratC,13);
  996. yy+=CH+G;
  997. // ROW 4
  998. color maC; string maDir;
  999. if(mai>72){ maC=NEON_ORANGE; maDir="TRAP RISK!"; } else if(mai>55){ maC=NEON_YELLOW; maDir="CAUTION"; } else if(mai>45){ maC=NEON_CYAN; maDir="NEUTRAL"; } else{ maC=NEON_GREEN; maDir="SAFE"; }
  1000. Cube("c_mai",cx,yy,CW,CH,maC,BG_DARK2,"MICRO AI",NEON_CYAN,DoubleToString(mai,0)+"%",maC,18);
  1001. NeonBar("c_mai_b",cx+12,yy+92,CW-24,8,mai,maC);
  1002. color mtsC=(mts>=90)?NEON_PURPLE:(mts>=75)?NEON_RED:(mts>=50)?NEON_ORANGE:NEON_GREEN;
  1003. string mtsL=(mts>=90)?"EXTREME TRAP":(mts>=75)?"HIGH TRAP":(mts>=50)?"MEDIUM":"CLEAR";
  1004. Cube("c_mts",cx+CW+G,yy,CW,CH,mtsC,BG_DARK2,"MICRO TRAP",NEON_CYAN,"SCORE "+IntegerToString(mts),mtsC,16);
  1005. NeonBar("c_mts_b",cx+CW+G+12,yy+92,CW-24,8,MathMin(100,mts),mtsC);
  1006. int tfaInt=(int)tfaScore; color tfaColor; string tfaLabel;
  1007. if(tfaInt>=5){ tfaLabel="STRONG"; tfaColor=NEON_GREEN; } else if(tfaInt>=4){ tfaLabel="GOOD"; tfaColor=NEON_LIME; } else if(tfaInt>=3){ tfaLabel="MEDIUM"; tfaColor=NEON_YELLOW; } else if(tfaInt>=2){ tfaLabel="WEAK"; tfaColor=NEON_ORANGE; } else{ tfaLabel="POOR"; tfaColor=C'100,100,120'; }
  1008. color tfaBC=tfaColor; string dirTxt="";
  1009. if(g_haM1=="HA BEARISH 1"||g_haM5=="HA BEARISH 5"){ tfaBC=NEON_RED; dirTxt=" [DOWN]"; } else if(g_haM1=="HA BULLISH 1"||g_haM5=="HA BULLISH 5"){ tfaBC=NEON_GREEN; dirTxt=" [UP]"; } else{ dirTxt=" [MIX]"; }
  1010. Bx("c_tfa",cx+2*(CW+G),yy,CW,CH,BG_DARK3,tfaBC);
  1011. Tx("c_tfa_l",cx+2*(CW+G)+10,yy+5,"TFA SCORE",NEON_CYAN,11,true);
  1012. Tx("c_tfa_v",cx+2*(CW+G)+10,yy+28,IntegerToString(tfaInt)+"/6 "+tfaLabel+dirTxt,tfaBC,13,true);
  1013. Tx("c_tfa_d",cx+2*(CW+G)+10,yy+56,g_tfa_detail,CGR,10,false);
  1014. NeonBar("c_tfa_b",cx+2*(CW+G)+10,yy+92,CW-20,8,(double)tfaInt/6.0*100.0,tfaBC);
  1015. yy+=CH+G;
  1016. // ROW 5
  1017. double frac=CalcAdvancedFractal();
  1018. color frC=(frac>=75)?NEON_RED:(frac>=50)?NEON_ORANGE:(frac>=25)?NEON_YELLOW:NEON_GREEN;
  1019. string frT=(frac>=75)?"TRAP ZONE!":(frac>=50)?"WARNING":(frac>=25)?"CAUTION":"CLEAR";
  1020. Cube("c_frc",cx,yy,CW,CH,frC,BG_DARK2,"FRACTAL",NEON_CYAN,frT,frC,14);
  1021. NeonBar("c_frc_b",cx+12,yy+92,CW-24,8,frac,frC);
  1022. Bx("c_bias",cx+CW+G,yy,CW,CH,BG_DARK2,biasClr);
  1023. Tx("c_bias_l",cx+CW+G+10,yy+5,"MARKET BIAS",NEON_CYAN,11,true);
  1024. Tx("c_bias_v",cx+CW+G+10,yy+28,biasStr,biasClr,15,true);
  1025. 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);
  1026. color accC=(g_accuracy>=70)?NEON_GREEN:(g_accuracy>=60)?NEON_YELLOW:NEON_RED;
  1027. Tx("c_bias_a",cx+CW+G+10,yy+80,"ACC: "+DoubleToString(g_accuracy,1)+"%",accC,13,false);
  1028. NeonBar("c_bias_b",cx+CW+G+10,yy+96,CW-20,8,g_accuracy,accC);
  1029. int dg_sr=(int)MarketInfo(Symbol(),MODE_DIGITS); if(dg_sr<=0) dg_sr=5;
  1030. Bx("c18",cx+2*(CW+G),yy,CW,CH,BG_DARK2,NEON_CYAN);
  1031. Tx("c18_l",cx+2*(CW+G)+10,yy+4,"S/R LEVELS",NEON_CYAN,11,true);
  1032. 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);
  1033. 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);
  1034. Tx("c18_b",cx+2*(CW+G)+10,yy+84,g_brk_str,g_brk_color,13,true);
  1035. yy+=CH+G;
  1036. // ROW 6
  1037. color wickC=(mw>0.70)?NEON_RED:(mw>0.50)?NEON_ORANGE:NEON_GREEN;
  1038. Bx("c15",cx,yy,CW,CH,BG_DARK2,wickC);
  1039. Tx("c15_l",cx+10,yy+5,"WICKS",NEON_CYAN,11,true);
  1040. Tx("c15_v",cx+10,yy+30,DoubleToString(mw,2),wickC,20,true);
  1041. Tx("c15_b",cx+10,yy+62,(mw>0.70)?"KILL SHOT":(mw>0.50)?"HIGH":"LOW",wickC,13,false);
  1042. NeonBar("c15_bar",cx+10,yy+92,CW-20,8,mw*100,wickC);
  1043. Bx("c_ha",cx+CW+G,yy,CW,CH,BG_DARK2,ha1C);
  1044. Tx("c_ha_l",cx+CW+G+10,yy+5,"HA CANDLES",NEON_CYAN,11,true);
  1045. Tx("c_ha_m1",cx+CW+G+10,yy+30,"M1: "+g_haM1,ha1C,14,true);
  1046. Tx("c_ha_m5",cx+CW+G+10,yy+56,"M5: "+g_haM5,ha5C,14,true);
  1047. string haComb=""; color haCombC=NEON_YELLOW;
  1048. if(g_haM1=="HA BULLISH 1" && g_haM5=="HA BULLISH 5"){ haComb="BOTH BULL"; haCombC=NEON_GREEN; }
  1049. else if(g_haM1=="HA BEARISH 1" && g_haM5=="HA BEARISH 5"){ haComb="BOTH BEAR"; haCombC=NEON_RED; }
  1050. else haComb="MIXED";
  1051. Tx("c_ha_c",cx+CW+G+10,yy+84,haComb,haCombC,13,true);
  1052. string revReason=DetectSuddenReversal(); color revColor=NEON_YELLOW;
  1053. if(StringFind(revReason,"BULL")>=0) revColor=NEON_GREEN;
  1054. if(StringFind(revReason,"BEAR")>=0) revColor=NEON_RED;
  1055. Bx("c_reason",cx+2*(CW+G),yy,CW,CH,BG_DARK2,revColor);
  1056. Tx("c_reason_l",cx+2*(CW+G)+10,yy+5,"REVERSAL",NEON_CYAN,11,true);
  1057. if(StringLen(revReason)>0){ string sr=revReason; if(StringLen(sr)>30) sr=StringSubstr(sr,0,28)+".."; Tx("c_reason_v",cx+2*(CW+G)+10,yy+34,sr,revColor,13,false); } else Tx("c_reason_v",cx+2*(CW+G)+10,yy+34,"No reversal",CGR,13,false);
  1058. yy+=CH+G;
  1059. // ROW 7
  1060. int bottomW = (W - 2*G - 2*G) / 3;
  1061. int bottomH = 125;
  1062. yy += 5;
  1063. int x1 = cx;
  1064. Bx("c_hrn", x1, yy, bottomW, bottomH, BG_DARK2, NEON_PINK);
  1065. Tx("c_hrn_l", x1+8, yy+6, "HRN LEVEL", NEON_PINK, 11, true);
  1066. Tx("c_hrn_v", x1+8, yy+30, g_hrn_str, NEON_PINK, 15, true);
  1067. Tx("c_hrn_t", x1+8, yy+58, (g_hrn_is_sup?"SUPPORT":"RESISTANCE"), NEON_PINK, 12, false);
  1068. string scoreStr = "Score: "+DoubleToString(g_hrn_score,0);
  1069. color scoreC = (g_hrn_score>=30)?NEON_GREEN:(g_hrn_score>=15)?NEON_YELLOW:NEON_ORANGE;
  1070. Tx("c_hrn_sc", x1+8, yy+80, scoreStr, scoreC, 12, false);
  1071. Tx("c_hrn_b", x1+8, yy+100, "Brk "+IntegerToString(g_hrn_brk_bars)+"/"+IntegerToString(HRN_CONFIRM_BARS), NEON_PINK, 12, false);
  1072. Tx("c_hrn_s", x1+8, yy+118, g_isSideways?"SIDEWAYS":"TRENDING", g_isSideways?NEON_YELLOW:NEON_GREEN, 11, false);
  1073. int x2 = x1 + bottomW + G;
  1074. DrawOtherPairsCube(x2, yy, bottomW, bottomH);
  1075. int x3 = x2 + bottomW + G;
  1076. DrawOTCQuickCube(x3, yy, bottomW, bottomH);
  1077. yy += bottomH + 5;
  1078. int fsW = W - 2*G;
  1079. color fsC = (g_filterStatus=="ALL CLEAR")?NEON_GREEN: (g_filterStatus=="TRAP ACTIVE"||g_filterStatus=="TREND ACTIVE")?NEON_LIME: (StringFind(g_filterStatus,"LOCK")>=0)?NEON_RED:NEON_ORANGE;
  1080. Bx("c_filter", cx, yy, fsW, 22, BG_DARK3, fsC);
  1081. Tx("c_filter_v", cx+10, yy+4, "FILTER: "+g_filterStatus, fsC, 12, true);
  1082. UpdateTimer(); HideSPM(); ChartRedraw();
  1083. }
  1084. void UpdateRiskControl(){
  1085. static datetime llt=0;
  1086. if(ENABLE_RISK_LOCK){ if(g_lossStreak>=MAX_LOSS_STREAK){ g_tradingStopped=true; llt=TimeCurrent(); g_filterStatus="RISK LOCK "+IntegerToString(g_lossStreak)+"L"; } if(g_tradingStopped && TimeCurrent()-llt>3600){ g_tradingStopped=false; g_lossStreak=0; g_filterStatus="RISK UNLOCK"; } }
  1087. }
  1088. void FinalSignalEngine(double brain,int cp,int mts){
  1089. g_filterStatus="ALL CLEAR";
  1090. if(ENABLE_RISK_CONTROL && g_tradingStopped){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="RISK LOCKED"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1091. if(ENABLE_SESSION_FILTER && !IsSessionActive()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="SESSION OFF"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1092. if(MTF_CONFIRM && !g_mtfConfirmed){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="MTF NO CONF"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1093. if(ENABLE_SPIKE_FILTER && IsBigCandle(1)){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="SPIKE BLOCK"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1094. if(ENABLE_LAST_SEC_BLOCK){ int age=(int)(TimeCurrent()-Time[0]); int ps=Period()*60; int rem=ps-age; if(rem<0) rem=0; if(rem<MIN_REMAINING_SEC){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="LAST SEC BLOCK"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; } }
  1095. double conf=MathMax(g_calc_gProb,g_calc_rProb);
  1096. if(conf<MIN_CONFIDENCE){ g_finalSignal="WAIT"; g_finalColor=NEON_YELLOW; g_filterStatus="LOW CONF "+DoubleToString(conf,0)+"%"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1097. bool reverseSignal=false;
  1098. if(g_accuracy<45.0 && g_acc_total>20){ reverseSignal=true; g_filterStatus="REVERSE MODE (ACC "+DoubleToString(g_accuracy,1)+"%)"; }
  1099. string ms=DetectMyStrategy();
  1100. if(ms!="WAIT"){
  1101. if(CONSENSUS_FILTER && !ConsensusOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="NO CONSENSUS"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1102. if(ENABLE_ENTRY_ZONE && !DirectionOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="BAD ENTRY ZONE"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1103. if(!EntryPrecisionOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="PRECISION FAIL"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1104. if(reverseSignal){ if(ms=="CALL") ms="PUT"; else if(ms=="PUT") ms="CALL"; }
  1105. g_finalSignal=ms; g_finalColor=(ms=="CALL")?NEON_GREEN:NEON_RED; g_filterStatus=(g_strategyType=="TRAP")?"TRAP ACTIVE":"TREND ACTIVE"; if(reverseSignal) g_filterStatus+=" (REV)";
  1106. if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT"){ g_finalSignal=ms; g_signalTime=TimeCurrent(); }
  1107. SendSignalNotification(ms,conf); return;
  1108. }
  1109. double th=FAST_MODE?70:68;
  1110. string rawSignal="WAIT";
  1111. if(g_calc_gProb>th) rawSignal="CALL";
  1112. else if(g_calc_rProb>th) rawSignal="PUT";
  1113. else if(g_calc_gProb>60) rawSignal="WEAK CALL";
  1114. else if(g_calc_rProb>60) rawSignal="WEAK PUT";
  1115. if(reverseSignal){
  1116. if(rawSignal=="CALL") rawSignal="PUT";
  1117. else if(rawSignal=="PUT") rawSignal="CALL";
  1118. else if(rawSignal=="WEAK CALL") rawSignal="WEAK PUT";
  1119. else if(rawSignal=="WEAK PUT") rawSignal="WEAK CALL";
  1120. }
  1121. g_finalSignal=rawSignal;
  1122. if((g_finalSignal=="CALL" || g_finalSignal=="PUT") && ENABLE_ENTRY_ZONE && !DirectionOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="BAD ENTRY ZONE"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1123. if((g_finalSignal=="CALL" || g_finalSignal=="PUT") && !EntryPrecisionOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; g_filterStatus="PRECISION FAIL"; if(TimeCurrent()-g_signalTime>HOLD_SEC) g_signalTime=TimeCurrent(); return; }
  1124. if(TimeCurrent()-g_signalTime>HOLD_SEC||g_finalSignal=="WAIT") g_signalTime=TimeCurrent();
  1125. if(g_finalSignal=="CALL"){ g_finalColor=NEON_GREEN; g_filterStatus=reverseSignal?"GREEN SIGNAL (REV)":"GREEN SIGNAL"; SendSignalNotification("CALL",conf); }
  1126. else if(g_finalSignal=="PUT"){ g_finalColor=NEON_RED; g_filterStatus=reverseSignal?"RED SIGNAL (REV)":"RED SIGNAL"; SendSignalNotification("PUT",conf); }
  1127. else if(g_finalSignal=="WEAK CALL"){ g_finalColor=NEON_CYAN; g_filterStatus=reverseSignal?"WEAK GREEN (REV)":"WEAK GREEN"; }
  1128. else if(g_finalSignal=="WEAK PUT"){ g_finalColor=NEON_ORANGE; g_filterStatus=reverseSignal?"WEAK RED (REV)":"WEAK RED"; }
  1129. else{ g_finalColor=NEON_YELLOW; }
  1130. }
  1131. void SendSignalNotification(string sig,double conf){
  1132. if(!ENABLE_NOTIFY) return;
  1133. string msg=Symbol()+" | "+sig+" | "+DoubleToString(conf,0)+"% | "+g_filterStatus;
  1134. if(msg==g_lastNotified) return;
  1135. if(TimeCurrent()-StringToTime(TimeToString(TimeCurrent()))<10) return;
  1136. g_lastNotified=msg;
  1137. Alert(msg); SendNotification(msg);
  1138. if(ENABLE_TELEGRAM){ string tgMsg="*AIBRAIN Signal*\n"+Symbol()+"\n"+sig+"\nConf: "+DoubleToString(conf,0)+"%\n"+g_filterStatus; SendTelegramAlert(tgMsg); }
  1139. Print(msg);
  1140. }
  1141. void BroadcastSignal(){
  1142. double conf=MathMax(g_frozen_gProb,g_frozen_rProb); if(conf<55) return;
  1143. string fn="OTC_Signals_Master.txt",pair=Symbol();
  1144. string sig=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
  1145. int exp=(int)(TimeCurrent()+65);
  1146. string line=pair+"|"+sig+"|"+DoubleToString(conf,0)+"|"+IntegerToString((int)TimeCurrent())+"|"+IntegerToString(exp);
  1147. int h=FileOpen(fn,FILE_READ|FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE);
  1148. 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; }
  1149. string content=""; while(!FileIsEnding(h)){ string ex=FileReadString(h); if(StringLen(ex)>10 && StringFind(ex,pair+"|")!=0) content+=ex+"\n"; }
  1150. content=line+"\n"+content;
  1151. string lns[]; int cnt=0,pos=0; int f=StringFind(content,"\n",pos);
  1152. 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); }
  1153. if(pos<StringLen(content)){ ArrayResize(lns,cnt+1); lns[cnt]=StringSubstr(content,pos); cnt++; }
  1154. if(cnt>50){ content=""; for(int i=0;i<50;i++) if(StringLen(lns[i])>10) content+=lns[i]+"\n"; }
  1155. FileSeek(h,0,SEEK_SET); FileWriteString(h,content); FileFlush(h); FileClose(h);
  1156. }
  1157. string GetPairHADirection(string pair){
  1158. double open1=iOpen(pair,PERIOD_M1,1), high1=iHigh(pair,PERIOD_M1,1), low1=iLow(pair,PERIOD_M1,1), close1=iClose(pair,PERIOD_M1,1);
  1159. double open2=iOpen(pair,PERIOD_M1,2), close2=iClose(pair,PERIOD_M1,2), open3=iOpen(pair,PERIOD_M1,3), close3=iClose(pair,PERIOD_M1,3);
  1160. if(open1==0||high1==0||low1==0||close1==0||open2==0||close2==0||open3==0||close3==0) return "NEUTRAL";
  1161. double haClose1=(open1+high1+low1+close1)/4.0;
  1162. double haClose2=(open2+high2+low2+close2)/4.0; // need high2,low2
  1163. double haOpen2_approx=(open3+close3)/2.0;
  1164. double haOpen1=(haOpen2_approx+haClose2)/2.0;
  1165. if(haClose1>haOpen1) return "BULL";
  1166. else if(haClose1<haOpen1) return "BEAR";
  1167. return "NEUTRAL";
  1168. }
  1169. double GetPairVolumeRatio(string pair){
  1170. double v1=iVolume(pair,PERIOD_M1,1), v2=iVolume(pair,PERIOD_M1,2);
  1171. if(v2<=0) return 1.0;
  1172. return v1/v2;
  1173. }
  1174. double CalculateCorrelation(string sym1, string sym2){
  1175. int bars=MathMin(iBars(sym1,PERIOD_M1,100), iBars(sym2,PERIOD_M1,100));
  1176. if(bars<50) return 0;
  1177. double sum1=0,sum2=0,sum1sq=0,sum2sq=0,sum12=0;
  1178. for(int i=0;i<bars;i++){
  1179. double c1=iClose(sym1,PERIOD_M1,i), c2=iClose(sym2,PERIOD_M1,i);
  1180. if(c1==0||c2==0) continue;
  1181. sum1+=c1; sum2+=c2; sum1sq+=c1*c1; sum2sq+=c2*c2; sum12+=c1*c2;
  1182. }
  1183. int n=bars;
  1184. double numerator=n*sum12-sum1*sum2;
  1185. double denom=sqrt((n*sum1sq-sum1*sum1)*(n*sum2sq-sum2*sum2));
  1186. if(denom==0) return 0;
  1187. return numerator/denom;
  1188. }
  1189. void ScanSignals(){
  1190. g_pairCount=0;
  1191. string fn="OTC_Signals_Master.txt", cur=Symbol();
  1192. int h=FileOpen(fn,FILE_READ|FILE_TXT|FILE_SHARE_READ);
  1193. if(h==INVALID_HANDLE) return;
  1194. datetime now=TimeCurrent();
  1195. double boostConf=0; int boostCount=0;
  1196. string currentPred=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT";
  1197. while(!FileIsEnding(h) && g_pairCount<8){
  1198. string ln=FileReadString(h); if(StringLen(ln)<15) continue;
  1199. int p1=StringFind(ln,"|"), p2=StringFind(ln,"|",p1+1), p3=StringFind(ln,"|",p2+1), p4=StringFind(ln,"|",p3+1);
  1200. if(p1<0||p2<0||p3<0||p4<0) continue;
  1201. string pair=StringSubstr(ln,0,p1); if(pair==cur) continue;
  1202. string sig=StringSubstr(ln,p1+1,p2-p1-1);
  1203. double conf=StringToDouble(StringSubstr(ln,p2+1,p3-p2-1));
  1204. int expTime=(int)StringToInteger(StringSubstr(ln,p4+1));
  1205. if(conf<62) continue;
  1206. if(expTime<(int)(now-15)) continue;
  1207. string haDir=GetPairHADirection(pair);
  1208. bool haMatch=(sig=="CALL" && haDir=="BULL") || (sig=="PUT" && haDir=="BEAR");
  1209. if(!haMatch) continue;
  1210. double vr=GetPairVolumeRatio(pair); if(vr>2.0) continue;
  1211. double corr=CalculateCorrelation(cur,pair);
  1212. bool positiveCorr=(corr>0.5); bool negativeCorr=(corr<-0.5);
  1213. string corrStr=positiveCorr?"(+)":(negativeCorr?"(-)":"");
  1214. string effectiveSig=sig; if(negativeCorr) effectiveSig=(sig=="CALL")?"PUT":"CALL";
  1215. if(effectiveSig==currentPred && g_frozen_gProb>55 && g_frozen_rProb>55){ boostCount++; boostConf+=conf*(positiveCorr?1.0:0.8); }
  1216. if(g_pairCount<5){ g_pairNames[g_pairCount]=pair+corrStr; g_pairSigs[g_pairCount]=sig; g_pairConfs[g_pairCount]=conf; g_pairCount++; }
  1217. }
  1218. FileClose(h);
  1219. if(boostCount>=2 && !g_tradingStopped){ double boost=MathMin(15.0, boostConf/10.0); g_calc_gProb+=boost; g_calc_rProb-=boost; if(g_calc_gProb>92) g_calc_gProb=92; if(g_calc_rProb<8) g_calc_rProb=8; g_filterStatus="BOOST+"+DoubleToString(boost,0)+"%"; }
  1220. }
  1221. void ReadSPM(){
  1222. datetime cb=Time[0]; if(cb==g_last_bar && TimeCurrent()-g_spm_t<5) return;
  1223. double v1=iCustom(NULL,PERIOD_M1,SPM_FILE,0,0), v2=iCustom(NULL,PERIOD_M1,SPM_FILE,1,0);
  1224. if(v1!=EMPTY_VALUE && v1!=0){ double sm=0.7; g_rsc=g_rsc*(1.0-sm)+v1*sm; }
  1225. if(v2!=EMPTY_VALUE && v2!=0){ double sm=0.7; g_tfa=g_tfa*(1.0-sm)+v2*sm; }
  1226. g_last_bar=cb; g_spm_t=TimeCurrent();
  1227. }
  1228. int OnInit(){
  1229. InitNW(); NuclearDeleteAll();
  1230. resCount=0; supCount=0; lastSRBar=0; g_hrn_price=0; g_hrn_brk_bars=0; g_hrn_scan_bar=0;
  1231. g_hrn_score=0; g_hrn_confirmed_break=false; g_nearest_res=0; g_nearest_sup=0; g_rj_cnt=0; g_pairCount=0;
  1232. g_marketMode="RANGE"; g_prevMode=""; g_last_freeze_bar=0; g_lastNotified="";
  1233. g_accuracy=ValidateHistoricalAccuracy(); g_acc_correct=0; g_acc_total=0; g_acc_lastBar=0;
  1234. g_lastPredGreen=50.0; g_lastPredBar=0; g_lossStreak=0; g_tradingStopped=false;
  1235. g_strategyType="NONE"; g_frozen_gProb=50; g_frozen_rProb=50; g_calc_gProb=50; g_calc_rProb=50;
  1236. g_commonCount=0; g_wickLineCount=0; g_tfa_detail=""; g_htfLevelCount=0; g_mtfConfirmed=true; g_filterStatus="ALL CLEAR";
  1237. LoadMLWeights(); EventSetTimer(1);
  1238. string filters="";
  1239. if(ENABLE_SESSION_FILTER) filters+="Session ";
  1240. if(ENABLE_SPIKE_FILTER) filters+="Spike ";
  1241. if(ENABLE_LAST_SEC_BLOCK) filters+="LastSec ";
  1242. if(ENABLE_RISK_CONTROL) filters+="Risk ";
  1243. if(ENABLE_ENTRY_ZONE) filters+="EntryZone ";
  1244. if(MTF_CONFIRM) filters+="MTF ";
  1245. if(CONSENSUS_FILTER) filters+="Consensus ";
  1246. if(ENABLE_NOTIFY) filters+="Notify ";
  1247. Print("===========================================");
  1248. Print("AIBRAIN v45.1 FINAL LOADED");
  1249. Print("HRN: Real Round Numbers + 2-Candle Close");
  1250. Print("Crowd: Exponential weighted 15 candles");
  1251. Print("Other Pairs: Correlation filter + boost");
  1252. Print("Volume: 2-candle avg, no repaint (your formula)");
  1253. Print("Accuracy reverse: Enabled below 45%");
  1254. Print("Active Filters: ",filters);
  1255. Print("Telegram: ",ENABLE_TELEGRAM?"ON":"OFF");
  1256. Print("===========================================");
  1257. return INIT_SUCCEEDED;
  1258. }
  1259. void OnDeinit(const int r){
  1260. EventKillTimer(); Comment("");
  1261. for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i); if(StringFind(nm,PFX)==0) ObjectDelete(nm); }
  1262. }
  1263. void OnTimer(){
  1264. if(Bars<50) return;
  1265. static datetime last5min=0;
  1266. if(Time[0]/300 != last5min/300){ DetectHiddenLevels(); last5min=Time[0]; }
  1267. ReadSPM(); CalcHA(); UpdateHRN(); UpdateSR();
  1268. DetectCommonPoints(); DetectWickRejections();
  1269. DrawCommonPoints(); DrawWickRejectLines(); DrawHiddenLevels(); DrawNearestSR();
  1270. int cp=0; double brain=BrainSc(cp); double nb=NeuralBiasFast(); double mw=MicroWick(); bool bf=IsBrokerForce();
  1271. double mai=CalcAdvancedMicroAI(); int mts=CalcAdvancedMicroTrap();
  1272. CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
  1273. ScanSignals();
  1274. FinalSignalEngine(brain,cp,mts);
  1275. BroadcastSignal();
  1276. Draw();
  1277. }
  1278. int OnCalculate(const int rates_total,const int prev_calculated,
  1279. const datetime &time[],const double &open[],
  1280. const double &high[],const double &low[],const double &close[],
  1281. const long &tick_volume[],const long &volume[],const int &spread[]){
  1282. return(rates_total);
  1283. }
  1284. //+------------------------------------------------------------------+