//+------------------------------------------------------------------+
//| AIBRAIN OTC v45.0 - ADVANCED BUT STABLE (All fixes included) |
//+------------------------------------------------------------------+
#property copyright "AIBRAIN ULTIMATE - KM RANA"
#property version "45.0"
#property strict
#property indicator_chart_window
#define PFX "AIB9_"
#define VER "v45.0 ADVANCED"
#define LB 18
#define MAX_LEVELS 5
#define MAX_REJ 50
#define LOOKBACK 20
#define Alert(x) // Disable all popup alerts
// --- INPUTS (same as yours, just ensure ENABLE_NOTIFY=false) ---
input string SPM_FILE = "KM RANA";
input int HOLD_SEC = 60;
input int POS_X = 4;
input int POS_Y = 20;
input int DASH_W = 650;
input bool SHOW_TIMER = true;
input bool SHOW_SR_LINES = true;
input string ENTRY_MODE = "TIME";
input int FLAG_MIN_SEC = 10;
input int FLAG_MAX_SEC = 35;
input int TIME_MIN_SEC = 10;
input int TIME_MAX_SEC = 35;
input int MIN_REMAINING_SEC = 15;
input double REVERSAL_PCT = 30.0;
input double WICK_PCT = 0.65;
input int HRN_CONFIRM_BARS = 2;
input bool HA_ALIGN_FILTER = false;
input bool CONSENSUS_FILTER = false;
input bool ENABLE_NOTIFY = false;
input bool FAST_MODE = false;
input int BROKER_SPREAD_THRESHOLD= 6;
input double OTC_TRAP_WEIGHT = 15.0;
input int CROWD_EXTREME_PCT = 70;
input bool ENABLE_BROKER_KILLER = true;
input bool ENABLE_SESSION_FILTER = true;
input bool ENABLE_SPIKE_FILTER = true;
input bool ENABLE_LAST_SEC_BLOCK = true;
input bool ENABLE_RISK_CONTROL = true;
input bool ENABLE_ENTRY_ZONE = true;
input bool ML_ADAPTIVE = true;
input bool VOLUME_PROFILE_TRAP = true;
input bool MTF_CONFIRM = false;
input bool ENABLE_TELEGRAM = false;
input string TELEGRAM_TOKEN = "";
input string TELEGRAM_CHAT_ID = "";
input string TRADE_MODE = "NORMAL";
input string STRATEGY_MODE = "TRAP_ONLY";
input int STRATEGY_THRESHOLD = 75;
input int MAX_LOSS_STREAK = 2;
input double MIN_CONFIDENCE = 75.0;
input bool ENABLE_RISK_LOCK = true;
input double PATTERN_TOLERANCE_PIPS = 8.0;
input int MIN_PATTERN_SEPARATION = 5;
input bool SHOW_COMMON_POINTS = true;
input double COMMON_POINT_TOL_PIPS = 15.0;
input bool SHOW_WICK_REJECT_LINES = true;
input int WICK_MIN_TOUCHES = 1;
input double WICK_ZONE_PIPS = 15.0;
input int WICK_EXPIRE_BARS = 60;
// --- COLORS ---
#define NEON_GREEN C'0,255,100'
#define NEON_RED C'255,40,80'
#define NEON_YELLOW C'255,220,0'
#define NEON_ORANGE C'255,120,0'
#define NEON_CYAN C'0,255,200'
#define NEON_PURPLE C'200,0,255'
#define NEON_PINK C'255,80,180'
#define NEON_BLUE C'0,200,255'
#define NEON_LIME C'80,255,80'
#define NEON_GOLD C'255,180,0'
#define DARK_BLUE_NEON C'0,100,255'
#define NEON_WHITE C'220,230,255'
#define CGR C'160,170,190'
#define BG_DARK1 C'6,8,16'
#define BG_DARK2 C'10,14,24'
#define BG_DARK3 C'14,20,32'
#define BG_DARK4 C'18,26,40'
struct HTFLevel{ double price; string timeframe; string type; datetime time; int strength; bool isRoundNumber; };
// --- GLOBALS (minimum required) ---
string g_haM1="",g_haM5="",g_haBoth="";
color g_haM1Color=clrGray,g_haM5Color=clrGray;
static double NW[36];
static double g_rsc=0,g_tfa=3;
static datetime g_spm_t=0,g_last_bar=0;
double ResLevels[MAX_LEVELS],SupLevels[MAX_LEVELS];
int resCount=0,supCount=0;
datetime lastSRBar=0;
static double g_nearest_res=0,g_nearest_sup=0;
static string g_brk_str="NO BRK";
static color g_brk_color=CGR;
struct RejLevel{double price;int touches;};
static RejLevel g_rj[MAX_REJ];
static int g_rj_cnt=0;
static double g_hrn_price=0;
static bool g_hrn_is_sup=true;
static int g_hrn_brk_bars=0;
static datetime g_hrn_scan_bar=0;
static string g_hrn_str="--";
static int g_otcCallPct=50,g_otcPutPct=50;
static string g_pairNames[5],g_pairSigs[5];
static double g_pairConfs[5];
static int g_pairCount=0;
static string g_copiedPair="";
static string g_adv1="WAIT KAR",g_adv2="Signals mix",g_adv3="";
static color g_advC=NEON_YELLOW;
static double g_frozen_gProb=50,g_frozen_rProb=50;
static string g_frozen_pAction="UNCERTAIN";
static color g_frozen_pColor=NEON_YELLOW;
static double g_calc_gProb=50,g_calc_rProb=50;
static string g_calc_pAction="UNCERTAIN";
static color g_calc_pColor=NEON_YELLOW;
static double g_gProb=50,g_rProb=50;
static string g_pAction="UNCERTAIN";
static color g_pColor=NEON_YELLOW;
static datetime g_last_freeze_bar=0;
static double g_accuracy=65.0;
static int g_acc_correct=0,g_acc_total=0;
static datetime g_acc_lastBar=0;
static double g_lastPredGreen=50.0;
static datetime g_lastPredBar=0;
static datetime g_lastLogBar=0;
static string g_finalSignal="WAIT";
static color g_finalColor=NEON_YELLOW;
static datetime g_signalTime=0;
static string g_lastNotified="";
static string g_marketMode="RANGE",g_prevMode="";
static int g_lossStreak=0;
static bool g_tradingStopped=false;
static datetime g_stopStartTime=0;
static double g_brokerBias=0.0;
static string g_symbolKey="";
static string g_strategyType="NONE";
static string g_strategySignal="WAIT";
static string g_strategyReason="";
static double qmrA=0,qmrB=0,qmrC=0,qmrD=0;
static datetime qmrTA=0,qmrTB=0,qmrTC=0,qmrTD=0;
static bool qmrActive=false;
static datetime qmrExpire=0;
#define MAX_COMMON_PTS 5
static double g_commonPrice[MAX_COMMON_PTS];
static datetime g_commonTime[MAX_COMMON_PTS];
static int g_commonCount=0;
static datetime g_commonExpire[MAX_COMMON_PTS];
static string g_commonType[MAX_COMMON_PTS];
static datetime g_lastCommonScan=0;
#define MAX_WICK_LINES 5
static double g_wickLinePrice[MAX_WICK_LINES];
static int g_wickLineTouches[MAX_WICK_LINES];
static datetime g_wickLineExpire[MAX_WICK_LINES];
static int g_wickLineCount=0;
static datetime g_lastWickScan=0;
static bool g_isSideways=false;
static string g_tfa_detail="";
static HTFLevel g_htfLevels[50];
static int g_htfLevelCount=0;
static datetime g_lastLevelScan=0;
static bool g_mtfConfirmed=true;
static string g_filterStatus="ALL CLEAR";
// --- CUSTOM TANH (MQL4) ---
double Tanh(double x){
double exp2x = MathExp(2.0 * x);
return (exp2x - 1.0) / (exp2x + 1.0);
}
// --- ADVANCED TFA (Kalman + Fractal + Trap) ---
double CalcFractalDimension(int period){
if(period<2) return 1.5;
double sum=0;
for(int i=1;i<period;i++){
double r1=High[i]-Low[i];
double r2=High[i+1]-Low[i+1];
if(r1<=0||r2<=0) continue;
sum+=MathLog(r1/r2+0.001)*MathLog((double)i/period);
}
double res=2.0-sum/period;
return MathMin(2.0,MathMax(1.0,res));
}
double DetectBrokerTrap(int lookback){
int bull=0,bear=0;
for(int i=1;i<=lookback;i++){
if(Close[i]>Open[i]) bull++;
else if(Close[i]<Open[i]) bear++;
}
double crowd=(bull>bear)?(double)bull/lookback:(double)bear/lookback;
double move=MathAbs(Close[1]-Close[lookback])/(Close[lookback]+0.00001);
if(crowd>0.7 && move<0.002) return 0.9;
if(crowd>0.6 && move>0.001) return 0.5;
return 0.3;
}
double QuickMedian(double &arr[],int size){
double sorted[20];
for(int i=0;i<size;i++) sorted[i]=arr[i];
for(int i=0;i<size-1;i++)
for(int j=i+1;j<size;j++)
if(sorted[i]>sorted[j]){ double t=sorted[i]; sorted[i]=sorted[j]; sorted[j]=t; }
return (sorted[size/2]+sorted[(size-1)/2])/2.0;
}
double CalcAdvancedTFA(string &detail){
if(Bars<50){ detail="Low bars"; return 3.0; }
static double prevScore=3.0, kalmanState=3.0, kalmanCovar=1.0;
static datetime lastBarTime=0;
static double scoreHistory[15];
static int histIdx=0;
if(scoreHistory[0]==0.0) for(int i=0;i<15;i++) scoreHistory[i]=3.0;
if(Time[0]==lastBarTime){ detail="Smooth"; return prevScore; }
lastBarTime=Time[0];
double comp[8], w[8];
// ADX+Fractal
double adx=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1);
double fd=CalcFractalDimension(10);
comp[0]=1.0/(1.0+MathExp(-(adx*fd-18.0)/6.0));
w[0]=0.14+fd*0.06;
// Volume
double v1=iVolume(NULL,PERIOD_M1,1), vA=0;
for(int i=2;i<=15;i++) vA+=iVolume(NULL,PERIOD_M1,i);
vA=(vA>0)?vA/14.0:1;
double vr=MathMin(v1/vA,5.0);
double volSpike=Tanh((vr-1.2)*0.8);
comp[1]=(volSpike+1.0)/2.0;
w[1]=0.12+(vr>2.0?0.08:0);
// RSI+Stoch
double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);
double stochK=iStochastic(NULL,PERIOD_M1,5,3,3,MODE_SMA,0,MODE_MAIN,1);
double rsiDev=MathAbs(rsi-50)/50;
double stochDev=MathAbs(stochK-50)/50;
comp[2]=MathMin(1.0,(rsiDev+stochDev)*1.2);
w[2]=0.10+rsiDev*0.1;
// ATR
double atr=iATR(NULL,PERIOD_M1,14,1);
double atr14ago=iATR(NULL,PERIOD_M1,14,15);
double volReg=(atr14ago>0)?atr/atr14ago:1.0;
double cs=High[1]-Low[1];
double atrRatio=cs/(atr+0.00001);
double atrNorm=Tanh((atrRatio*volReg-1.2)*1.5);
comp[3]=(atrNorm+1.0)/2.0;
w[3]=0.11*MathMin(1.5,volReg);
// Body+Shadow
double body=MathAbs(Close[1]-Open[1]);
double rg=High[1]-Low[1];
double us=High[1]-MathMax(Open[1],Close[1]);
double ls=MathMin(Open[1],Close[1])-Low[1];
double br=(rg>0)?body/rg:0;
double sp=1.0-(us+ls)/(rg+0.00001)*0.5;
comp[4]=MathPow(br,0.7)*sp;
w[4]=0.11;
// Session
comp[5]=IsSessionActive()?0.85:0.4;
w[5]=0.08;
// Trap
double trap=DetectBrokerTrap(20);
double mw=MicroWick();
if(mw>0.65) trap=MathMax(trap,0.7);
comp[6]=trap;
w[6]=0.14*(0.5+trap);
// MACD
double macdM=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
double macdS=iMACD(NULL,PERIOD_M1,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
double pc=(Close[1]-Close[5])/(Close[5]+0.00001);
double div=MathAbs(macdM-macdS)*MathAbs(pc)*100;
comp[7]=MathMin(1.0,div);
w[7]=0.07;
double wSum=0; for(int i=0;i<8;i++) wSum+=w[i];
if(wSum>0) for(int i=0;i<8;i++) w[i]/=wSum;
// Directional scoring
double call=0, put=0;
double pDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_PLUSDI,1);
double mDI=iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MINUSDI,1);
double diBias=Tanh((pDI-mDI)/25.0);
for(int i=0;i<8;i++){
double contrib=comp[i]*w[i];
if(i==6){
if(comp[6]>0.65) contrib*=-diBias;
else contrib*=diBias;
} else contrib*=diBias;
if(contrib>0) call+=contrib;
else put+=-contrib;
}
// Heiken Ashi
double haC=(Open[1]+High[1]+Low[1]+Close[1])/4.0;
double haO=(Open[2]+Close[2])/2.0;
double haChange=(haC-haO)/(High[1]-Low[1]+0.0001);
double haBias=Tanh(haChange*2.5);
if(haBias>0) call+=0.1*haBias;
else put+=0.1*(-haBias);
double raw=MathMax(call,put)*6.0;
raw=MathMin(6.0,MathMax(0.0,raw));
// Kalman + Median
double R=0.5+(atr/Close[0])*200;
double Q=0.05*(1.0+MathAbs(diBias)*0.5);
double pred=kalmanState;
double predCov=kalmanCovar+Q;
double K=predCov/(predCov+R+0.00001);
double kal=pred+K*(raw-pred);
kalmanCovar=(1-K)*predCov;
kalmanState=kal;
scoreHistory[histIdx]=kal;
histIdx=(histIdx+1)%15;
double median=QuickMedian(scoreHistory,15);
double final=0.65*kal+0.25*median+0.10*raw;
final=MathMax(0.5,MathMin(6.0,final));
bool isCall=(call>put);
detail=StringFormat("ADX:%.2f VOL:%.2f RSI:%.2f ATR:%.2f BODY:%.2f TRAP:%.2f %s %.1f/6",
comp[0],comp[1],comp[2],comp[3],comp[4],comp[6],(isCall?"CALL":"PUT"),final);
g_tfa_detail=detail;
prevScore=final;
return final;
}
// --- ADVANCED MICRO AI (simple but effective) ---
double CalcAdvancedMicroAI(){
if(Bars<30) return 50.0;
double score=50.0;
for(int i=1;i<=5;i++){
double r=High[i]-Low[i];
if(r<=0) continue;
double uw=(High[i]-MathMax(Open[i],Close[i]))/r;
double lw=(MathMin(Open[i],Close[i])-Low[i])/r;
double w=(6.0-i)/5.0;
if(uw>0.60) score-=w*15;
if(lw>0.60) score+=w*15;
}
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; }
score+=(pos5/5.0-0.5)*20.0;
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;
double v1=iVolume(NULL,PERIOD_M1,1), vA=0; for(int i=2;i<=6;i++) vA+=iVolume(NULL,PERIOD_M1,i); vA/=5.0;
if(vA>0){ double vr=v1/vA; if(vr>1.5 && Close[1]>Open[1]) score+=8; if(vr>1.5 && Close[1]<Open[1]) score-=8; }
double r1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1), r5=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,5);
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;
return MathMax(5.0,MathMin(95.0,score));
}
// --- HA CALCULATION (simple, works) ---
void CalcHA(){
if(Bars<10) return;
ArraySetAsSeries(Open,true); ArraySetAsSeries(High,true); ArraySetAsSeries(Low,true); ArraySetAsSeries(Close,true);
static double haO1[500],haC1[500]; static datetime lb1=0;
ArraySetAsSeries(haO1,true); ArraySetAsSeries(haC1,true);
datetime c1=iTime(NULL,PERIOD_M1,0);
if(c1!=lb1){ lb1=c1; int lim=MathMin(iBars(NULL,PERIOD_M1),500);
for(int i=lim-1;i>=0;i--){ haC1[i]=(Open[i]+High[i]+Low[i]+Close[i])/4.0;
if(i==lim-1) haO1[i]=(Open[i]+Close[i])/2.0; else haO1[i]=(haO1[i+1]+haC1[i+1])/2.0; }}
double d1=MathAbs(haC1[1]-haO1[1]),r1=High[1]-Low[1];
bool dz=(r1>0&&d1<r1*0.1),b1=(!dz&&haC1[1]>haO1[1]),be1=(!dz&&haC1[1]<haO1[1]);
if(b1){g_haM1="HA BULLISH 1";g_haM1Color=clrLime;}
else if(be1){g_haM1="HA BEARISH 1";g_haM1Color=clrRed;}
else{g_haM1="HA DOJI 1";g_haM1Color=clrYellow;}
if(iBars(NULL,PERIOD_M5)>=10){
static double haO5[200],haC5[200]; static datetime lb5=0;
ArraySetAsSeries(haO5,true); ArraySetAsSeries(haC5,true);
datetime c5=iTime(NULL,PERIOD_M5,0);
if(c5!=lb5){ lb5=c5; int lim=MathMin(iBars(NULL,PERIOD_M5),200);
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);
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; }}
double d5=MathAbs(haC5[1]-haO5[1]),r5=iHigh(NULL,PERIOD_M5,1)-iLow(NULL,PERIOD_M5,1);
bool dz5=(r5>0&&d5<r5*0.1),b5=(!dz5&&haC5[1]>haO5[1]),be5=(!dz5&&haC5[1]<haO5[1]);
if(b5){g_haM5="HA BULLISH 5";g_haM5Color=clrLime;}
else if(be5){g_haM5="HA BEARISH 5";g_haM5Color=clrRed;}
else{g_haM5="HA DOJI 5";g_haM5Color=clrYellow;}
if(b1&&b5)g_haBoth="BOTH BULL"; else if(be1&&be5)g_haBoth="BOTH BEAR"; else g_haBoth="MIXED";
}else{g_haM5="5 --";g_haM5Color=clrGray;g_haBoth="HA --";}
}
// --- OTHER NECESSARY FUNCTIONS (short versions) ---
bool IsLineNearby(double price,double pipTol=3.0){ bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=pipTol*pip; for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i); if((int)ObjectGetInteger(0,nm,OBJPROP_TYPE)==OBJ_HLINE){ double lp=ObjectGetDouble(0,nm,OBJPROP_PRICE); if(MathAbs(lp-price)<tol) return true; } } return false; }
string GetCurrentSession(color &sC){ int h=TimeHour(TimeGMT()); if(h>=12&&h<16){sC=NEON_GOLD;return "LON+NY";} if(h>=7&&h<9){sC=NEON_CYAN;return "ASI+LON";} if(h>=7&&h<16){sC=NEON_GREEN;return "LONDON";} if(h>=12&&h<21){sC=NEON_BLUE;return "NEW YORK";} if(h>=0&&h<9){sC=NEON_ORANGE;return "ASIA";} sC=C'100,100,120'; return "SYDNEY"; }
bool IsSessionActive(){int h=TimeHour(TimeGMT());return(h>=7&&h<=21);}
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);}
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;}
double BrainSc(int &cp){ double s=0;bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001; double sup=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,LB,1)],res=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,LB,1)]; double bH=MathMax(Open[1],Close[1]),bL=MathMin(Open[1],Close[1]); if(High[1]>res&&bL<res)s-=4;if(Low[1]<sup&&bH>sup)s+=4; if(High[0]>res)s-=2;if(Low[0]<sup)s+=2; double atr=iATR(NULL,PERIOD_M1,14,1); if(atr!=0){double cn=(High[1]-Low[1])/atr,v1=(double)iVolume(NULL,PERIOD_M1,1),va=0; for(int i=2;i<=10;i++)va+=iVolume(NULL,PERIOD_M1,i);va/=9.0; double vr=va>0?v1/va:1;if(cn>1.2&&vr>1.5){if(Close[1]>Open[1])s-=3;else s+=3;}} int c=0;for(int i=1;i<=30;i++)if(Close[i]>Open[i])c++; cp=(int)(c*100.0/30.0);if(cp>=70)s-=5;if(cp<=30)s+=5;s*=1.5; 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; if(bd<rg*0.2)dj++;double uw=High[i]-MathMax(Open[i],Close[i]),lw=MathMin(Open[i],Close[i])-Low[i]; if(uw>bd*3)s+=2;if(lw>bd*3)s-=2;}if(dj>=4)s*=1.5; 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;} int h=TimeHour(TimeCurrent());double mul=1.0; if((h>=0&&h<=2)||(h>=8&&h<=11)||(h>=14&&h<=17))mul=1.20;if(h>=3&&h<=7)mul=0.90; return s*mul; }
double NeuralBiasFast(){ double r=NeuralBias(0)*0.3+NeuralBias(1)*0.7; if(r>96)r=96; if(r<4)r=4; return r; }
double NeuralBias(int s){ 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; f[4]=fSpread()/100.0; f[5]=fMem(s)/100.0; f[6]=fTick(s)/100.0; f[7]=fFrac(s)/100.0; 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); } 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; }
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;}
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;}
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;}
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;}
double fSpread(){double sp=(double)MarketInfo(Symbol(),MODE_SPREAD);return sp>8?90:sp>5?70:sp>3?40:0;}
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;}
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;}
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;}
void CalcOTCCrowd(){ int cS=0,pS=0; for(int i=1;i<=15&&i<Bars;i++){double rg=High[i]-Low[i];if(rg<=0)continue; double uw=(High[i]-MathMax(Open[i],Close[i]))/rg,lw=(MathMin(Open[i],Close[i])-Low[i])/rg; if(uw>0.70&&Close[i]<Open[i])cS+=4;if(lw>0.70&&Close[i]>Open[i])pS+=4; if(uw>0.55&&Close[i]<Open[i])cS+=2;if(lw>0.55&&Close[i]>Open[i])pS+=2; if(Close[i]>Open[i])cS+=1;else if(Close[i]<Open[i])pS+=1;} int tot=cS+pS;if(tot==0){g_otcCallPct=50;g_otcPutPct=50;} else{int rC=(int)(cS*100.0/tot),rP=100-rC; if(rC>=rP){g_otcCallPct=MathMax(50,rC);g_otcPutPct=100-g_otcCallPct;} else{g_otcPutPct=MathMax(50,rP);g_otcCallPct=100-g_otcPutPct;}} }
string DetectMyStrategy(){ int cc=g_otcCallPct,cp=g_otcPutPct,thr=STRATEGY_THRESHOLD; if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TRAP_ONLY"){ if(cc>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TRAP";g_strategySignal="PUT";return "PUT";} if(cp>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TRAP";g_strategySignal="CALL";return "CALL";}} if(STRATEGY_MODE=="BOTH"||STRATEGY_MODE=="TREND_ONLY"){ if(cc>=thr&&g_haM1=="HA BULLISH 1"){g_strategyType="TREND";g_strategySignal="CALL";return "CALL";} if(cp>=thr&&g_haM1=="HA BEARISH 1"){g_strategyType="TREND";g_strategySignal="PUT";return "PUT";}} g_strategyType="NONE";g_strategySignal="WAIT";return "WAIT"; }
void CalcAdvancedPrediction(double &gP,double &rP,string &reason,color &pC){ if(Bars<30){gP=50;rP=50;reason="Bars low";pC=NEON_YELLOW;return;} double gS=0,rS=0; if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")gS+=30; else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")rS+=30; else if(g_haM1=="HA BULLISH 1")gS+=15;else rS+=15; double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1);if(rsi<35)gS+=18;else if(rsi>65)rS+=18; int streak=0;bool isG=(Close[1]>Open[1]);for(int i=1;i<Bars&&i<=8;i++){if((Close[i]>Open[i])==isG)streak++;else break;} if(streak>=4){if(isG)rS+=20;else gS+=20;} double vl1=(double)iVolume(NULL,PERIOD_M1,1),vA=0;for(int i=2;i<=6;i++)vA+=iVolume(NULL,PERIOD_M1,i);vA/=5.0; if(vA>0&&vl1/vA>1.8){if(Close[1]>Open[1])gS+=12;else rS+=12;} bool jpy=(StringFind(Symbol(),"JPY")>=0);double pip=jpy?0.01:0.0001; if(g_nearest_res>0&&(g_nearest_res-Close[0])<6*pip)rS+=15; if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<6*pip)gS+=15; if(g_otcCallPct>=CROWD_EXTREME_PCT&&g_haM1=="HA BEARISH 1")rS+=20; if(g_otcPutPct>=CROWD_EXTREME_PCT&&g_haM1=="HA BULLISH 1")gS+=20; string ms=DetectMyStrategy();if(ms=="CALL"&&g_strategyType=="TRAP")gS+=40;if(ms=="PUT"&&g_strategyType=="TRAP")rS+=40; double diff=MathMax(-100.0,MathMin(100.0,gS-rS)); gP=MathMax(8.0,MathMin(92.0,50.0+(diff/1.6)));rP=100.0-gP; double dom=MathMax(gP,rP); if(ms=="CALL"&&g_strategyType=="TRAP"){reason="CALL TRAP!";pC=NEON_PURPLE;} else if(ms=="PUT"&&g_strategyType=="TRAP"){reason="PUT TRAP!";pC=NEON_PURPLE;} else if(dom>=85){reason=(gP>rP)?"STRONG GREEN":"STRONG RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;} else if(dom>=72){reason=(gP>rP)?"GREEN":"RED";pC=(gP>rP)?NEON_GREEN:NEON_RED;} else if(dom>=62){reason=(gP>rP)?"WEAK GREEN":"WEAK RED";pC=(gP>rP)?NEON_CYAN:NEON_ORANGE;} else{reason="WAIT";pC=NEON_YELLOW;} }
// --- SCAN SIGNALS WITH HA AND VOLUME FILTER (using mathematical HA) ---
string GetPairHADirection(string pair){
double open1 = iOpen(pair, PERIOD_M1, 1);
double high1 = iHigh(pair, PERIOD_M1, 1);
double low1 = iLow(pair, PERIOD_M1, 1);
double close1= iClose(pair, PERIOD_M1, 1);
double open2 = iOpen(pair, PERIOD_M1, 2);
double high2 = iHigh(pair, PERIOD_M1, 2);
double low2 = iLow(pair, PERIOD_M1, 2);
double close2= iClose(pair, PERIOD_M1, 2);
double open3 = iOpen(pair, PERIOD_M1, 3);
double close3= iClose(pair, PERIOD_M1, 3);
if(open1==0||high1==0||low1==0||close1==0||open2==0||close2==0||open3==0||close3==0)
return "NEUTRAL";
double haClose1 = (open1+high1+low1+close1)/4.0;
double haClose2 = (open2+high2+low2+close2)/4.0;
double haOpen2_approx = (open3+close3)/2.0;
double haOpen1 = (haOpen2_approx + haClose2)/2.0;
if(haClose1 > haOpen1) return "BULL";
else if(haClose1 < haOpen1) return "BEAR";
return "NEUTRAL";
}
double GetPairVolumeRatio(string pair){
double v1 = iVolume(pair, PERIOD_M1, 1);
double v2 = iVolume(pair, PERIOD_M1, 2);
if(v2 <= 0) return 1.0;
return v1 / v2;
}
void ScanSignals(){
g_pairCount = 0;
string fn = "OTC_Signals_Master.txt";
string cur = Symbol();
int h = FileOpen(fn, FILE_READ|FILE_TXT|FILE_SHARE_READ);
if(h == INVALID_HANDLE) return;
datetime now = TimeCurrent();
while(!FileIsEnding(h) && g_pairCount < 5){
string ln = FileReadString(h);
if(StringLen(ln) < 15) continue;
int p1 = StringFind(ln, "|");
int p2 = StringFind(ln, "|", p1+1);
int p3 = StringFind(ln, "|", p2+1);
int p4 = StringFind(ln, "|", p3+1);
if(p1<0 || p2<0 || p3<0 || p4<0) continue;
string pair = StringSubstr(ln, 0, p1);
if(pair == cur) continue;
string sig = StringSubstr(ln, p1+1, p2-p1-1);
double conf = StringToDouble(StringSubstr(ln, p2+1, p3-p2-1));
long ex = StringToInteger(StringSubstr(ln, p4+1));
if(conf < 60) continue;
if(ex < (long)(now - 10)) continue;
string haDir = GetPairHADirection(pair);
bool haMatch = false;
if(sig == "CALL" && haDir == "BULL") haMatch = true;
if(sig == "PUT" && haDir == "BEAR") haMatch = true;
if(!haMatch) continue;
double vr = GetPairVolumeRatio(pair);
if(vr > 2.0) continue;
g_pairNames[g_pairCount] = pair;
g_pairSigs[g_pairCount] = sig;
g_pairConfs[g_pairCount] = conf;
g_pairCount++;
}
FileClose(h);
}
// --- DRAWING FUNCTIONS (footer removed, bottom cubes 110) ---
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); }
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); }
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); }
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,10,true); if(StringLen(val)>0) Tx(id+"_v",x+10,y+36,val,vc,vfs,true); }
void DrawOtherPairsCube(int x,int y,int w,int h){ Bx("c20",x,y,w,h,BG_DARK2,NEON_GOLD); Tx("c20_l",x+10,y+6,"OTHER PAIRS",NEON_CYAN,9,true); if(g_pairCount==0){ Tx("c20_v0",x+10,y+32,"Scanning...",CGR,9,false); return; } int lY=28; for(int i=0;i<g_pairCount && i<5;i++){ string sp=g_pairNames[i]; if(StringLen(sp)>12) sp=StringSubstr(sp,0,12); 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,9,true); lY+=17; } }
void DrawOTCQuickCube(int x,int y,int w,int h){ Bx("c_quick",x,y,w,h,BG_DARK2,NEON_LIME); Tx("c_quick_l",x+10,y+6,"OTC QUICK",NEON_CYAN,9,true); int age=(int)(TimeCurrent()-Time[0]); int ps=Period()*60; int rem=ps-age; if(rem<0) rem=0; int mm=rem/60, ss=rem%60; string tl=(mm>0?IntegerToString(mm)+"m ":"")+IntegerToString(ss)+"s"; Tx("c_quick_t",x+10,y+26,"Time: "+tl,NEON_GOLD,10,true); double spread=MarketInfo(Symbol(),MODE_SPREAD); color spC=(spread<=BROKER_SPREAD_THRESHOLD)?NEON_GREEN:NEON_ORANGE; Tx("c_quick_s",x+10,y+48,"Spread: "+DoubleToString(spread,0),spC,9,true); double v1=iVolume(NULL,PERIOD_M1,1), v2=iVolume(NULL,PERIOD_M1,2); double vr=(v2>0)?v1/v2:0; color vC=(vr>1.5)?NEON_RED:NEON_CYAN; Tx("c_quick_v",x+10,y+68,"Vol: "+DoubleToString(vr,1)+"x",vC,9,true); string es=GetEntryStatus(); color eC=GetEntryColor(); Tx("c_quick_e",x+10,y+90,es,eC,9,true); }
string GetEntryStatus(){ int age=(int)(TimeCurrent()-Time[0]); int ps=Period()*60; int rem=ps-age; if(rem<0) rem=0; string ms=DetectMyStrategy(); if(ms!="WAIT"){ string type=(g_strategyType=="TRAP")?"TRAP":"TREND"; if(ENTRY_MODE=="FLAG"){ if(age<FLAG_MIN_SEC) return type+" WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s"; if(rem<MIN_REMAINING_SEC) return type+" EXPIRED"; if(age>FLAG_MAX_SEC) return type+" LATE"; return type+" OPEN "+IntegerToString(rem)+"s"; } if(age<TIME_MIN_SEC) return type+" WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s"; if(age>TIME_MAX_SEC) return type+" CLOSED"; return type+" OPEN "+IntegerToString(age)+"s"; } if(ENTRY_MODE=="FLAG"){ if(age<FLAG_MIN_SEC) return "WAIT "+IntegerToString(FLAG_MIN_SEC-age)+"s"; if(rem<MIN_REMAINING_SEC) return "EXPIRED"; if(age>FLAG_MAX_SEC) return "LATE"; return "OPEN "+IntegerToString(rem)+"s left"; } if(age<TIME_MIN_SEC) return "WAIT "+IntegerToString(TIME_MIN_SEC-age)+"s"; if(age>TIME_MAX_SEC) return "CLOSED"; return "OPEN "+IntegerToString(age)+"s"; }
color GetEntryColor(){ string s=GetEntryStatus(); if(StringFind(s,"TRAP OPEN")>=0) return NEON_PURPLE; if(StringFind(s,"TREND OPEN")>=0) return NEON_LIME; if(StringFind(s,"OPEN")>=0) return NEON_GREEN; if(StringFind(s,"WAIT")>=0) return NEON_YELLOW; if(StringFind(s,"LATE")>=0 || StringFind(s,"EXPIRED")>=0 || StringFind(s,"CLOSED")>=0) return NEON_ORANGE; return NEON_RED; }
bool DirectionOK(){ if(!ENABLE_ENTRY_ZONE) return true; double cur=Close[0], lo=Low[0], hi=High[0], rg=hi-lo; if(rg==0) return true; double pos=(cur-lo)/rg*100.0; if(MathMax(g_calc_gProb,g_calc_rProb)>=85) return true; string ms=DetectMyStrategy(); if(ms=="CALL") return(pos>REVERSAL_PCT); if(ms=="PUT") return(pos<(100.0-REVERSAL_PCT)); if(StringFind(g_adv1,"CALL")>=0) return(pos>REVERSAL_PCT && (hi-cur)<rg*WICK_PCT); if(StringFind(g_adv1,"PUT")>=0) return(pos<(100.0-REVERSAL_PCT) && (cur-lo)<rg*WICK_PCT); return true; }
bool EntryPrecisionOK(){ if(TRADE_MODE=="GOD") return true; if(g_calc_gProb>80 && Close[0]<Open[0]) return false; if(g_calc_rProb>80 && Close[0]>Open[0]) return false; return true; }
void UpdateRiskControl(){ static datetime llt=0; if(g_lossStreak>=MAX_LOSS_STREAK){ g_tradingStopped=true; llt=TimeCurrent(); } if(g_tradingStopped && TimeCurrent()-llt>3600){ g_tradingStopped=false; g_lossStreak=0; } }
void FinalSignalEngine(double brain,int cp,int mts){ g_filterStatus="ALL CLEAR"; if(ENABLE_RISK_CONTROL && g_tradingStopped){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; return; } if(ENABLE_SESSION_FILTER && !IsSessionActive()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; return; } if(ENABLE_SPIKE_FILTER && IsBigCandle(1)){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; return; } if(ENABLE_LAST_SEC_BLOCK){ int age=(int)(TimeCurrent()-Time[0]); int ps=Period()*60; int rem=ps-age; if(rem<MIN_REMAINING_SEC){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; return; } } double conf=MathMax(g_calc_gProb,g_calc_rProb); if(conf<MIN_CONFIDENCE){ g_finalSignal="WAIT"; g_finalColor=NEON_YELLOW; return; } string ms=DetectMyStrategy(); if(ms!="WAIT"){ if(ENABLE_ENTRY_ZONE && !DirectionOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; return; } if(!EntryPrecisionOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; return; } g_finalSignal=ms; g_finalColor=(ms=="CALL")?NEON_GREEN:NEON_RED; return; } double th=FAST_MODE?70:68; if(g_calc_gProb>th) g_finalSignal="CALL"; else if(g_calc_rProb>th) g_finalSignal="PUT"; else if(g_calc_gProb>60) g_finalSignal="WEAK CALL"; else if(g_calc_rProb>60) g_finalSignal="WEAK PUT"; else g_finalSignal="WAIT"; if((g_finalSignal=="CALL"||g_finalSignal=="PUT") && ENABLE_ENTRY_ZONE && !DirectionOK()){ g_finalSignal="WAIT"; g_finalColor=NEON_ORANGE; return; } if(g_finalSignal=="CALL") g_finalColor=NEON_GREEN; else if(g_finalSignal=="PUT") g_finalColor=NEON_RED; else if(g_finalSignal=="WEAK CALL") g_finalColor=NEON_CYAN; else if(g_finalSignal=="WEAK PUT") g_finalColor=NEON_ORANGE; else g_finalColor=NEON_YELLOW; }
void SendSignalNotification(string sig,double conf){ if(!ENABLE_NOTIFY) return; } // disabled
void BroadcastSignal(){ double conf=MathMax(g_frozen_gProb,g_frozen_rProb); if(conf<55) return; string fn="OTC_Signals_Master.txt",pair=Symbol(); string sig=(g_frozen_gProb>g_frozen_rProb)?"CALL":"PUT"; int exp=(int)(TimeCurrent()+65); string line=pair+"|"+sig+"|"+DoubleToString(conf,0)+"|"+IntegerToString((int)TimeCurrent())+"|"+IntegerToString(exp); int h=FileOpen(fn,FILE_READ|FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE); if(h==INVALID_HANDLE){ h=FileOpen(fn,FILE_WRITE|FILE_TXT|FILE_SHARE_READ|FILE_SHARE_WRITE); if(h!=INVALID_HANDLE){ FileWriteString(h,line+"\n"); FileClose(h); } return; } string content=""; while(!FileIsEnding(h)){ string ex=FileReadString(h); if(StringLen(ex)>10 && StringFind(ex,pair+"|")!=0) content+=ex+"\n"; } content=line+"\n"+content; string lns[]; int cnt=0,pos=0; int f=StringFind(content,"\n",pos); while(f!=-1 && cnt<100){ ArrayResize(lns,cnt+1); lns[cnt]=StringSubstr(content,pos,f-pos); cnt++; pos=f+1; f=StringFind(content,"\n",pos); } if(pos<StringLen(content)){ ArrayResize(lns,cnt+1); lns[cnt]=StringSubstr(content,pos); cnt++; } if(cnt>50){ content=""; for(int i=0;i<50;i++) if(StringLen(lns[i])>10) content+=lns[i]+"\n"; } FileSeek(h,0,SEEK_SET); FileWriteString(h,content); FileFlush(h); FileClose(h); }
void ReadSPM(){ datetime cb=Time[0]; if(cb==g_last_bar && TimeCurrent()-g_spm_t<5) return; double v1=iCustom(NULL,PERIOD_M1,SPM_FILE,0,0), v2=iCustom(NULL,PERIOD_M1,SPM_FILE,1,0); if(v1!=EMPTY_VALUE && v1!=0){ double sm=0.7; g_rsc=g_rsc*(1.0-sm)+v1*sm; } if(v2!=EMPTY_VALUE && v2!=0){ double sm=0.7; g_tfa=g_tfa*(1.0-sm)+v2*sm; } g_last_bar=cb; g_spm_t=TimeCurrent(); }
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)); } g_lastPredGreen=g_frozen_gProb; g_lastPredBar=Time[0]; }
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])); } }
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; }
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; }
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); } }
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(); }
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); } }
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); } }
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,11,"Arial Bold",NEON_YELLOW); }
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; }
// --- MAIN DRAW FUNCTION (Footer removed, bottom cubes 110) ---
void Draw(){
HideSPM(); DelDashboard();
int W=DASH_W, G=8, CW=(W-2*G)/3, CH=100, cx=POS_X+G, yy=POS_Y;
int cp=0; double brain=BrainSc(cp); double nb=NeuralBiasFast(); double mw=MicroWick(); bool bf=IsBrokerForce();
g_marketMode=DetectMarketMode(brain,g_rsc,cp,nb);
if(StringLen(g_prevMode)>0 && g_prevMode!=g_marketMode){ g_signalTime=0; g_finalSignal="WAIT"; }
g_prevMode=g_marketMode;
CalcOTCCrowd(); UpdateAccuracy(); UpdateWeights();
double mai=CalcAdvancedMicroAI(); int mts=CalcAdvancedMicroTrap();
CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
UpdateRiskControl();
double tfaScore=CalcAdvancedTFA(g_tfa_detail);
color ha1C=(g_haM1=="HA BULLISH 1")?NEON_GREEN:(g_haM1=="HA BEARISH 1")?NEON_RED:NEON_YELLOW;
color ha5C=(g_haM5=="HA BULLISH 5")?NEON_GREEN:(g_haM5=="HA BEARISH 5")?NEON_RED:NEON_YELLOW;
color biasClr; string biasStr=CalcAdvancedMarketBias(biasClr,brain,g_rsc);
string ms=DetectMyStrategy();
color stratC=(g_strategyType=="TRAP")?NEON_PURPLE:(g_strategyType=="TREND")?NEON_GREEN:CGR;
string stratLabel=(g_strategyType=="TRAP")?"TRAP "+ms:(g_strategyType=="TREND")?"TREND "+ms:"NO STRATEGY";
string finalSig=g_finalSignal; color sigC=NEON_YELLOW;
if(finalSig=="CALL") sigC=NEON_GREEN; else if(finalSig=="PUT") sigC=NEON_RED; else if(finalSig=="WEAK CALL") sigC=NEON_CYAN; else if(finalSig=="WEAK PUT") sigC=NEON_ORANGE;
// Row1
Cube("c1",cx,yy,CW,CH,NEON_CYAN,BG_DARK2,"PAIR",NEON_CYAN,Symbol(),NEON_BLUE,13);
Cube("c2",cx+CW+G,yy,CW,CH,sigC,BG_DARK2,"SIGNAL",NEON_CYAN,finalSig,sigC,14);
double gP,rP; string rsn; color pClr; CalcAdvancedPrediction(gP,rP,rsn,pClr);
g_frozen_gProb=gP; g_frozen_rProb=rP; g_frozen_pAction=rsn; g_frozen_pColor=pClr; g_last_freeze_bar=Time[0];
Bx("c_pred",cx+2*(CW+G),yy,CW,CH,BG_DARK2,pClr); Tx("c_pred_l",cx+2*(CW+G)+10,yy+5,"NEXT CANDLE",NEON_CYAN,9,true);
int bW=CW-20, gBW=(int)(gP/100.0*bW), rBW=(int)(rP/100.0*bW); if(gBW<3) gBW=3; if(rBW<3) rBW=3;
Bx("c_pred_gbg",cx+2*(CW+G)+10,yy+22,bW,6,BG_DARK4,BG_DARK4); Bx("c_pred_gfg",cx+2*(CW+G)+10,yy+22,gBW,6,NEON_GREEN,NEON_GREEN); Tx("c_pred_gp",cx+2*(CW+G)+10,yy+30,"G:"+DoubleToString(gP,0)+"%",NEON_GREEN,9,true);
Bx("c_pred_rbg",cx+2*(CW+G)+10,yy+44,bW,6,BG_DARK4,BG_DARK4); Bx("c_pred_rfg",cx+2*(CW+G)+10,yy+44,rBW,6,NEON_RED,NEON_RED); Tx("c_pred_rp",cx+2*(CW+G)+10,yy+52,"R:"+DoubleToString(rP,0)+"%",NEON_RED,9,true);
Tx("c_pred_a",cx+2*(CW+G)+10,yy+68,rsn,pClr,9,true); NeonBar("c_pred_b",cx+2*(CW+G)+10,yy+86,bW,6,MathMax(gP,rP),pClr); yy+=CH+G;
// Row2
Cube("c4",cx,yy,CW,CH,NEON_CYAN,BG_DARK3,"BRAIN",NEON_CYAN,(brain>=0?"+":"")+DoubleToString(brain,1),(brain>0)?NEON_GREEN:NEON_RED,16);
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,16);
color sClr=CGR; string sName=GetCurrentSession(sClr); bool isAct=IsSessionActive();
Bx("c_ses",cx+2*(CW+G),yy,CW,CH,BG_DARK2,sClr); Tx("c_ses_l",cx+2*(CW+G)+10,yy+5,"SESSION",NEON_CYAN,9,true); Tx("c_ses_v",cx+2*(CW+G)+10,yy+24,sName,sClr,13,true);
int gH=TimeHour(TimeGMT()), gM=TimeMinute(TimeGMT()); Tx("c_ses_t",cx+2*(CW+G)+10,yy+50,"GMT "+(gH<10?"0":"")+IntegerToString(gH)+":"+(gM<10?"0":"")+IntegerToString(gM),NEON_WHITE,10,false); Tx("c_ses_s",cx+2*(CW+G)+10,yy+70,isAct?"ACTIVE":"LOW VOL",isAct?NEON_GREEN:NEON_ORANGE,9,true); yy+=CH+G;
// Row3
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,15); NeonBar("c7b",cx+12,yy+82,CW-24,6,nb,(nb>72)?NEON_ORANGE:(nb<35)?NEON_CYAN:NEON_GREEN);
Bx("c8",cx+CW+G,yy,CW,CH,BG_DARK2,NEON_CYAN); Tx("c8_l",cx+CW+G+10,yy+5,"CROWD",NEON_CYAN,9,true); Tx("c8_c",cx+CW+G+10,yy+24,"CALL "+IntegerToString(g_otcCallPct)+"%",NEON_RED,12,true); Tx("c8_p",cx+CW+G+10,yy+46,"PUT "+IntegerToString(g_otcPutPct)+"%",NEON_GREEN,12,true); Tx("c8_b",cx+CW+G+10,yy+70,"OTC Crowd",NEON_GOLD,9,false);
Cube("c_strat",cx+2*(CW+G),yy,CW,CH,stratC,BG_DARK3,"STRATEGY",NEON_CYAN,stratLabel,stratC,11); yy+=CH+G;
// Row4
color maC; string maDir; 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"; }
Cube("c_mai",cx,yy,CW,CH,maC,BG_DARK2,"MICRO AI",NEON_CYAN,DoubleToString(mai,0)+"%",maC,16); NeonBar("c_mai_b",cx+12,yy+82,CW-24,6,mai,maC);
color mtsC=(mts>=90)?NEON_PURPLE:(mts>=75)?NEON_RED:(mts>=50)?NEON_ORANGE:NEON_GREEN; string mtsL=(mts>=90)?"EXTREME TRAP":(mts>=75)?"HIGH TRAP":(mts>=50)?"MEDIUM":"CLEAR";
Cube("c_mts",cx+CW+G,yy,CW,CH,mtsC,BG_DARK2,"MICRO TRAP",NEON_CYAN,"SCORE "+IntegerToString(mts),mtsC,13); NeonBar("c_mts_b",cx+CW+G+12,yy+82,CW-24,6,MathMin(100,mts),mtsC);
int tfaInt=(int)tfaScore; color tfaColor; string tfaLabel; if(tfaInt>=5){ tfaLabel="STRONG"; tfaColor=NEON_GREEN; } else if(tfaInt>=4){ tfaLabel="GOOD"; tfaColor=NEON_LIME; } else if(tfaInt>=3){ tfaLabel="MEDIUM"; tfaColor=NEON_YELLOW; } else if(tfaInt>=2){ tfaLabel="WEAK"; tfaColor=NEON_ORANGE; } else{ tfaLabel="POOR"; tfaColor=C'100,100,120'; } color tfaBC=tfaColor; string dirTxt=""; 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]"; }
Bx("c_tfa",cx+2*(CW+G),yy,CW,CH,BG_DARK3,tfaBC); Tx("c_tfa_l",cx+2*(CW+G)+10,yy+5,"TFA SCORE",NEON_CYAN,9,true); Tx("c_tfa_v",cx+2*(CW+G)+10,yy+24,IntegerToString(tfaInt)+"/6 "+tfaLabel+dirTxt,tfaBC,11,true); Tx("c_tfa_d",cx+2*(CW+G)+10,yy+50,g_tfa_detail,CGR,8,false); NeonBar("c_tfa_b",cx+2*(CW+G)+10,yy+82,CW-20,6,(double)tfaInt/6.0*100.0,tfaBC); yy+=CH+G;
// Row5
double frac=CalcAdvancedFractal(); color frC=(frac>=75)?NEON_RED:(frac>=50)?NEON_ORANGE:(frac>=25)?NEON_YELLOW:NEON_GREEN; string frT=(frac>=75)?"TRAP ZONE!":(frac>=50)?"WARNING":(frac>=25)?"CAUTION":"CLEAR";
Cube("c_frc",cx,yy,CW,CH,frC,BG_DARK2,"FRACTAL",NEON_CYAN,frT,frC,11); NeonBar("c_frc_b",cx+12,yy+82,CW-24,6,frac,frC);
Bx("c_bias",cx+CW+G,yy,CW,CH,BG_DARK2,biasClr); Tx("c_bias_l",cx+CW+G+10,yy+5,"MARKET BIAS",NEON_CYAN,9,true); Tx("c_bias_v",cx+CW+G+10,yy+24,biasStr,biasClr,12,true); Tx("c_bias_m",cx+CW+G+10,yy+48,"MODE: "+g_marketMode,(g_marketMode=="TREND")?NEON_GREEN:(g_marketMode=="REVERSAL")?NEON_RED:NEON_YELLOW,9,false); color accC=(g_accuracy>=70)?NEON_GREEN:(g_accuracy>=60)?NEON_YELLOW:NEON_RED; Tx("c_bias_a",cx+CW+G+10,yy+68,"ACC: "+DoubleToString(g_accuracy,1)+"%",accC,9,false); NeonBar("c_bias_b",cx+CW+G+10,yy+82,CW-20,6,g_accuracy,accC);
int dg_sr=(int)MarketInfo(Symbol(),MODE_DIGITS); if(dg_sr<=0) dg_sr=5; Bx("c18",cx+2*(CW+G),yy,CW,CH,BG_DARK2,NEON_CYAN); Tx("c18_l",cx+2*(CW+G)+10,yy+4,"S/R LEVELS",NEON_CYAN,9,true); Tx("c18_r",cx+2*(CW+G)+10,yy+24,"R: "+(g_nearest_res>0?DoubleToString(g_nearest_res,dg_sr):"--"),NEON_RED,12,true); Tx("c18_s",cx+2*(CW+G)+10,yy+48,"S: "+(g_nearest_sup>0?DoubleToString(g_nearest_sup,dg_sr):"--"),NEON_GREEN,12,true); Tx("c18_b",cx+2*(CW+G)+10,yy+72,g_brk_str,g_brk_color,10,true); yy+=CH+G;
// Row6
color wickC=(mw>0.70)?NEON_RED:(mw>0.50)?NEON_ORANGE:NEON_GREEN; Bx("c15",cx,yy,CW,CH,BG_DARK2,wickC); Tx("c15_l",cx+10,yy+5,"WICKS",NEON_CYAN,9,true); Tx("c15_v",cx+10,yy+24,DoubleToString(mw,2),wickC,16,true); Tx("c15_b",cx+10,yy+52,(mw>0.70)?"KILL SHOT":(mw>0.50)?"HIGH":"LOW",wickC,10,false); NeonBar("c15_bar",cx+10,yy+82,CW-20,6,mw*100,wickC);
Bx("c_ha",cx+CW+G,yy,CW,CH,BG_DARK2,ha1C); Tx("c_ha_l",cx+CW+G+10,yy+5,"HA CANDLES",NEON_CYAN,9,true); Tx("c_ha_m1",cx+CW+G+10,yy+26,"M1: "+g_haM1,ha1C,11,true); Tx("c_ha_m5",cx+CW+G+10,yy+48,"M5: "+g_haM5,ha5C,11,true); string haComb=""; color haCombC=NEON_YELLOW; if(g_haM1=="HA BULLISH 1" && g_haM5=="HA BULLISH 5"){ haComb="BOTH BULL"; haCombC=NEON_GREEN; } else if(g_haM1=="HA BEARISH 1" && g_haM5=="HA BEARISH 5"){ haComb="BOTH BEAR"; haCombC=NEON_RED; } else haComb="MIXED"; Tx("c_ha_c",cx+CW+G+10,yy+72,haComb,haCombC,10,true);
string revReason=DetectSuddenReversal(); color revColor=NEON_YELLOW; if(StringFind(revReason,"BULL")>=0) revColor=NEON_GREEN; if(StringFind(revReason,"BEAR")>=0) revColor=NEON_RED; Bx("c_reason",cx+2*(CW+G),yy,CW,CH,BG_DARK2,revColor); Tx("c_reason_l",cx+2*(CW+G)+10,yy+5,"REVERSAL",NEON_CYAN,9,true); 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+28,sr,revColor,9,false); } else Tx("c_reason_v",cx+2*(CW+G)+10,yy+28,"No reversal",CGR,9,false); yy+=CH+G;
// Bottom 3 cubes - height 110
int bottomW=(W-2*G-2*G)/3; int bottomH=110; yy+=5;
int x1=cx; Bx("c_hrn",x1,yy,bottomW,bottomH,BG_DARK2,NEON_PINK); Tx("c_hrn_l",x1+8,yy+6,"HRN LEVEL",NEON_PINK,9,true); Tx("c_hrn_v",x1+8,yy+28,g_hrn_str,NEON_PINK,12,true); Tx("c_hrn_t",x1+8,yy+54,(g_hrn_is_sup?"SUPPORT":"RESISTANCE"),NEON_PINK,9,false); Tx("c_hrn_b",x1+8,yy+76,"Brk "+IntegerToString(g_hrn_brk_bars)+"/"+IntegerToString(HRN_CONFIRM_BARS),NEON_PINK,8,false); Tx("c_hrn_s",x1+8,yy+94,g_isSideways?"SIDEWAYS":"TRENDING",g_isSideways?NEON_YELLOW:NEON_GREEN,8,false);
int x2=x1+bottomW+G; DrawOtherPairsCube(x2,yy,bottomW,bottomH);
int x3=x2+bottomW+G; DrawOTCQuickCube(x3,yy,bottomW,bottomH);
UpdateTimer(); HideSPM(); ChartRedraw();
}
// --- MISSING FUNCTIONS (stubs, replace with your actual implementations if needed) ---
double CalcAdvancedFractal(){ if(Bars<15)return 0; double score=0; for(int i=2;i<=8&&i+2<Bars;i++){ if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){ double d=(High[i]-Close[0])/Point; if(d<50&&d>-10)score+=35; } if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){ double d=(Close[0]-Low[i])/Point; if(d<50&&d>-10)score+=25; } } int dj=0;for(int i=1;i<=6;i++){ double b=MathAbs(Close[i]-Open[i]),rg=High[i]-Low[i]; if(rg>0&&b<rg*0.20)dj++; } if(dj>=3)score+=25; double r1=High[1]-Low[1]; if(r1>0){ double uw1=(High[1]-MathMax(Open[1],Close[1]))/r1,lw1=(MathMin(Open[1],Close[1])-Low[1])/r1; if(uw1>0.70||lw1>0.70)score+=20; } return MathMin(100,score); }
string CalcAdvancedMarketBias(color &bC,double brain,double rsc){ if(Bars<30){bC=NEON_YELLOW;return "CALCULATING";} double score=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double pc=Close[0]-Close[10]; 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; double hh1=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,1)],hh2=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,5,6)]; double ll1=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,1)],ll2=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,5,6)]; 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; double ema20=0,ema20p=0; for(int i=0;i<20;i++)ema20+=Close[i]; ema20/=20; for(int i=1;i<=20&&i<Bars;i++)ema20p+=Close[i]; ema20p/=20; if(ema20>ema20p)score+=3; else if(ema20<ema20p)score-=3; double ema50=0; for(int i=0;i<50&&i<Bars;i++)ema50+=Close[i]; ema50/=MathMin(50,Bars); if(ema20>ema50)score+=3; else score-=3; 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++; } if(gC>=7)score+=3; else if(rC>=7)score-=3; else if(gC>=5)score+=1; else if(rC>=5)score-=1; 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"); if(m1B&&m5B)score+=4; else if(m1Be&&m5Be)score-=4; else if(m1B)score+=2; else if(m1Be)score-=2; 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); if(adx>20){ if(pDI>mDI+5)score+=4; else if(mDI>pDI+5)score-=4; } if(brain>3)score-=2; else if(brain<-3)score+=2; if(Close[1]>Open[1])score+=1; else if(Close[1]<Open[1])score-=1; if(rsc>2)score+=1; else if(rsc<-2)score-=1; if(score>=12){bC=NEON_GREEN;return "STRONG BULL";} if(score>=7){bC=NEON_GREEN;return "BULLISH";} if(score>=3){bC=NEON_CYAN;return "LIGHT BULL";} if(score<=-12){bC=NEON_RED;return "STRONG BEAR";} if(score<=-7){bC=NEON_RED;return "BEARISH";} if(score<=-3){bC=NEON_ORANGE;return "LIGHT BEAR";} bC=NEON_YELLOW;return "NEUTRAL"; }
void CalcPrediction(double brain,double nb,int cp,double mai,int mts,double rsc,bool bf,double mw){ string ms=DetectMyStrategy(); bool sA=(ms!="WAIT"); if(sA&&g_strategyType=="TRAP"){ if(ms=="PUT"){ g_gProb=12.0; g_rProb=88.0; g_pAction="PUT TRAP!"; g_pColor=NEON_PURPLE; g_calc_gProb=g_gProb; g_calc_rProb=g_rProb; g_calc_pAction=g_pAction; g_calc_pColor=g_pColor; return; } if(ms=="CALL"){ g_gProb=88.0; g_rProb=12.0; g_pAction="CALL TRAP!"; g_pColor=NEON_PURPLE; g_calc_gProb=g_gProb; g_calc_rProb=g_rProb; g_calc_pAction=g_pAction; g_calc_pColor=g_pColor; return; } } double tS=UltimateTrapScore(); bool bF2=IsBrokerForce(); 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; } } 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; } double gS=0,rS=0,ab=MathMax(0.70,MathMin(1.30,g_accuracy/65.0)); if(IsSidewaysMarket()){ bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; bool nR=(g_nearest_res>0&&(g_nearest_res-Close[0])<8*pip),nS=(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<8*pip); if(!nR&&!nS){ g_gProb=50; g_rProb=50; g_pAction="SIDEWAYS"; g_pColor=NEON_YELLOW; g_calc_gProb=50; g_calc_rProb=50; g_calc_pAction=g_pAction; g_calc_pColor=g_pColor; return; } if(nR)rS+=20; if(nS)gS+=20; } 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; } } if(g_haM1=="HA BULLISH 1"&&g_haM5=="HA BULLISH 5")gS+=60; else if(g_haM1=="HA BEARISH 1"&&g_haM5=="HA BEARISH 5")rS+=60; else if(g_haM1=="HA BULLISH 1")gS+=30; else if(g_haM1=="HA BEARISH 1")rS+=30; if(HA_ALIGN_FILTER && g_haBoth=="MIXED"){ gS*=0.5; rS*=0.5; } gS+=(nb-50)/50.0*22*ab; rS-=(nb-50)/50.0*22*ab; double bn=MathMax(-1.0,MathMin(1.0,brain/10.0)); gS+=bn*15*ab; rS-=bn*15*ab; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; if(g_nearest_res>0&&(g_nearest_res-Close[0])<10*pip)rS+=12; if(g_nearest_sup>0&&(Close[0]-g_nearest_sup)<10*pip)gS+=12; double rsi1=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1); if(rsi1>70)rS+=6; if(rsi1<30)gS+=6; double sn=MathMax(-1.0,MathMin(1.0,rsc/3.0)); gS+=sn*8*ab; rS-=sn*8*ab; double wRS=GetWickRejectSignal(); gS+=(wRS>0?wRS:0); rS+=(wRS<0?MathAbs(wRS):0); double cPS=GetCommonPointSignal(); gS+=(cPS>0?cPS:0); rS+=(cPS<0?MathAbs(cPS):0); int rd=DetectRSIDivergence(); if(rd==1)gS+=20; if(rd==-1)rS+=20; int cp2=DetectClassicPatterns(); if(cp2==1)gS+=12; if(cp2==-1)rS+=12; int qm=DetectQMR(); if(qm==1)gS+=25; if(qm==-1)rS+=25; int sk=StreakReversalSignal(); if(sk==1)gS+=18; if(sk==-1)rS+=18; 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; } int vs=SmartVolumeSignal(); if(vs==1)gS+=12; if(vs==-1)rS+=12; if(!IsVolatilityGood()){ gS*=0.5; rS*=0.5; } double diff=MathMax(-100.0,MathMin(100.0,gS-rS)); g_gProb=MathMax(8.0,MathMin(92.0,50.0+(diff/1.8))); g_rProb=100.0-g_gProb; if(sA&&g_strategyType=="TREND"){ if(ms=="CALL"){ g_gProb=MathMax(g_gProb,85.0); g_rProb=100.0-g_gProb; } if(ms=="PUT"){ g_rProb=MathMax(g_rProb,85.0); g_gProb=100.0-g_rProb; } g_gProb=MathMin(92.0,MathMax(8.0,g_gProb)); g_rProb=100.0-g_gProb; } double dom=MathMax(g_gProb,g_rProb); 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; } } } 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; } } } else{ if(!sA){ g_pAction="WAIT"; g_pColor=NEON_YELLOW; } } g_calc_gProb=g_gProb; g_calc_rProb=g_rProb; g_calc_pAction=g_pAction; g_calc_pColor=g_pColor; }
bool IsBrokerForce(double dummy=0){ int sd=0; for(int i=1;i<=3;i++){ if(Close[i]>Open[i])sd++; else sd--; } double v1=(double)iVolume(NULL,PERIOD_M1,1), v2=(double)iVolume(NULL,PERIOD_M1,2); double sp=(double)MarketInfo(Symbol(),MODE_SPREAD); return(MathAbs(sd)==3 && v1>v2*2.0 && sp>BROKER_SPREAD_THRESHOLD); }
double UltimateTrapScore(){ double wr=MicroWick(), v1=(double)iVolume(NULL,PERIOD_M1,1), v2=(double)iVolume(NULL,PERIOD_M1,2); double avg=v2>0?v2:1.0, vr=v1/avg, rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1), sc=0.0; if(wr>0.65)sc+=40; if(vr>2.0)sc+=30; if(rsi>75||rsi<25)sc+=20; if((High[1]>g_nearest_res&&Close[1]<g_nearest_res)||(Low[1]<g_nearest_sup&&Close[1]>g_nearest_sup))sc+=25; sc+=VolumeTrapScore(); return MathMin(100.0,sc); }
double VolumeTrapScore(){ if(!VOLUME_PROFILE_TRAP||Bars<50)return 0; double cur=Close[0], hi=High[iHighest(NULL,0,MODE_HIGH,50,1)], lo=Low[iLowest(NULL,0,MODE_LOW,50,1)]; 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}; 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]++; } for(int z=0;z<zn;z++) if(zc[z]>0) vz[z]/=zc[z]; int cz=(int)((cur-lo)/zs); if(cz<0)cz=0; if(cz>=zn)cz=zn-1; double vr=(double)Volume[1]/(vz[cz]+0.001); double wr=MicroWick(); if(vr>2.0 && wr>0.65) return 25; if(vr>1.8 && wr>0.55) return 15; return 0; }
int CalcAdvancedMicroTrap(){ if(Bars<20)return 0; int score=0; double r=High[1]-Low[1]; if(r>0){ double uw=(High[1]-MathMax(Open[1],Close[1]))/r, lw=(MathMin(Open[1],Close[1])-Low[1])/r; 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; } double v1=(double)iVolume(NULL,PERIOD_M1,1), v2=(double)iVolume(NULL,PERIOD_M1,2); if(v2>0 && v1/v2>2.0)score+=25; else if(v2>0 && v1/v2>1.5)score+=12; double rsi=iRSI(NULL,PERIOD_M1,14,PRICE_CLOSE,1); if(rsi>78||rsi<22)score+=20; else if(rsi>72||rsi<28)score+=10; if((High[1]>g_nearest_res && Close[1]<g_nearest_res) || (Low[1]<g_nearest_sup && Close[1]>g_nearest_sup))score+=25; 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]); if(aG||aR)score+=15; double sp=(double)MarketInfo(Symbol(),MODE_SPREAD); if(sp>BROKER_SPREAD_THRESHOLD*1.5)score+=10; score+=(int)VolumeTrapScore(); return MathMin(100,score); }
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"; }
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; }
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; }
double GetADXStrength(){ if(Bars<20) return 0; return iADX(NULL,PERIOD_M1,14,PRICE_CLOSE,MODE_MAIN,1); }
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; }
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; }
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; }
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; }
int DetectClassicPatterns(){ if(Bars<30) return 0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double tol=PATTERN_TOLERANCE_PIPS*pip; double sh[2],sl[2]; int shB[2],slB[2]; int shC=0,slC=0; for(int i=2;i<25&&(shC<2||slC<2);i++){ if(High[i]>High[i-1]&&High[i]>High[i-2]&&High[i]>High[i+1]&&High[i]>High[i+2]){ if(shC<2){ sh[shC]=High[i]; shB[shC]=i; shC++; } } if(Low[i]<Low[i-1]&&Low[i]<Low[i-2]&&Low[i]<Low[i+1]&&Low[i]<Low[i+2]){ if(slC<2){ sl[slC]=Low[i]; slB[slC]=i; slC++; } } } if(shC>=2){ int bd=MathAbs(shB[0]-shB[1]); if(bd>=MIN_PATTERN_SEPARATION && MathAbs(sh[0]-sh[1])<=tol){ int bn=MathMin(shB[0],shB[1]), bx=MathMax(shB[0],shB[1]); double vl=Low[iLowest(NULL,PERIOD_M1,MODE_LOW,bx-bn+1,bn)]; if(Close[0]<vl) return -1; else if(Close[0]<MathMin(sh[0],sh[1])) return -1; } } if(slC>=2){ int bd=MathAbs(slB[0]-slB[1]); if(bd>=MIN_PATTERN_SEPARATION && MathAbs(sl[0]-sl[1])<=tol){ int bn=MathMin(slB[0],slB[1]), bx=MathMax(slB[0],slB[1]); double ph=High[iHighest(NULL,PERIOD_M1,MODE_HIGH,bx-bn+1,bn)]; if(Close[0]>ph) return 1; else if(Close[0]>MathMax(sl[0],sl[1])) return 1; } } return 0; }
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; 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++; } 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++; } if(hC<2||lC<2) return 0; 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; for(int iB=0;iB<lC;iB++){ if(sHB[iA]<=sLB[iB]) continue; if(sLB[iB]<=sHB[iC2]) continue; for(int iD=0;iD<lC;iD++){ if(iB==iD) continue; if(sHB[iC2]<=sLB[iD]) continue; if(sL[iD]>=sL[iB]) continue; 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; } 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; } 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; } } } } 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; for(int iB=0;iB<hC;iB++){ if(sLB[iA]<=sHB[iB]) continue; if(sHB[iB]<=sLB[iC2]) continue; for(int iD=0;iD<hC;iD++){ if(iB==iD) continue; if(sLB[iC2]<=sHB[iD]) continue; if(sH[iD]>=sH[iB]) continue; 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; } 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; } 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; } } } } return 0; }
double GetWickRejectSignal(){ if(!g_isSideways||g_wickLineCount==0) return 0; double sc=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; for(int i=0;i<g_wickLineCount;i++){ double d=MathAbs(Close[0]-g_wickLinePrice[i])/pip; bool iS=(g_wickLinePrice[i]<Close[0]); if(d<5){ if(iS) sc+=15*g_wickLineTouches[i]; else sc-=15*g_wickLineTouches[i]; } else if(d<10){ if(iS) sc+=8*g_wickLineTouches[i]; else sc-=8*g_wickLineTouches[i]; } } return MathMax(-40,MathMin(40,sc)); }
double GetCommonPointSignal(){ if(g_commonCount==0) return 0; double sc=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; for(int i=0;i<g_commonCount;i++){ if(TimeCurrent()>g_commonExpire[i]) continue; double d=MathAbs(Close[0]-g_commonPrice[i])/pip; if(d<8){ if(g_commonType[i]=="CALL") sc+=25; else sc-=25; } } return MathMax(-30,MathMin(30,sc)); }
void DetectCommonPoints(){ if(!SHOW_COMMON_POINTS){ g_commonCount=0; return; } if(Time[0]==g_lastCommonScan) return; g_lastCommonScan=Time[0]; g_commonCount=0; datetime nowBar=Time[0]; int periodSec=PeriodSeconds(PERIOD_M1); double m5h=iHigh(NULL,PERIOD_M5,iHighest(NULL,PERIOD_M5,MODE_HIGH,10,1)); double m5l=iLow(NULL,PERIOD_M5,iLowest(NULL,PERIOD_M5,MODE_LOW,10,1)); if(m5l>0 && g_commonCount<MAX_COMMON_PTS){ g_commonPrice[g_commonCount]=m5l; g_commonTime[g_commonCount]=nowBar; g_commonType[g_commonCount]="CALL"; g_commonExpire[g_commonCount]=nowBar+periodSec*120; g_commonCount++; } if(g_hrn_price>0 && g_hrn_is_sup && g_commonCount<MAX_COMMON_PTS){ g_commonPrice[g_commonCount]=g_hrn_price; g_commonTime[g_commonCount]=nowBar; g_commonType[g_commonCount]="CALL"; g_commonExpire[g_commonCount]=nowBar+periodSec*120; g_commonCount++; } if(m5h>0 && g_commonCount<MAX_COMMON_PTS){ g_commonPrice[g_commonCount]=m5h; g_commonTime[g_commonCount]=nowBar; g_commonType[g_commonCount]="PUT"; g_commonExpire[g_commonCount]=nowBar+periodSec*120; g_commonCount++; } if(g_hrn_price>0 && !g_hrn_is_sup && g_commonCount<MAX_COMMON_PTS){ g_commonPrice[g_commonCount]=g_hrn_price; g_commonTime[g_commonCount]=nowBar; g_commonType[g_commonCount]="PUT"; g_commonExpire[g_commonCount]=nowBar+periodSec*120; g_commonCount++; } for(int i=g_commonCount-1;i>=0;i--) if(TimeCurrent()>g_commonExpire[i]){ for(int j=i;j<g_commonCount-1;j++){ g_commonPrice[j]=g_commonPrice[j+1]; g_commonTime[j]=g_commonTime[j+1]; g_commonType[j]=g_commonType[j+1]; g_commonExpire[j]=g_commonExpire[j+1]; } g_commonCount--; } }
void DrawCommonPoints(){ for(int i=0;i<MAX_COMMON_PTS;i++){ SafeDel(PFX+"COMMON_"+IntegerToString(i)); SafeDel(PFX+"COMMON_L_"+IntegerToString(i)); SafeDel(PFX+"COMMON_HL_"+IntegerToString(i)); } if(!SHOW_COMMON_POINTS||g_commonCount==0) return; for(int i=0;i<g_commonCount;i++){ if(TimeCurrent()>g_commonExpire[i]) continue; if(IsLineNearby(g_commonPrice[i],8.0)) continue; string id=PFX+"COMMON_"+IntegerToString(i), idL=PFX+"COMMON_L_"+IntegerToString(i), idH=PFX+"COMMON_HL_"+IntegerToString(i); color zc=DARK_BLUE_NEON; ObjectCreate(0,idH,OBJ_HLINE,0,0,g_commonPrice[i]); ObjectSetInteger(0,idH,OBJPROP_COLOR,zc); ObjectSetInteger(0,idH,OBJPROP_WIDTH,3); ObjectSetInteger(0,idH,OBJPROP_STYLE,STYLE_SOLID); ObjectSetInteger(0,idH,OBJPROP_BACK,false); ObjectCreate(0,id,OBJ_TEXT,0,Time[0],g_commonPrice[i]); ObjectSetText(id,"*",16,"Arial",zc); ObjectSetInteger(0,id,OBJPROP_BACK,false); string lbl=(g_commonType[i]=="CALL")?"^ CALL ZONE":"v PUT ZONE"; ObjectCreate(0,idL,OBJ_TEXT,0,Time[0]+PeriodSeconds(PERIOD_M1)*3,g_commonPrice[i]); ObjectSetText(idL,lbl,9,"Arial Bold",zc); ObjectSetInteger(0,idL,OBJPROP_BACK,false); } }
void DetectWickRejections(){ g_isSideways=IsSidewaysMarket(); if(!SHOW_WICK_REJECT_LINES){ g_wickLineCount=0; return; } if(Time[0]==g_lastWickScan) return; g_lastWickScan=Time[0]; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double zone=WICK_ZONE_PIPS*pip*2; double cur=Close[0]; g_wickLineCount=0; datetime now=Time[0], expT=now+PeriodSeconds(PERIOD_M1)*WICK_EXPIRE_BARS*2; for(int i=1;i<=40&&i<Bars;i++){ double rg=High[i]-Low[i]; if(rg<=0) continue; double uw=High[i]-MathMax(Open[i],Close[i]), lw=MathMin(Open[i],Close[i])-Low[i]; double rl=0; bool fd=false; if(uw>rg*0.30){ rl=High[i]; if(MathAbs(cur-rl)<zone*3) fd=true; } if(lw>rg*0.30){ rl=Low[i]; if(MathAbs(cur-rl)<zone*3) fd=true; } if(!fd) continue; bool ex=false; for(int j=0;j<g_wickLineCount;j++) if(MathAbs(g_wickLinePrice[j]-rl)<zone){ g_wickLineTouches[j]++; ex=true; break; } if(!ex && g_wickLineCount<MAX_WICK_LINES){ g_wickLinePrice[g_wickLineCount]=rl; g_wickLineTouches[g_wickLineCount]=1; g_wickLineExpire[g_wickLineCount]=expT; g_wickLineCount++; } } for(int i=g_wickLineCount-1;i>=0;i--) if(TimeCurrent()>g_wickLineExpire[i]){ for(int j=i;j<g_wickLineCount-1;j++){ g_wickLinePrice[j]=g_wickLinePrice[j+1]; g_wickLineTouches[j]=g_wickLineTouches[j+1]; g_wickLineExpire[j]=g_wickLineExpire[j+1]; } g_wickLineCount--; } }
void DrawWickRejectLines(){ for(int i=0;i<MAX_WICK_LINES;i++){ SafeDel(PFX+"WICK_"+IntegerToString(i)); SafeDel(PFX+"WICK_L_"+IntegerToString(i)); } if(!SHOW_WICK_REJECT_LINES||!g_isSideways) return; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double cur=Close[0]; for(int i=0;i<g_wickLineCount;i++){ if(TimeCurrent()>g_wickLineExpire[i]) continue; if(MathAbs(cur-g_wickLinePrice[i])/pip>20.0) continue; if(IsLineNearby(g_wickLinePrice[i],5.0)) continue; string id=PFX+"WICK_"+IntegerToString(i), idL=PFX+"WICK_L_"+IntegerToString(i); color lc=C'0,180,255'; ObjectCreate(0,id,OBJ_HLINE,0,0,g_wickLinePrice[i]); ObjectSetInteger(0,id,OBJPROP_COLOR,lc); ObjectSetInteger(0,id,OBJPROP_WIDTH,2); ObjectSetInteger(0,id,OBJPROP_STYLE,STYLE_DOT); ObjectSetInteger(0,id,OBJPROP_BACK,false); string lbl="W"+IntegerToString(g_wickLineTouches[i])+"x"; ObjectCreate(0,idL,OBJ_TEXT,0,Time[0]+PeriodSeconds(PERIOD_M1)*2,g_wickLinePrice[i]); ObjectSetText(idL,lbl,8,"Arial Bold",lc); ObjectSetInteger(0,idL,OBJPROP_BACK,false); } }
void DetectHiddenLevels(){ g_htfLevelCount=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double curP=Close[0]; double rU=MathCeil(curP/(10*pip))*(10*pip), rD=MathFloor(curP/(10*pip))*(10*pip); if(MathAbs(curP-rU)/pip<=15) AddLevel(rU,"ROUND","RESISTANCE",TimeCurrent(),8,true); if(MathAbs(curP-rD)/pip<=15) AddLevel(rD,"ROUND","SUPPORT",TimeCurrent(),8,true); DetectHTFLevels(PERIOD_M5,"M5",3,pip); DetectHTFLevels(PERIOD_M15,"M15",5,pip); DetectHTFLevels(PERIOD_M30,"M30",7,pip); DetectHTFLevels(PERIOD_H1,"H1",9,pip); SortLevelsByStrength(); }
void DetectHTFLevels(ENUM_TIMEFRAMES tf,string tfN,int bS,double pip){ int bars=MathMin(50,iBars(NULL,tf)); if(bars<10) return; double curP=Close[0]; for(int i=2;i<bars-2;i++){ if(IsSwingHigh(tf,i,2)){ double d=MathAbs(curP-iHigh(NULL,tf,i))/pip; if(d<=20) AddLevel(iHigh(NULL,tf,i),tfN,"RESISTANCE",iTime(NULL,tf,i),bS+(20-(int)d)/2,false); } if(IsSwingLow(tf,i,2)){ double d=MathAbs(curP-iLow(NULL,tf,i))/pip; if(d<=20) AddLevel(iLow(NULL,tf,i),tfN,"SUPPORT",iTime(NULL,tf,i),bS+(20-(int)d)/2,false); } } }
bool IsSwingHigh(ENUM_TIMEFRAMES tf,int p,int lb){ double h=iHigh(NULL,tf,p); for(int i=1;i<=lb;i++){ if(p-i<0 || p+i>=iBars(NULL,tf)) return false; if(iHigh(NULL,tf,p-i)>=h || iHigh(NULL,tf,p+i)>=h) return false; } return true; }
bool IsSwingLow(ENUM_TIMEFRAMES tf,int p,int lb){ double l=iLow(NULL,tf,p); for(int i=1;i<=lb;i++){ if(p-i<0 || p+i>=iBars(NULL,tf)) return false; if(iLow(NULL,tf,p-i)<=l || iLow(NULL,tf,p+i)<=l) return false; } return true; }
void AddLevel(double price,string tf,string type,datetime time,int strength,bool isRound){ if(g_htfLevelCount>=50) return; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; for(int i=0;i<g_htfLevelCount;i++) if(MathAbs(g_htfLevels[i].price-price)/pip<5) return; g_htfLevels[g_htfLevelCount].price=price; g_htfLevels[g_htfLevelCount].timeframe=tf; g_htfLevels[g_htfLevelCount].type=type; g_htfLevels[g_htfLevelCount].time=time; g_htfLevels[g_htfLevelCount].strength=strength; g_htfLevels[g_htfLevelCount].isRoundNumber=isRound; g_htfLevelCount++; }
void SortLevelsByStrength(){ for(int i=0;i<g_htfLevelCount-1;i++) for(int j=0;j<g_htfLevelCount-i-1;j++) if(g_htfLevels[j].strength<g_htfLevels[j+1].strength){ HTFLevel tmp=g_htfLevels[j]; g_htfLevels[j]=g_htfLevels[j+1]; g_htfLevels[j+1]=tmp; } }
void DrawHiddenLevels(){ for(int i=0;i<50;i++){ SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i)); SafeDel(PFX+"HTF_LEVEL_"+IntegerToString(i)+"_LBL"); } int dc=MathMin(10,g_htfLevelCount); int drawn=0; for(int i=0;i<dc && drawn<5;i++){ bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; if(MathAbs(Close[0]-g_htfLevels[i].price)/pip>30) continue; if(IsLineNearby(g_htfLevels[i].price,5.0)) continue; string nm=PFX+"HTF_LEVEL_"+IntegerToString(drawn); color lc=g_htfLevels[i].isRoundNumber?NEON_PURPLE:(StringFind(g_htfLevels[i].type,"SUPPORT")>=0?NEON_GREEN:NEON_RED); ObjectCreate(0,nm,OBJ_HLINE,0,0,g_htfLevels[i].price); ObjectSetInteger(0,nm,OBJPROP_COLOR,lc); ObjectSetInteger(0,nm,OBJPROP_WIDTH,1); ObjectSetInteger(0,nm,OBJPROP_STYLE,STYLE_DOT); ObjectSetInteger(0,nm,OBJPROP_BACK,false); string ln=nm+"_LBL"; ObjectCreate(0,ln,OBJ_TEXT,0,Time[0],g_htfLevels[i].price); ObjectSetText(ln,StringFormat("%s %s S:%d",g_htfLevels[i].timeframe,g_htfLevels[i].type,g_htfLevels[i].strength),8,"Arial",lc); drawn++; } }
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 ""; }
void SafeDel(string id){ if(ObjectFind(0,id)>=0) ObjectDelete(0,id); }
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); }
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); } }
void UpdateHRN(){ if(Bars<LOOKBACK+5) return; if(Time[0]!=g_hrn_scan_bar){ ScanHRNLevels(); g_hrn_scan_bar=Time[0]; } bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double cur=Close[0]; int dg=(int)MarketInfo(Symbol(),MODE_DIGITS); if(dg<=0) dg=5; if(g_hrn_price==0){ g_hrn_price=FindNearestHRN(cur); g_hrn_is_sup=(cur>g_hrn_price); g_hrn_brk_bars=0; } bool ab=(cur>g_hrn_price+3*pip), bl=(cur<g_hrn_price-3*pip); bool brk=(g_hrn_is_sup && bl) || (!g_hrn_is_sup && ab); if(brk){ g_hrn_brk_bars++; if(g_hrn_brk_bars>=HRN_CONFIRM_BARS){ double nH=FindNearestHRN(cur); g_hrn_price=nH; g_hrn_is_sup=(cur>g_hrn_price); g_hrn_brk_bars=0; } } else g_hrn_brk_bars=0; g_hrn_str=DoubleToString(NormalizeDouble(g_hrn_price,dg),dg); DrawHLine(PFX+"HRN_LINE",g_hrn_price,NEON_PINK,3,STYLE_SOLID); string ln=PFX+"HRN_LBL"; SafeDel(ln); ObjectCreate(0,ln,OBJ_TEXT,0,Time[0]+Period()*60*2,g_hrn_price); ObjectSetText(ln,"HRN "+(g_hrn_is_sup?"SUP":"RES")+" "+g_hrn_str,9,"Arial Bold",NEON_PINK); ObjectSetInteger(0,ln,OBJPROP_BACK,false); }
void ScanHRNLevels(){ g_rj_cnt=0; bool jpy=(StringFind(Symbol(),"JPY")>=0); double pip=jpy?0.01:0.0001; double cur=Close[0]; for(int i=1;i<=LOOKBACK&&i<Bars;i++){ double rg=High[i]-Low[i]; if(rg<=0) continue; double uw=High[i]-MathMax(Open[i],Close[i]), lw=MathMin(Open[i],Close[i])-Low[i]; if(uw>rg*0.35){ double lv=High[i]; if(MathAbs(lv-cur)<=40*pip){ bool f=false; for(int k=0;k<g_rj_cnt;k++) if(MathAbs(g_rj[k].price-lv)<8*pip){ g_rj[k].touches++; f=true; break; } if(!f && g_rj_cnt<MAX_REJ){ g_rj[g_rj_cnt].price=lv; g_rj[g_rj_cnt].touches=1; g_rj_cnt++; } } } if(lw>rg*0.35){ double lv=Low[i]; if(MathAbs(lv-cur)<=40*pip){ bool f=false; for(int k=0;k<g_rj_cnt;k++) if(MathAbs(g_rj[k].price-lv)<8*pip){ g_rj[k].touches++; f=true; break; } if(!f && g_rj_cnt<MAX_REJ){ g_rj[g_rj_cnt].price=lv; g_rj[g_rj_cnt].touches=1; g_rj_cnt++; } } } } for(int i=0;i<g_rj_cnt-1;i++) for(int j=0;j<g_rj_cnt-i-1;j++) if(g_rj[j].touches<g_rj[j+1].touches){ RejLevel tmp=g_rj[j]; g_rj[j]=g_rj[j+1]; g_rj[j+1]=tmp; } }
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); }
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; }
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; }
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; double cur=Close[0]; g_nearest_res=0; g_nearest_sup=0; double mR=999999, mS=999999; for(int i=0;i<resCount;i++) if(ResLevels[i]>cur && (ResLevels[i]-cur)<mR){ mR=ResLevels[i]-cur; g_nearest_res=ResLevels[i]; } for(int i=0;i<supCount;i++) if(SupLevels[i]<cur && (cur-SupLevels[i])<mS){ mS=cur-SupLevels[i]; g_nearest_sup=SupLevels[i]; } if(g_nearest_res>0 && !IsLineNearby(g_nearest_res,5.0)) DrawHLine(PFX+"NEAREST_RES",g_nearest_res,NEON_RED,2,STYLE_SOLID); if(g_nearest_sup>0 && !IsLineNearby(g_nearest_sup,5.0)) DrawHLine(PFX+"NEAREST_SUP",g_nearest_sup,NEON_GREEN,2,STYLE_SOLID); }
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; } }
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(); }
// --- MAIN EVENTS ---
int OnInit(){
InitNW(); NuclearDeleteAll();
resCount=0; supCount=0; lastSRBar=0; g_hrn_price=0; g_hrn_brk_bars=0; g_hrn_scan_bar=0;
g_nearest_res=0; g_nearest_sup=0; g_rj_cnt=0; g_pairCount=0;
g_marketMode="RANGE"; g_prevMode=""; g_last_freeze_bar=0;
g_lastNotified=""; g_copiedPair=""; g_accuracy=ValidateHistoricalAccuracy();
g_acc_correct=0; g_acc_total=0; g_acc_lastBar=0;
g_lastPredGreen=50.0; g_lastPredBar=0; g_lastLogBar=0;
g_lossStreak=0; g_tradingStopped=false; g_stopStartTime=0;
g_strategyType="NONE"; g_strategySignal="WAIT"; g_strategyReason="";
g_frozen_gProb=50; g_frozen_rProb=50; g_calc_gProb=50; g_calc_rProb=50;
g_commonCount=0; g_wickLineCount=0; g_tfa_detail=""; g_htfLevelCount=0; g_lastLevelScan=0;
g_mtfConfirmed=true; g_filterStatus="ALL CLEAR";
LoadMLWeights(); EventSetTimer(1);
Print("AIBRAIN v45.0 ADVANCED LOADED - ALL FIXES INCLUDED");
return INIT_SUCCEEDED;
}
void OnDeinit(const int r){ EventKillTimer(); Comment(""); for(int i=ObjectsTotal()-1;i>=0;i--){ string nm=ObjectName(i); if(StringFind(nm,PFX)==0) ObjectDelete(nm); } }
void OnTimer(){
if(Bars<50) return;
static datetime last5min=0;
if(Time[0]/300 != last5min/300){ DetectHiddenLevels(); last5min=Time[0]; }
ReadSPM(); CalcHA(); UpdateHRN(); UpdateSR();
DetectCommonPoints(); DetectWickRejections();
DrawCommonPoints(); DrawWickRejectLines(); DrawHiddenLevels(); DrawNearestSR();
int cp=0; double brain=BrainSc(cp); double nb=NeuralBiasFast(); double mw=MicroWick(); bool bf=IsBrokerForce();
double mai=CalcAdvancedMicroAI(); int mts=CalcAdvancedMicroTrap();
CalcPrediction(brain,nb,cp,mai,mts,g_rsc,bf,mw);
FinalSignalEngine(brain,cp,mts);
BroadcastSignal(); ScanSignals();
Draw();
}
int OnCalculate(const int rates_total,const int prev_calculated,const datetime &time[],const double &open[],const double &high[],const double &low[],const double &close[],const long &tick_volume[],const long &volume[],const int &spread[]){ return rates_total; }