Profit factor:
1.04
Orders Execution
Checks for the total of open ordersIt automatically opens orders when conditions are reachedIt Closes Orders by itself It can change open orders parameters, due to possible stepping strategy
Indicators Used
MACD HistogramMoving average indicator
5 Views
0 Downloads
0 Favorites
testx1
/*-----------------------------+
|			       |
| Shared by www.Aptrafx.com    |
|			       |
+------------------------------*/

//+------------------------------------------------------------------+
//|                                                  MACD Sample.mq4 |
//|                      Copyright © 2004, MetaQuotes Software Corp. |
//|                                       http://www.metaquotes.net/ |
//+------------------------------------------------------------------+

extern double TakeProfit = 120;
extern double Lots = 0.1;
extern double TrailingStop = 30;
extern double MACDOpenLevel=3;
extern double MACDCloseLevel=2;
extern double MATrendPeriod=26;
double Points;
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int init ()
  {
   Points = MarketInfo (Symbol(), MODE_POINT);
//----
   return(0);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int deinit()
  {
   return(0);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int start()
  {
   double MacdCurrent=0, MacdPrevious=0, SignalCurrent=0;
   double SignalPrevious=0, MaCurrent=0, MaPrevious=0;
   int cnt=0, total;

   if(Bars<200)
     {
      Print("bars less than 200");
      return(0);  
     }

   if(TakeProfit<10)
     {
      Print("TakeProfit less than 10");
      return(0);
     }

   if(AccountFreeMargin()<(1000*Lots))
     {
      Print("We do not have money");
      return(0);  
     }


// to simplify the coding and speed up access
// data are put into internal variables
   MacdCurrent=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,0);
   MacdPrevious=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
   SignalCurrent=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,0);
   SignalPrevious=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
   MaCurrent=iMA(NULL,0,MATrendPeriod,MODE_EMA,0,PRICE_CLOSE,0);
   MaPrevious=iMA(NULL,0,MATrendPeriod,MODE_EMA,0,PRICE_CLOSE,1);
// check for opened orders()
   if(OrdersTotal()<1) 
     {

      // If((CurTime-LastTradeTime)<300) { Exit }
      // check for long position (BUY) possibility 
      if(MacdCurrent<0 && MacdCurrent>SignalCurrent && MacdPrevious<SignalPrevious &&
         MathAbs(MacdCurrent)>(MACDOpenLevel*Points) && MaCurrent>MaPrevious)
        {
         OrderSend(Symbol(),OP_BUY,Lots,Ask,3,0,Ask+TakeProfit*Points,
                   "macd sample",16384,0,Red);
         return(0);
        }
      // check for short position (SELL) possibility
      if(MacdCurrent>0 && MacdCurrent<SignalCurrent && MacdPrevious>SignalPrevious &&
         MacdCurrent>(MACDOpenLevel*Points) && MaCurrent<MaPrevious)
        {
         OrderSend(Symbol(),OP_SELL,Lots,Bid,3,0,Bid-TakeProfit*Points,
                   "macd sample",16384,0,Red); 
         return(0); 
        };
      return(0);
     };
   // it is important to enter the market correctly, 
   // but it is more important to exit it correctly...
   total=OrdersTotal();
   for(cnt=0;cnt<total;cnt++)
     {
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if(OrderType()<=OP_SELL && // check for opened position
         OrderSymbol()==Symbol())    
        {
         if(OrderType()==OP_BUY)   // long position is opened
           {
            if(MacdCurrent>0 && MacdCurrent<SignalCurrent && MacdPrevious>SignalPrevious &&
               MacdCurrent>(MACDCloseLevel*Points))
                {
                 OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet); 
                 return(0); // exit
                };
            // check for trailing stop
            if(TrailingStop>0)  
              {                 
               if(Bid-OrderOpenPrice()>Points*TrailingStop)
                 {
                  if(OrderStopLoss()<Bid-Points*TrailingStop)
                    {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Bid-Points*TrailingStop,
                                 OrderTakeProfit(),0,Red);
                     return(0);
                    }
                 }
              }
           }
         else // go to short position
           {
            if(MacdCurrent<0 && MacdCurrent>SignalCurrent &&
               MacdPrevious<SignalPrevious && MathAbs(MacdCurrent)>(MACDCloseLevel*Points))
              {
               OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet); // close position
               return(0); // exit
              }
            // check for trailing stop
            if(TrailingStop>0)  
              {                 
               if((OrderOpenPrice()-Ask)>(Points*TrailingStop))
                 {
                  if(OrderStopLoss()==0.0 || 
                     OrderStopLoss()>(Ask+Points*TrailingStop))
                    {
                     OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Points*TrailingStop,
                                 OrderTakeProfit(),0,Red);
                     return(0);
                    }
                 }
              }
           }
        }
     }
   return(0);
  }
