/*-----------------------------+ | | | Shared by www.Aptrafx.com | | | +------------------------------*/ //+------------------------------------------------------------------+ //| 3MA Bunny Cross Expert | //+------------------------------------------------------------------+ #property copyright "Ron Thompson" #property link "http://www.lightpatch.com/forex" // User Input extern double Lots = 0.1; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //|------------------------------------------------------------------| int init() { return(0); } //+------------------------------------------------------------------+ //| Custor indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { return(0); } //+------------------------------------------------------------------+ //| Custom indicator iteration function | //+------------------------------------------------------------------+ int start() { double cMAfst=0, pMAfst=0; double cMAslo=0, pMAslo=0; double MA100=0; double p=Point(); bool found=false; bool rising=false; bool falling=false; bool bought=false; bool sold=false; bool oldenough=false; int cnt=0; int err=0; string cmmt=""; // // Error checking // if(Bars<100) { Print("bars less than 100"); return(0); } if(AccountFreeMargin()<(1000*Lots)) { Print("We have no money"); return(0); } cMAfst=iMA(Symbol(),0,5 ,0,MODE_LWMA,PRICE_CLOSE, 1); pMAfst=iMA(Symbol(),0,5 ,0,MODE_LWMA,PRICE_CLOSE, 2); cMAslo=iMA(Symbol(),0,25,0,MODE_LWMA,PRICE_CLOSE, 1); pMAslo=iMA(Symbol(),0,25,0,MODE_LWMA,PRICE_CLOSE, 2); MA100=iMA(Symbol(),0,100,0,MODE_LWMA,PRICE_CLOSE, 2); if (pMAfst<=pMAslo && cMAfst>=cMAslo) {rising=true; falling=false;} if (pMAfst>=pMAslo && cMAfst<=cMAslo) {rising=false; falling=true;} // Leave if 100 period MA isn't at least 15 pips over/under fast MA if (rising && (MA100<cMAfst+(p*15)) {return(0);} if (falling && (MA100>cMAfst-(p*15)) {return(0);} for(cnt=0;cnt<OrdersTotal();cnt++) { OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); if(OrderSymbol()==Symbol()) {found=true; break;} else {found=false;} } // Leave if no matching symbol found if (found==false){return(0);} if (OrderType()==0) {bought=true; sold=false;} if (OrderType()==1) {bought=false; sold=true;} if (OrderOpenTime()<Time[4]) {oldenough=true;} else {oldenough=false;} if (found && rising && sold && oldenough) //exist sell { Print(Symbol(), Time[0],OrderOpenTime()," CLOSE sell BUY buy"); OrderClose(OrderTicket(),Lots,Ask,0,Red); err=GetLastError(); if(err==0) { Print("BUY Order started ",Ask); OrderSend(Symbol(),OP_BUY,Lots,Ask,3,0,0,"BC Buy ",16123,0,White); if(GetLastError()==0)Comment("BC_BUY Order opened : ",Ask); } } if (found && falling && bought && oldenough) // exist buy { Print(Symbol(),Time[0],OrderOpenTime(),"CLOSE buy BUY sell"); OrderClose(OrderTicket(),Lots,Bid,0,White); err=GetLastError(); if(err==0) { Print("SELL Order started ",Bid); OrderSend(Symbol(),OP_SELL,Lots,Bid,3,0,0,"BC Sell",16321,0,Red); if(GetLastError()==0)Comment("BC_SELL Order opened : ",Bid ); } } // wrong direction, just print report if (found && rising && bought && oldenough) {Print("Cross, but already SELL");} if (found && falling && sold && oldenough) {Print("Cross, but already BUY");} return(0); }
Sample
Analysis
Market Information Used:
Series array that contains open time of each bar
Indicator Curves created:
Indicators Used:
Moving average indicator
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: