//+------------------------------------------------------------------+
//|                                         EMA-Crossover_Signal.mq4 |
//|                         |
//+------------------------------------------------------------------+

/*
  +------------------------------------------------------------------+
  | Allows you to enter two ema periods and it will then show you at |
  | Which point they crossed over. It is more usful on the shorter   |
  | periods that get obscured by the bars / candlesticks and when    |
  | the zoom level is out. Also allows you then to remove the emas   |
  | from the chart.              
  +------------------------------------------------------------------+
*/   

#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Black
#property indicator_color2 Black

double CrossUp[];
double CrossDown[];
int CurrentTrend = 0;
int starttime = 0;
extern int FasterEMA = 1;
extern int SlowerEMA = 1;
extern int Show_Alert = 1;
extern int Play_Sound = 1;
extern int Send_Mail = 1;
extern string SoundFilename = "alert.wav";


int init()
  {
   SetIndexStyle(0, DRAW_ARROW, 1,1);
   SetIndexArrow(0, 233);
   SetIndexBuffer(0, CrossUp);
   SetIndexStyle(1, DRAW_ARROW, 1,1);
   SetIndexArrow(1, 234);
   SetIndexBuffer(1, CrossDown);
   starttime = TimeLocal();
   
   return(0);
  }


int deinit()
  {
   return(0);
  }


int start() {
   int limit, i, counter, loop;
   double fasterEMAnow, slowerEMAnow, fasterEMAprevious, slowerEMAprevious,slowerEMAnow1, slowerEMAprevious1;
   double Range, AvgRange;
   int counted_bars=IndicatorCounted();

   //---- check for possible errors
   if(counted_bars<0) return(-1);

   //---- last counted bar will be recounted
   if(counted_bars>0) counted_bars--;

   limit=Bars-counted_bars;

   loop = 0;
   for(i = 0; i <= limit; i++) {
      counter=i;
      Range=0;
      AvgRange=0;
      for (counter=i ;counter<=i+9;counter++)
      {
         AvgRange=AvgRange+MathAbs(High[counter]-Low[counter]);
      }
      Range=AvgRange/10;
       
      fasterEMAnow =      iMA(NULL, 0, 1, 0, MODE_LWMA, PRICE_MEDIAN, i);
      fasterEMAprevious = iMA(NULL, 0, 1, 0, MODE_LWMA, PRICE_MEDIAN, i+1);
      //fasterEMAafter =    iMA(NULL, 0, FasterEMA, 0, MODE_LWMA, PRICE_MEDIAN, i);

      slowerEMAnow =      iMA(NULL, 0, 2, 2, MODE_LWMA, PRICE_HIGH, i);
      slowerEMAprevious = iMA(NULL, 0, 2, 2, MODE_LWMA, PRICE_HIGH, i+1);
      slowerEMAnow1 =      iMA(NULL, 0, 2, 2, MODE_LWMA, PRICE_LOW, i);
      slowerEMAprevious1 = iMA(NULL, 0, 2, 2, MODE_LWMA, PRICE_LOW, i+1);
      //slowerEMAafter =    iMA(NULL, 0, 50, 1, MODE_LWMA, PRICE_MEDIAN, i);
      
      if ((fasterEMAnow > slowerEMAnow1) && (fasterEMAprevious < slowerEMAprevious1))//&& (fasterEMAprevious > slowerEMAafter)) //&& (fasterEMAafter > slowerEMAafter)) 
      {
         CrossUp[i] = Low[i] - Range*0.5;

         if ((loop == 0) && (CurrentTrend != 1) && (TimeLocal() - starttime >= 10))  {
            if (Show_Alert == 1)  {
               Alert("Cross Up on 07" + Symbol() + " " + Period() + "min " + FasterEMA + "/" + SlowerEMA + " EMA");
               }
            if (Play_Sound == 1)  {
               PlaySound(SoundFilename);
               }
            if (Send_Mail == 1)  {
               SendMail("Cross Up on " + Symbol() + " " + Period() + "min " + FasterEMA + "/" + SlowerEMA + " EMA", "");
               }
               
            CurrentTrend = 1;
            }

         if (loop == 0)  {
            loop = 1;
            }
      }
      else if ((fasterEMAnow < slowerEMAnow) && (fasterEMAprevious > slowerEMAprevious))//&& (fasterEMAprevious < slowerEMAafter)) //&& (fasterEMAafter < slowerEMAafter)) 
      {
         CrossDown[i] = High[i] + Range*0.5;

         if ((loop == 0) && (CurrentTrend != -1) && (TimeLocal() - starttime >= 10))  {
            if (Show_Alert == 1)  {
               Alert("Cross Down on 07" + Symbol() + " " + Period() + "min " + FasterEMA + "/" + SlowerEMA + " EMA");
               }
            if (Play_Sound == 1)  {
               PlaySound(SoundFilename);
               }
            if (Send_Mail == 1)  {
               SendMail("Cross Down on " + Symbol() + " " + Period() + "min " + FasterEMA + "/" + SlowerEMA + " EMA", "");
               }
               
            CurrentTrend = -1;
            }

         if (loop == 0)  {
            loop = 1;
            }
       }
   }
   return(0);
}