zzz001works





/*-----------------------------+
|			       |
| 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;

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



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

int init()
  {
   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 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];

   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;}
   if (cCI1>0 && cCI0<0) {falling=true; cross=true;}
   
   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);}
           }
        }
     }
   

   if (rising)  OrderSend(Symbol(),OP_BUY,Lots,Ask,3,0,0,"ZZZ100",11123,0,White);
   if (falling) OrderSend(Symbol(),OP_SELL,Lots,Bid,3,0,0,"ZZZ100",11321,0,Red);
   
   
   return(0);
  }





Sample





Analysis



Market Information Used:

Series array that contains open prices of each bar


Indicator Curves created:


Indicators Used:

Commodity channel index


Custom Indicators Used:

Order Management characteristics:
Checks for the total of open orders
It Closes Orders by itself
It automatically opens orders when conditions are reached

Other Features:


BackTest : EURUSD on H1

From 2009-08-01 to 2009-10-01 Profit Factor:0.64 Total Net Profit:-749.87

BackTest : EURUSD on H1

From 2009-12-01 to 2010-01-17 Profit Factor:0.89 Total Net Profit:-118.70

BackTest : EURUSD on H1

From 2010-03-01 to 2010-03-27 Profit Factor:1.75 Total Net Profit:331.56

BackTest : EURUSD on H1

From 2010-04-01 to 2010-04-30 Profit Factor:0.00 Total Net Profit:0.00

BackTest : EURUSD on H1

From 2010-05-01 to 2010-05-31 Profit Factor:0.00 Total Net Profit:0.00

BackTest : EURUSD on H1

From 2010-06-01 to 2010-06-30 Profit Factor:0.00 Total Net Profit:0.00

BackTest : GBPUSD on H1

From 2010-01-01 to 2010-02-27 Profit Factor:1.05 Total Net Profit:64.14

BackTest : USDCAD on H1

From 2009-01-01 to 2010-01-01 Profit Factor:0.94 Total Net Profit:-672.60

BackTest : USDCAD on H1

From 2009-12-01 to 2010-01-01 Profit Factor:0.60 Total Net Profit:-290.16

BackTest : USDCHF on H1

From 2009-12-01 to 2010-01-01 Profit Factor:0.50 Total Net Profit:-393.38

BackTest : USDJPY on H1

From 2009-11-01 to 2009-11-30 Profit Factor:0.68 Total Net Profit:-183.63

Request Backtest for zzz001works


From : (yyyy/mm/dd) To: (yyyy/mm/dd)

Pair: Period: