Zero Lag EA-AIP v0.0.4 Metatrader MQ4 Experts Forex Trading Systems - XEATrade - Metatrader, Metastock, Tradestation, Amibroker

# A B C D E F G H I J K L M N O P Q R S T U V W X Y Z

Home
Forex Forum
+ Add Script
Metastock Expert Advisors Explorations Indicators Trading Systems Metatrader MQL Experts MQL Indicators MQ4 Experts MQ4 Indicators MQ4 Scripts Tradestation Functions Indicators PaintBars ShowMe Trading Systems Amibroker Commentaries Explorations Functions Indicators Trading Systems

Contact us



Newsletter

Group: Metatrader MQ4 Experts

Title: Zero Lag EA-AIP v0.0.4

Description: Simple EA which only buys/sells based on if MACD_Main > or < MACD_Signal. The EA uses the ZeroLag MACD that I uploaded in the MT4 indicators section. I added Starthour and end hour to control when the EA trades. When end hour is reached, open orders are closed. I also added a kill day and kill hour so that it will not leave positions optn over the weekend. When this EA trades, it is an "Always in Play EA".

//+------------------------------------------------------------------+
//|                                                       |
//|                      Copyright © 2005, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//---- 
   
//----
   return(0);
  }
extern double UseTimeSlice=0;
extern int UseFreshMACDSig=1;
extern double vLots = 1;
extern double Stoploss=0;
extern double TakeProfit=0;
extern int StartHour=9,EndHour=15,KillDay=5,KillHour=21;

double total=0,TradesThisSymbol=0,cnt=0,newbar=0,mode=0,rvimain=0,rvisignal=0;
double SaR=0,BuySig=0,SellSig=0, blueline=0,greenline=0,redline=0,bluelinePrev=0,greenlinePrev=0,redlinePrev=0,spanA=0,spanB=0,TimeSlice=0,Hdirection=0, LDirection=0,Slippage=5,OpenTrades=0,FreshSig=0,CurrentSig=0,BuyWait=0,SellWait=0;
double Lots=0,vSL=30, vTP=100,LineBuySig=0,LineSellSig=0,UpdateTS=1;
double TradePrice=0,TradeTime=0,TradeStop=0,dir=0;
double Per=10,Multi=200,lastprice=0,currentstop=0,atr=0,BarTime=0;
int BarCount=0;
double LookingToSellBreakPIPs=0,LookingToBuyBreakPIPs=0,NotSoldYet=1,NotBoughtYet=1,MACD_Signal=0,MACD_Main=0,MACD_Main2=0,MACD_Main3=0,MACD_Main4=0,MACD_Main5=0,FreshMACDSig=0,MACD_MainPrev=0,MACD_SignalPrev=0;


//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//---- 
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//---- 

Lots = vLots;


Comment("\n","Day : ",Day()," Hour : ",Hour()," Min ",Minute()," Seconds ", Seconds(),
		"\n","Version 0.0.3",
		"\n",Symbol(),
		"\n","sig:",MACD_Signal," main:",MACD_Main);
	



