Author: Ron Thompson
Profit factor:
0.62

This script is designed to automatically trade in the Forex market using the MetaTrader platform. It's based on a strategy that uses a technical indicator called the Commodity Channel Index, or CCI, to identify potential buying and selling opportunities. Here?s a breakdown of how it works:

  1. Setup: The script starts by defining some user-adjustable settings. These include the amount of currency to trade per transaction ("Lots"), the profit target ("TakeProfit"), the acceptable loss level ("StopLoss"), and how frequently to add to a position ("Interval").

  2. Initialization: When the script starts, it sets the "Interval" variable based on user input.

  3. Trading Logic: The core of the script continuously checks for new trading opportunities with each new price movement.

    • Monitoring the CCI: The script watches the CCI, which is calculated based on the market's price. It specifically looks for instances when the CCI crosses the zero line. Crossing above zero is interpreted as a potential buy signal, and crossing below zero is seen as a potential sell signal.

    • Closing Existing Trades: When a CCI crossover occurs, the script first closes any existing trades for the currency pair it is monitoring. It closes all trades to start fresh.

    • Opening New Trades: After closing existing trades, the script opens a new trade based on the direction of the CCI crossover. If the CCI crossed above zero, it opens a buy order. If the CCI crossed below zero, it opens a sell order. These trades are automatically set with a target profit and a stop-loss level, based on the user-defined settings.

    • Adding to Winning Trades (Pyramiding): The script also has a feature to add to existing winning trades. If a trade is already open, it will wait for a specified number of price movements (defined by the "Interval" setting). If the price continues to move in a favorable direction, the script will open another trade in the same direction, thereby increasing the size of the position. It will reset the timer when it opens another trade.

  4. Risk Management: The script also includes some basic risk management features. It checks if there is enough money in the account to place a trade. If the account has insufficient funds, the script will stop trading and display a message.

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
8 Views
0 Downloads
0 Favorites
zzz004b
/*-----------------------------+
|			       |
| 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=92;
extern int    StopLoss=0;
extern int    Interval=4;


// 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      found=false;
   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];

   // interval (bar) counter
   // used to pyramid orders during trend
   itv++;
   
   // since the bar just moved
   // calculate TP and SL for (B)id and (A)sk
   tpA=Ask+(p*TakeProfit);
   slA=Ask-(p*StopLoss);
   tpB=Bid-(p*TakeProfit);
   slB=Bid+(p*StopLoss);
   if (TakeProfit==0) {tpA=0; tpB=0;}           
   if (StopLoss==0)   {slA=0; slB=0;}           
   
   // get CCI based on OPEN
   cCI0=iCCI(Symbol(),0,30,PRICE_OPEN,0);
   cCI1=iCCI(Symbol(),0,30,PRICE_OPEN,1);

   // is it crossing zero up or down
   if (cCI1<0 && cCI0>0) { rising=true; cross=true; Print("Rising  Cross");}
   if (cCI1>0 && cCI0<0) {falling=true; cross=true; Print("Falling Cross");}
   
   // close then open orders based on cross
   // pyramid below based on itv
   if (cross)
     {
      // Close ALL the open orders 
      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);}
            itv=0;
           }
        }
      // Open new order based on direction of cross
      if (rising)  OrderSend(Symbol(),OP_BUY,Lots,Ask,3,slA,tpA,"ZZZ100",11123,0,White);
      if (falling) OrderSend(Symbol(),OP_SELL,Lots,Bid,3,slB,tpB,"ZZZ100",11321,0,Red);
      
      // clear the interval counter
      itv=0;
     }
   
   // Only pyramid if order already open
   found=false;
   for(cnt=0;cnt<OrdersTotal();cnt++)
     {
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if(OrderSymbol()==Symbol())
        {
         if (OrderType()==0)  //BUY
           {
            if (itv >= Interval)
              {
               OrderSend(Symbol(),OP_BUY,Lots,Ask,3,slA,tpA,"ZZZ100",11123,0,White);
               itv=0;
              }
           }
         if (OrderType()==1)  //SELL
           {
            if (itv >= Interval)
              {
               OrderSend(Symbol(),OP_SELL,Lots,Bid,3,slB,tpB,"ZZZ100",11321,0,Red);
               itv=0;
              }
           }
         found=true;
         break;
        }
     }
   return(0);
  }

Profitability Reports

GBP/AUD Jul 2025 - Sep 2025
0.47
Total Trades 170
Won Trades 96
Lost trades 74
Win Rate 56.47 %
Expected payoff -3.93
Gross Profit 582.86
Gross Loss -1250.47
Total Net Profit -667.61
-100%
-50%
0%
50%
100%
EUR/USD Jul 2025 - Sep 2025
0.00
Total Trades 22
Won Trades 11
Lost trades 11
Win Rate 50.00 %
Expected payoff -4795.13
Gross Profit 101.20
Gross Loss -105594.10
Total Net Profit -105492.90
-100%
-50%
0%
50%
100%
AUD/USD Jul 2025 - Sep 2025
0.81
Total Trades 225
Won Trades 133
Lost trades 92
Win Rate 59.11 %
Expected payoff -1.12
Gross Profit 1081.20
Gross Loss -1332.70
Total Net Profit -251.50
-100%
-50%
0%
50%
100%
USD/JPY Jan 2025 - Jul 2025
0.93
Total Trades 290
Won Trades 206
Lost trades 84
Win Rate 71.03 %
Expected payoff -0.36
Gross Profit 1276.73
Gross Loss -1380.23
Total Net Profit -103.50
-100%
-50%
0%
50%
100%
USD/CHF Jan 2025 - Jul 2025
0.73
Total Trades 421
Won Trades 238
Lost trades 183
Win Rate 56.53 %
Expected payoff -2.19
Gross Profit 2480.37
Gross Loss -3402.62
Total Net Profit -922.25
-100%
-50%
0%
50%
100%
USD/CAD Jan 2025 - Jul 2025
0.64
Total Trades 426
Won Trades 260
Lost trades 166
Win Rate 61.03 %
Expected payoff -2.18
Gross Profit 1676.95
Gross Loss -2605.43
Total Net Profit -928.48
-100%
-50%
0%
50%
100%
NZD/USD Jan 2025 - Jul 2025
0.74
Total Trades 459
Won Trades 254
Lost trades 205
Win Rate 55.34 %
Expected payoff -1.71
Gross Profit 2256.40
Gross Loss -3042.20
Total Net Profit -785.80
-100%
-50%
0%
50%
100%
GBP/USD Jan 2025 - Jul 2025
0.59
Total Trades 363
Won Trades 210
Lost trades 153
Win Rate 57.85 %
Expected payoff -3.66
Gross Profit 1914.00
Gross Loss -3241.10
Total Net Profit -1327.10
-100%
-50%
0%
50%
100%
GBP/CAD Jan 2025 - Jul 2025
0.50
Total Trades 354
Won Trades 202
Lost trades 152
Win Rate 57.06 %
Expected payoff -3.77
Gross Profit 1337.99
Gross Loss -2673.74
Total Net Profit -1335.75
-100%
-50%
0%
50%
100%
GBP/AUD Jan 2025 - Jul 2025
0.47
Total Trades 352
Won Trades 227
Lost trades 125
Win Rate 64.49 %
Expected payoff -4.51
Gross Profit 1391.23
Gross Loss -2980.10
Total Net Profit -1588.87
-100%
-50%
0%
50%
100%

Comments