Here's a breakdown of what this MetaTrader script does, explained in a way that doesn't require any programming knowledge:
Overall Goal:
The script is designed to automatically trade on the Forex market (or other financial markets supported by MetaTrader). It aims to identify good opportunities to either buy or sell a particular currency pair based on a combination of different technical indicators, using a "fuzzy logic" approach to make decisions.
Key Components and How They Work:
-
Money Management:
- The script can automatically adjust the size of its trades (the "Lots" parameter) based on the size of your trading account.
- It uses a percentage of your account balance (
PercentMM) to determine how much to risk on each trade. This helps to manage risk and potentially grow your account more consistently. - If you prefer, you can set a fixed trade size instead of using automatic money management.
-
Order Management:
- The script keeps track of how many buy and sell orders it currently has open for a specific currency pair. This helps it avoid opening too many positions in the same direction at once.
-
Fuzzy Logic Analysis:
- This is the heart of the script's trading strategy. Instead of relying on simple "yes/no" signals, it uses a more nuanced approach.
- It looks at several technical indicators like Gator Oscillator, Williams Percent Range (WPR), Acceleration/Deceleration Oscillator (AC), DeMarker and Relative Strength Index (RSI).
- Each indicator provides a range of possible values, and the script assigns "degrees of membership" to different categories (e.g., "very oversold," "slightly oversold," "neutral," "slightly overbought," "very overbought").
- The script then combines these "degrees of membership" for all the indicators, giving each indicator a certain "weight" in the overall decision.
- The result is a single "Decision" value that represents the overall strength of the buy or sell signal. This value is between 0 and 1.
-
Opening Orders:
- Based on the "Decision" value from the fuzzy logic analysis, the script decides whether to open a buy or sell order.
- If the "Decision" value is very low (below 0.25), the script interprets this as a strong sell signal and opens a sell order.
- If the "Decision" value is very high (above 0.75), the script interprets this as a strong buy signal and opens a buy order.
-
Stop Loss and Trailing Stop:
- The script can automatically set a "Stop Loss" order for each trade. This is a price level at which the trade will be automatically closed to limit potential losses. The initial
SLparameter defines how far away from the opening price the stop loss is set. - The script also implements a "Trailing Stop" feature. As the price moves in a favorable direction, the stop loss level is automatically adjusted to lock in profits.
TrailingStopparameter controls the distance.
- The script can automatically set a "Stop Loss" order for each trade. This is a price level at which the trade will be automatically closed to limit potential losses. The initial
In Simple Terms:
Imagine the script is like a team of experts, each specializing in a different area of market analysis. Each expert gives their opinion on whether the price is likely to go up or down, but instead of just saying "yes" or "no," they give a more nuanced assessment, like "slightly bullish" or "very bearish." The script then combines all these opinions, weighting each expert's opinion according to their expertise, to arrive at an overall decision on whether to buy or sell. It protects the trades with a stop loss that will automatically update as profit becomes visible to lock in gains.
Orders Execution
Indicators Used
20
Views
0
Downloads
0
Favorites
Fuzzy logic
//+------------------------------------------------------------------+
//| _Fuzzy logic_.mq4 |
//| Copyright © 2007, B@ss. |
//| albass@mail333.com |
//+------------------------------------------------------------------+
#define MAGICMA 16419780400
double Lots = 0.1;
extern int TrailingStop = 35;
extern double PercentMM = 8;
extern double DeltaMM = 0;
extern int InitialBalance = 10000;
bool UseMM = true;
extern double SL = 60;
bool FirstSL = true;
//######################################################################################################################################
double LotsOptimized()
{
double volume,TempVolume, F;
TempVolume=Lots;
if (UseMM) TempVolume =0.00001*(AccountBalance()*(PercentMM+DeltaMM)-InitialBalance*DeltaMM);
volume=NormalizeDouble(TempVolume,2);
if (volume>MarketInfo(Symbol(),MODE_MAXLOT)) volume=MarketInfo(Symbol(),MODE_MAXLOT);
if (volume<MarketInfo(Symbol(),MODE_MINLOT)) volume=MarketInfo(Symbol(),MODE_MINLOT);
return (volume);
}
//######################################################################################################################################
int CalculateCurrentOrders(string symbol)
{
int buys=0,sells=0;
for(int i=0;i<OrdersTotal();i++)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
if(OrderSymbol()==Symbol() && OrderMagicNumber()==MAGICMA)
{
if(OrderType()==OP_BUY) buys++;
if(OrderType()==OP_SELL) sells++;
}
}
if(buys>0) return(buys);
else return(-sells);
}
//######################################################################################################################################
double FuzzyLogic()
{
double Gator, Gator2, SumGator, WPR, AC1, AC2, AC3, AC4, AC5, tempAC_b, tempAC_s, DeMarker, RSI, Decision;
double Rang[5,5], Summary[5];
int x, y;
double arGator[7] ={10,20,30,40,40,30,20,10};
double arWPR[7] ={-95,-90,-80,-75,-25,-20,-10,-5};
double arAC[7] ={5,4,3,2,2,3,4,5};
double arDeMarker[7] ={0.15,0.2,0.25,0.3,0.7,0.75,0.8,0.85};
double arRSI[7] ={25,30,35,40,60,65,70,75};
double Weight[7] ={0.133,0.133,0.133,0.268,0.333};
Gator =iGator(NULL,0,13,8,8,5,5,3,MODE_SMMA,PRICE_MEDIAN,MODE_UPPER,1);
Gator2 =iGator(NULL,0,13,8,8,5,5,3,MODE_SMMA,PRICE_MEDIAN,MODE_LOWER,1);
SumGator =MathAbs(Gator)+MathAbs(Gator2);
WPR =iWPR(NULL,0,14,1);
DeMarker =iDeMarker(NULL,0,14,1);
RSI =iRSI(NULL,0,14,PRICE_CLOSE,1);
AC1 =iAC(NULL,0,1);
AC2 =iAC(NULL,0,2);
AC3 =iAC(NULL,0,3);
AC4 =iAC(NULL,0,4);
AC5 =iAC(NULL,0,5);
ArrayInitialize(Rang,0);
ArrayInitialize(Summary,0);
//ïîñòðîåíèå íå÷åòêîãî êëàññèôèêàòîðà
//1)=========================================================Gator==================================================
if (SumGator<arGator[0]){Rang[0,0]=0.5;Rang[0,4]=0.5;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (SumGator>=arGator[0] && SumGator<arGator[1])
{
Rang[0,0]=(1-(SumGator-arGator[0])/(arGator[1]-arGator[0]))/2;
Rang[0,1]=(1-Rang[0,0]*2)/2;
Rang[0,4]=Rang[0,0];
Rang[0,3]=Rang[0,1];
}
//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (SumGator>=arGator[1] && SumGator<arGator[2]){Rang[0,1]=0.5;Rang[0,3]=0.5;}
//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (SumGator>=arGator[2] && SumGator<arGator[3])
{
Rang[0,1]=(1-(SumGator-arGator[2])/(arGator[3]-arGator[2]))/2;
Rang[0,2]=1-Rang[0,1]*2;
Rang[0,3]=Rang[0,1];
}
//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (SumGator>=arGator[3] || SumGator>=arGator[4]){Rang[0,2]=1;}
//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
//2)========================================================WPR=======================================================
if (WPR<arWPR[0]){Rang[1,0]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[0] && WPR<arWPR[1])
{
Rang[1,0]=1-(WPR-arWPR[0])/(arWPR[1]-arWPR[0]);
Rang[1,1]=1-Rang[1,0];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[1] && WPR<arWPR[2]){Rang[1,1]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[2] && WPR<arWPR[3])
{
Rang[1,1]=1-(WPR-arWPR[2])/(arWPR[3]-arWPR[2]);
Rang[1,2]=1-Rang[1,1];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[3] && WPR<arWPR[4]){Rang[1,2]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[4] && WPR<arWPR[5])
{
Rang[1,2]=1-(WPR-arWPR[4])/(arWPR[5]-arWPR[4]);
Rang[1,3]=1-Rang[1,2];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[5] && WPR<arWPR[6]){Rang[1,3]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[6] && WPR<arWPR[7])
{
Rang[1,3]=1-(WPR-arWPR[6])/(arWPR[7]-arWPR[6]);
Rang[1,4]=1-Rang[1,3];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (WPR>=arWPR[7]){Rang[1,4]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
//3)============================================================AC=====================================================
if (AC1<AC2 && AC1<0 && AC2<0){tempAC_b=2;}
if (AC1<AC2 && AC2<AC3 && AC1<0 && AC2<0 && AC3<0){tempAC_b=3;}
if (AC1<AC2 && AC2<AC3 && AC3<AC4 && AC1<0 && AC2<0 && AC3<0 && AC4<0){tempAC_b=4;}
if (AC1<AC2 && AC2<AC3 && AC3<AC4 && AC4<AC5 && AC1<0 && AC2<0 && AC3<0 && AC4<0 && AC5<5){tempAC_b=5;}
if (AC1>AC2 && AC1>0 && AC2>0){tempAC_s=2;}
if (AC1>AC2 && AC2>AC3 && AC1>0 && AC2>0 && AC3>0){tempAC_s=3;}
if (AC1>AC2 && AC2>AC3 && AC3>AC4 && AC1>0 && AC2>0 && AC3>0 && AC4>0){tempAC_s=4;}
if (AC1>AC2 && AC2>AC3 && AC3>AC4 && AC4>AC5 && AC1>0 && AC2>0 && AC3>0 && AC4>0 && AC5>0){tempAC_s=5;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (tempAC_b==arAC[0] || tempAC_b==arAC[1]){Rang[2,0]=1;}
if (tempAC_b==arAC[2] || tempAC_b==arAC[3]){Rang[2,1]=1;}
if (tempAC_s==arAC[4] || tempAC_s==arAC[5]){Rang[2,3]=1;}
if (tempAC_s==arAC[6] || tempAC_s==arAC[7]){Rang[2,4]=1;}
if (Rang[2,0]==0 && Rang[2,1]==0 && Rang[2,3]==0 && Rang[2,4]==0){Rang[2,2]=1;}
//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
//4)=========================================================DeMarker==================================================
if (DeMarker<arDeMarker[0]){Rang[3,0]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[0] && DeMarker<arDeMarker[1])
{
Rang[3,0]=1-(DeMarker-arDeMarker[0])/(arDeMarker[1]-arDeMarker[0]);
Rang[3,1]=1-Rang[3,0];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[1] && DeMarker<arDeMarker[2]){Rang[3,1]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[2] && DeMarker<arDeMarker[3])
{
Rang[3,1]=1-(DeMarker-arDeMarker[2])/(arDeMarker[3]-arDeMarker[2]);
Rang[3,2]=1-Rang[3,1];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[3] && DeMarker<arDeMarker[4]){Rang[3,2]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[4] && DeMarker<arDeMarker[5])
{
Rang[3,2]=1-(DeMarker-arDeMarker[4])/(arDeMarker[5]-arDeMarker[4]);
Rang[3,3]=1-Rang[3,2];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[5] && DeMarker<arDeMarker[6]){Rang[3,3]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[6] && DeMarker<arDeMarker[7])
{
Rang[3,3]=1-(DeMarker-arDeMarker[6])/(arDeMarker[7]-arDeMarker[6]);
Rang[3,4]=1-Rang[3,3];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (DeMarker>=arDeMarker[7]){Rang[3,4]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
//5)==========================================================RSI======================================================
if (RSI<arRSI[0]){Rang[4,0]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[0] && RSI<arRSI[1])
{
Rang[4,0]=1-(RSI-arRSI[0])/(arRSI[1]-arRSI[0]);
Rang[4,1]=1-Rang[4,0];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[1] && RSI<arRSI[2]){Rang[4,1]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[2] && RSI<arRSI[3])
{
Rang[4,1]=1-(RSI-arRSI[2])/(arRSI[3]-arRSI[2]);
Rang[4,2]=1-Rang[4,1];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[3] && RSI<arRSI[4]){Rang[4,2]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[4] && RSI<arRSI[5])
{
Rang[4,2]=1-(RSI-arRSI[4])/(arRSI[5]-arRSI[4]);
Rang[4,3]=1-Rang[4,2];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[5] && RSI<arRSI[6]){Rang[4,3]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[6] && RSI<arRSI[7])
{
Rang[4,3]=1-(RSI-arRSI[6])/(arRSI[7]-arRSI[6]);
Rang[4,4]=1-Rang[4,3];
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
if (RSI>=arRSI[7]){Rang[4,4]=1;}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
//________________________________________________________________ñâåðòêà äëÿ ðàíãîâ__________________________________________________
for(x=0;x<4;x++)
{
for(y=0;y<4;y++)
{Summary[x]=Summary[x]+Rang[y,x]*Weight[x];}
if (Summary[x]>1) {Print (Summary[x]," x=",x);}
}
for(x=0;x<4;x++)
{Decision=Decision+Summary[x]*(0.2*(x+1)-0.1);}
//Print("Gator- ",SumGator,"==",Rang[0,0],"--",Rang[0,1],"--",Rang[0,2],"--",Rang[0,3],"--",Rang[0,4]);
//Print("WPR- ",WPR,"==",Rang[1,0],"--",Rang[1,1],"--",Rang[1,2],"--",Rang[1,3],"--",Rang[1,4]);
//Print("tempAC_b- ",tempAC_b," ","tempAC_s- ",tempAC_s," ==",Rang[2,0],"--",Rang[2,1],"--",Rang[2,2],"--",Rang[2,3],"--",Rang[2,4]);
//Print("DeMarker- ",DeMarker,"==",Rang[3,0],"--",Rang[3,1],"--",Rang[3,2],"--",Rang[3,3],"--",Rang[3,4]);
//Print("RSI- ",RSI,"==",Rang[4,0],"--",Rang[4,1],"--",Rang[4,2],"--",Rang[4,3],"--",Rang[4,4]);
return(Decision);
}
//######################################################################################################################################
void CheckForOpen()
{
int res;
if(Volume[0]>1) return;
//Print (FuzzyLogic());
if(FuzzyLogic()<0.25)
{
res=OrderSend(Symbol(),OP_SELL,LotsOptimized(),Bid,3,0,0,"",MAGICMA,0,Red);
FirstSL=True;
return;
}
if(FuzzyLogic()>0.75)
{
res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,0,"",MAGICMA,0,Blue);
FirstSL=True;
return;
}
}
//######################################################################################################################################
void SetStopLoss()
{
double StopLoss, TakeProfit;
int cnt1, err;
bool tic;
StopLoss=NormalizeDouble(SL*Point,0);
for(cnt1=0;cnt1<OrdersTotal();cnt1++)
{
OrderSelect(cnt1, SELECT_BY_POS, MODE_TRADES);
if (OrderType()==OP_SELL && OrderStopLoss()!=OrderOpenPrice()+StopLoss && OrderSymbol()==Symbol())
{
tic=OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice()+StopLoss,0,0,Green);
}
if (OrderType()==OP_BUY && OrderStopLoss()!=OrderOpenPrice()-StopLoss && OrderSymbol()==Symbol())
{
tic=OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice()-StopLoss,0,0,Green);
}
}
}
//######################################################################################################################################
void start()
{
if(Bars<100 || IsTradeAllowed()==false) return;
if(CalculateCurrentOrders(Symbol())==0) CheckForOpen();
if (FirstSL==True) {SetStopLoss();}
int cnt1;
for(cnt1=0;cnt1<OrdersTotal();cnt1++)
{
OrderSelect(cnt1,SELECT_BY_POS);
if(OrderType()==OP_BUY)
{
if(TrailingStop>0)
{
if(Bid-OrderOpenPrice()>Point*TrailingStop)
{
FirstSL=false;
if(OrderStopLoss()<Bid-Point*TrailingStop)
{OrderModify(OrderTicket(),OrderOpenPrice(),Bid-Point*TrailingStop,OrderTakeProfit(),0,Green);}
}
}
}
else
{
if(TrailingStop>0)
{
if((OrderOpenPrice()-Ask)>(Point*TrailingStop))
{
FirstSL=false;
if((OrderStopLoss()>(Ask+Point*TrailingStop)) || (OrderStopLoss()==0))
{OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Point*TrailingStop,OrderTakeProfit(),0,Red);}
}
}
}
}
}Profitability Reports
AUD/USD
Oct 2024 - Jan 2025
0.84
Total Trades
1176
Won Trades
0
Lost trades
0
Win Rate
0.00 %
Expected payoff
-0.27
Gross Profit
1645.08
Gross Loss
-1963.21
Total Net Profit
-318.13
-100%
-50%
0%
50%
100%
NZD/USD
Oct 2024 - Jan 2025
0.34
Total Trades
1185
Won Trades
1169
Lost trades
16
Win Rate
98.65 %
Expected payoff
-5.88
Gross Profit
3615.87
Gross Loss
-10587.98
Total Net Profit
-6972.11
-100%
-50%
0%
50%
100%
GBP/USD
Oct 2024 - Jan 2025
0.24
Total Trades
323
Won Trades
311
Lost trades
12
Win Rate
96.28 %
Expected payoff
-17.80
Gross Profit
1841.04
Gross Loss
-7591.45
Total Net Profit
-5750.41
-100%
-50%
0%
50%
100%
GBP/AUD
Jul 2025 - Sep 2025
0.12
Total Trades
140
Won Trades
126
Lost trades
14
Win Rate
90.00 %
Expected payoff
-39.33
Gross Profit
743.32
Gross Loss
-6249.44
Total Net Profit
-5506.12
-100%
-50%
0%
50%
100%
GBP/USD
Jul 2025 - Sep 2025
0.06
Total Trades
1065
Won Trades
1057
Lost trades
8
Win Rate
99.25 %
Expected payoff
-7.03
Gross Profit
455.47
Gross Loss
-7938.84
Total Net Profit
-7483.37
-100%
-50%
0%
50%
100%
USD/CHF
Jul 2025 - Sep 2025
0.05
Total Trades
187
Won Trades
177
Lost trades
10
Win Rate
94.65 %
Expected payoff
-31.89
Gross Profit
287.64
Gross Loss
-6250.82
Total Net Profit
-5963.18
-100%
-50%
0%
50%
100%
USD/JPY
Jul 2025 - Sep 2025
0.03
Total Trades
186
Won Trades
179
Lost trades
7
Win Rate
96.24 %
Expected payoff
-46.13
Gross Profit
292.78
Gross Loss
-8873.20
Total Net Profit
-8580.42
-100%
-50%
0%
50%
100%
USD/CAD
Oct 2024 - Jan 2025
0.02
Total Trades
55
Won Trades
45
Lost trades
10
Win Rate
81.82 %
Expected payoff
-108.93
Gross Profit
95.33
Gross Loss
-6086.55
Total Net Profit
-5991.22
-100%
-50%
0%
50%
100%
AUD/USD
Jul 2025 - Sep 2025
0.02
Total Trades
540
Won Trades
524
Lost trades
16
Win Rate
97.04 %
Expected payoff
-13.74
Gross Profit
151.58
Gross Loss
-7571.07
Total Net Profit
-7419.49
-100%
-50%
0%
50%
100%
USD/CAD
Jul 2025 - Sep 2025
0.02
Total Trades
210
Won Trades
196
Lost trades
14
Win Rate
93.33 %
Expected payoff
-34.28
Gross Profit
134.25
Gross Loss
-7332.62
Total Net Profit
-7198.37
-100%
-50%
0%
50%
100%
GBP/CAD
Jul 2025 - Sep 2025
0.00
Total Trades
19
Won Trades
3
Lost trades
16
Win Rate
15.79 %
Expected payoff
-273.94
Gross Profit
5.14
Gross Loss
-5209.96
Total Net Profit
-5204.82
-100%
-50%
0%
50%
100%
Comments