#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Yellow
#property indicator_color2 Aqua

#property indicator_width1 1
#property indicator_width2 1

double CrossUp[];
double CrossDown[];
extern int FasterEMA = 5;
extern int SlowerEMA = 12;
extern int RSIPeriod = 21;
extern bool AlertON=true;
datetime alertTag;


//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexStyle(0, DRAW_ARROW, EMPTY,3);
SetIndexArrow(0, 241);
SetIndexBuffer(0, CrossUp);
SetIndexStyle(1, DRAW_ARROW, EMPTY,3);
SetIndexArrow(1, 242);
SetIndexBuffer(1, CrossDown);
alertTag=Time[0];
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----

//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start() {
int limit, i, counter;
double fasterEMAnow, slowerEMAnow, fasterEMAprevious, slowerEMAprevious, RSInow, RSIprevious;
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;

for(i = limit; i >= 1; 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, FasterEMA, 0, MODE_EMA, PRICE_CLOSE, i);
fasterEMAprevious = iMA(NULL, 0, FasterEMA, 0, MODE_EMA, PRICE_CLOSE, i+1);

slowerEMAnow = iMA(NULL, 0, SlowerEMA, 0, MODE_EMA, PRICE_CLOSE, i);
slowerEMAprevious = iMA(NULL, 0, SlowerEMA, 0, MODE_EMA, PRICE_CLOSE, i+1);

RSInow=iRSI(NULL,0,RSIPeriod,PRICE_CLOSE,i);
RSIprevious=iRSI(NULL,0,RSIPeriod,PRICE_CLOSE,i+1);

//CrossUp[i] = EMPTY_VALUE;
//CrossDown[i] = EMPTY_VALUE;
if (fasterEMAnow > slowerEMAnow && fasterEMAprevious < slowerEMAprevious &&
     RSInow>50 && RSIprevious<50)
{
CrossUp[i] = Low[i] - Range*0.5;
}
else if (fasterEMAnow < slowerEMAnow && fasterEMAprevious > slowerEMAprevious &&
     RSInow<50 && RSIprevious>50) 
{
CrossDown[i] = High[i] + Range*0.5;
}
if (AlertON==true && CrossDown[i] != EMPTY_VALUE && alertTag<Time[i]){
Alert("EMA Cross Trend going Down on ",Symbol()," ",Period()," at ",TimeToStr(Time[i],TIME_DATE|TIME_MINUTES));
alertTag = Time[0];
}
else if (AlertON==true && CrossUp[i] != EMPTY_VALUE && alertTag<Time[i]){
Alert("EMA Cross Trend going Up on ",Symbol()," ",Period()," at ",TimeToStr(Time[i],TIME_DATE|TIME_MINUTES));
alertTag = Time[0];
}
}
return(0);
}