Author: Ron Thompson
Profit factor:
0.64
Price Data Components
Orders Execution
Checks for the total of open ordersIt Closes Orders by itself It automatically opens orders when conditions are reached
Indicators Used
Commodity channel index
6 Views
0 Downloads
0 Favorites
zzz003
/*-----------------------------+
|			       |
| Shared by www.Aptrafx.com    |
|			       |
+------------------------------*/

//+------------------------------------------------------------------+
//| 1MA Expert                               |
//+------------------------------------------------------------------+
#property copyright "Ron Thompson"
#property link      "http://www.lightpatch.com/forex"

// User Input
extern double Lots = 0.1;
extern int    TakeProfit=90;
extern int    StopLoss=0;
extern int    Interval=5;


// Global scope
double barmove0 = 0;
double barmove1 = 0;
int         itv = 0;


//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//|------------------------------------------------------------------|

int init()
  {
   itv=Interval;
   return(0);
  }


//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
   return(0);
  }


//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+

int start()
  {

   bool     rising=false;
   bool    falling=false;
   bool      cross=false;

   double slA=0, slB=0, tpA=0, tpB=0;
   double p=Point();
   
   double cCI0;
   double cCI1;
   
   int      cnt=0;

   // Error checking
   if(AccountFreeMargin()<(1000*Lots))        {Print("-----NO MONEY"); return(0);}
   if(Bars<100)                               {Print("-----NO BARS "); return(0);}
   if(barmove0==Open[0] && barmove1==Open[1]) {                        return(0);}

   // bars moved, update current position
   barmove0=Open[0];
   barmove1=Open[1];

   itv++;

   cCI0=iCCI(Symbol(),0,30,PRICE_OPEN,0);
   cCI1=iCCI(Symbol(),0,30,PRICE_OPEN,1);

   if (cCI1<0 && cCI0>0) { rising=true; cross=true; Print("Rising  Cross");}
   if (cCI1>0 && cCI0<0) {falling=true; cross=true; Print("Falling Cross");}
   
   if (cross)
     {
      // Does the Symbol() have an open order
      for(cnt=0;cnt<OrdersTotal();cnt++)
        {
         OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
         if(OrderSymbol()==Symbol())
           {
            if (OrderType()==0) {OrderClose(OrderTicket(),Lots,Bid,3,White);}
            if (OrderType()==1) {OrderClose(OrderTicket(),Lots,Ask,3,Red);}
            Sleep(10000);
           }
        }
     }
   
   if (TakeProfit!=0)
     {
      tpA=Ask+(p*TakeProfit);
      tpB=Bid-(p*TakeProfit);
     }
      else
     {
      tpA=0;
      tpB=0;
     }           

   if (StopLoss!=0)
     {
      slA=Ask-(p*StopLoss);
      slB=Bid+(p*StopLoss);
     }
      else
     {
      slA=0;
      slB=0;
     }           

   if (rising || itv>=7)
     {
      OrderSend(Symbol(),OP_BUY,Lots,Ask,3,slA,tpA,"ZZZ100",11123,0,White);
      itv=0;
     }

   if (falling || itv>=7)
     {
      OrderSend(Symbol(),OP_SELL,Lots,Bid,3,slB,tpB,"ZZZ100",11321,0,Red);
      itv=0;
     }
   
   
   return(0);
  }

Profitability Reports

USD/CAD Jul 2025 - Sep 2025
0.73
Total Trades 269
Won Trades 174
Lost trades 95
Win Rate 64.68 %
Expected payoff -1.53
Gross Profit 1103.61
Gross Loss -1513.98
Total Net Profit -410.37
-100%
-50%
0%
50%
100%
NZD/USD Jul 2025 - Sep 2025
0.76
Total Trades 281
Won Trades 159
Lost trades 122
Win Rate 56.58 %
Expected payoff -1.46
Gross Profit 1319.40
Gross Loss -1730.70
Total Net Profit -411.30
-100%
-50%
0%
50%
100%
GBP/USD Jul 2025 - Sep 2025
0.77
Total Trades 266
Won Trades 182
Lost trades 84
Win Rate 68.42 %
Expected payoff -1.86
Gross Profit 1614.60
Gross Loss -2108.20
Total Net Profit -493.60
-100%
-50%
0%
50%
100%
GBP/CAD Jul 2025 - Sep 2025
0.63
Total Trades 281
Won Trades 176
Lost trades 105
Win Rate 62.63 %
Expected payoff -2.33
Gross Profit 1138.26
Gross Loss -1793.62
Total Net Profit -655.36
-100%
-50%
0%
50%
100%
EUR/USD Jul 2025 - Sep 2025
0.00
Total Trades 33
Won Trades 21
Lost trades 12
Win Rate 63.64 %
Expected payoff -3195.65
Gross Profit 182.80
Gross Loss -105639.10
Total Net Profit -105456.30
-100%
-50%
0%
50%
100%
AUD/USD Jul 2025 - Sep 2025
0.88
Total Trades 272
Won Trades 168
Lost trades 104
Win Rate 61.76 %
Expected payoff -0.71
Gross Profit 1360.40
Gross Loss -1553.60
Total Net Profit -193.20
-100%
-50%
0%
50%
100%
USD/JPY Jan 2025 - Jul 2025
0.83
Total Trades 608
Won Trades 470
Lost trades 138
Win Rate 77.30 %
Expected payoff -0.92
Gross Profit 2842.88
Gross Loss -3405.06
Total Net Profit -562.18
-100%
-50%
0%
50%
100%
USD/CHF Jan 2025 - Jul 2025
0.61
Total Trades 610
Won Trades 375
Lost trades 235
Win Rate 61.48 %
Expected payoff -4.07
Gross Profit 3838.87
Gross Loss -6323.98
Total Net Profit -2485.11
-100%
-50%
0%
50%
100%
USD/CAD Jan 2025 - Jul 2025
0.72
Total Trades 621
Won Trades 418
Lost trades 203
Win Rate 67.31 %
Expected payoff -1.65
Gross Profit 2600.31
Gross Loss -3626.77
Total Net Profit -1026.46
-100%
-50%
0%
50%
100%
NZD/USD Jan 2025 - Jul 2025
0.85
Total Trades 633
Won Trades 382
Lost trades 251
Win Rate 60.35 %
Expected payoff -0.94
Gross Profit 3302.00
Gross Loss -3896.60
Total Net Profit -594.60
-100%
-50%
0%
50%
100%

Comments