New paste
Recent API Trending Blog
Guest
 
Guest

Untitled 1379

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