// the end.

Profitability Reports

EUR/USD Jul 2025 - Sep 2025
0.69
Total Trades 16
Won Trades 15
Lost trades 1
Win Rate 93.75 %
Expected payoff -1.82
Gross Profit 63.30
Gross Loss -92.40
Total Net Profit -29.10
-100%
-50%
0%
50%
100%
AUD/USD Jul 2025 - Sep 2025
0.62
Total Trades 9
Won Trades 8
Lost trades 1
Win Rate 88.89 %
Expected payoff -1.69
Gross Profit 24.90
Gross Loss -40.10
Total Net Profit -15.20
-100%
-50%
0%
50%
100%
USD/JPY Jan 2025 - Jul 2025
1.18
Total Trades 52
Won Trades 50
Lost trades 2
Win Rate 96.15 %
Expected payoff 0.55
Gross Profit 187.88
Gross Loss -159.04
Total Net Profit 28.84
-100%
-50%
0%
50%
100%
USD/CAD Jan 2025 - Jul 2025
1.76
Total Trades 48
Won Trades 47
Lost trades 1
Win Rate 97.92 %
Expected payoff 1.38
Gross Profit 153.55
Gross Loss -87.43
Total Net Profit 66.12
-100%
-50%
0%
50%
100%
NZD/USD Jan 2025 - Jul 2025
0.56
Total Trades 31
Won Trades 28
Lost trades 3
Win Rate 90.32 %
Expected payoff -2.49
Gross Profit 98.20
Gross Loss -175.50
Total Net Profit -77.30
-100%
-50%
0%
50%
100%
GBP/USD Jan 2025 - Jul 2025
1.31
Total Trades 41
Won Trades 40
Lost trades 1
Win Rate 97.56 %
Expected payoff 0.77
Gross Profit 132.90
Gross Loss -101.40
Total Net Profit 31.50
-100%
-50%
0%
50%
100%
GBP/CAD Jan 2025 - Jul 2025
0.07
Total Trades 30
Won Trades 22
Lost trades 8
Win Rate 73.33 %
Expected payoff -27.83
Gross Profit 67.07
Gross Loss -901.97
Total Net Profit -834.90
-100%
-50%
0%
50%
100%
GBP/AUD Jan 2025 - Jul 2025
0.28
Total Trades 56
Won Trades 53
Lost trades 3
Win Rate 94.64 %
Expected payoff -8.00
Gross Profit 175.47
Gross Loss -623.47
Total Net Profit -448.00
-100%
-50%
0%
50%
100%
EUR/USD Jan 2025 - Jul 2025
0.57
Total Trades 36
Won Trades 33
Lost trades 3
Win Rate 91.67 %
Expected payoff -3.01
Gross Profit 144.80
Gross Loss -253.30
Total Net Profit -108.50
-100%
-50%
0%
50%
100%
AUD/USD Jan 2025 - Jul 2025
0.84
Total Trades 28
Won Trades 26
Lost trades 2
Win Rate 92.86 %
Expected payoff -0.58
Gross Profit 84.40
Gross Loss -100.60
Total Net Profit -16.20
-100%
-50%
0%
50%
100%

Comments