if( (TimeHour(CurTime())<StartHour)  || (TimeHour(CurTime())>=EndHour) || (DayOfWeek()==KillDay && TimeHour(CurTime()) == KillHour) )
{
   Comment("Outside Trading Hours, Exiting...",
		"\n","Version 0.0.4",
		"\n",Symbol(),
		"\n","sig:",MACD_Signal," main:",MACD_Main);
		

      total=OrdersTotal();
	   for(cnt=0;cnt<total;cnt++)
      {// 3 
          OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
	        if(OrderSymbol()==Symbol())
	        { //4
 	          	if (OrderType()==OP_BUY)
 		        	{ //5
						   OrderClose(OrderTicket(),Lots,Bid,Slippage,Green);
						   return(0);
			      } //5
			      
			      if (OrderType()==OP_SELL)
 		        	{ //5
						   OrderClose(OrderTicket(),Lots,Ask,Slippage,Green);
						   return(0);
			      } //5
			  } //4
		} //3
return(0);
}		


   if(newbar != Time[0] || SaR == 1)
   { //2
	  newbar        = Time[0];
	  SaR = 0;


   if(UseTimeSlice == 1)
   { // 2
   	
   	if(Symbol() == "USDCHF")
   	{
   	  Sleep(5000);
   	}
   	
   	if(Symbol() == "GBPUSD")
   	{
   	  Sleep(50000);
   	}
   	
   	if(Symbol() == "EURUSD")
   	{
   	  Sleep(90000);
   	}
   	
   	if(Symbol() == "USDJPY")
   	{
   	  Sleep(135000);
   	}
   	
   	if(Symbol() == "USDCAD")
      {
   	  Sleep(175000);
   	}
   	
   	if(Symbol() == "AUDUSD")
   	{
         Sleep(225000);
      }   

   } // 2    


   
   total=OrdersTotal();
   TradesThisSymbol=0;
   for(cnt=0;cnt<total;cnt++)
   { // 2
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
     
      if(OrderSymbol()==Symbol())
      { // 3
         TradesThisSymbol ++;
      } // 3 // close for if(OrderSymbol()==Symbol())
   } // 2 // close for for(cnt=0;cnt<total;cnt++)        

	MACD_Main=iCustom(NULL,0,"ZeroLag MACD",0,1);
	MACD_Signal=iCustom(NULL,0,"ZeroLag MACD",1,1);
	MACD_MainPrev=iCustom(NULL,0,"ZeroLag MACD",0,2);
	MACD_SignalPrev=iCustom(NULL,0,"ZeroLag MACD",1,2);
	
	FreshMACDSig = 0;
	
	if( UseFreshMACDSig == 1)
	{
	  if( ((MACD_SignalPrev > MACD_MainPrev) && (MACD_Signal < MACD_Main)) || ((MACD_SignalPrev < MACD_MainPrev) && (MACD_Signal > MACD_Main)) )
		 {
		    FreshMACDSig = 1;
		 }
	
	  if( FreshMACDSig != 1)
	  {
	     return(0);
	  }
	}
	
   if(MACD_Signal > MACD_Main)
   {
      SellSig = 1;
      BuySig = 0;
   }
     	 
	if(MACD_Signal < MACD_Main)
   {
      SellSig = 0;
      BuySig = 1;
   }    
   
   
   total=OrdersTotal();
   TradesThisSymbol=0;
   for(cnt=0;cnt<total;cnt++)
   { // 2
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
     
      if(OrderSymbol()==Symbol())
      { // 3
         TradesThisSymbol ++;
      } // 3 // close for if(OrderSymbol()==Symbol())
   } // 2 // 
   
   
   if(TradesThisSymbol != 0)
   { // 2
      total=OrdersTotal();
	   for(cnt=0;cnt<total;cnt++)
      {// 3 
          OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
	        if(OrderSymbol()==Symbol())
	        { //4
 		   	if (OrderType()==OP_BUY)
 		   	{ //5
				       if(BuySig == 0 && SellSig == 1)
					    { //7
						   SaR = 1;
						   OrderClose(OrderTicket(),Lots,Bid,Slippage,Green);
						   return(0);
					    } //7
			   } //5
				  
			  if (OrderType()==OP_SELL)
 			  { //5
			     	    if (SellSig == 0 && BuySig == 1)
					    {//7
						   SaR = 1;
						   OrderClose(OrderTicket(),Lots,Ask,Slippage,Green);
						   return(0);
					    }//7
				   
				}//5
		  }//4
	  }//3
    }//2

   total=OrdersTotal();
   TradesThisSymbol=0;
   for(cnt=0;cnt<total;cnt++)
   { // 2
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
     
      if(OrderSymbol()==Symbol())
      { // 3
         TradesThisSymbol ++;
      } // 3 // close for if(OrderSymbol()==Symbol())
   } // 2 // 



		if(TradesThisSymbol == 0)
		{ //4
			if(BuySig == 1 && SellSig == 0)
			{ //5
				BuySig = 0;
				vSL=0;
				vTP=0;
				OrderSend(Symbol(),OP_BUY,Lots,Ask,Slippage,vSL,vTP,"Buy Order placed at "+TimeToStr(CurTime()),0,0,Green);
				return(0);
			} //5
			if(BuySig == 0 && SellSig == 1)
			{ //5
				SellSig = 0;
				vSL=0;
				vTP=0;
				OrderSend(Symbol(),OP_SELL,Lots,Bid,Slippage,vSL,vTP,"Sell Order placed at "+TimeToStr(CurTime()),0,0,Green);
				return(0);
			}	//5

		} //4
	
	

   
//----
 } // close of newbar
 
} // close of start

Author/Source: jesbrea1972