//+------------------------------------------------------------------+
//|                                                    MA ribbon.mq4 |
//|                                               mladenfx@gmail.com |
//|                                                                  |
//| original idea by Jose Silva                                      |
//+------------------------------------------------------------------+
#property copyright "mladen"
#property link      "mladenfx@gmail.com"

#property indicator_chart_window
#property indicator_buffers 4
#property indicator_color1 clrMidnightBlue
#property indicator_color2 clrMaroon
#property indicator_color3 clrNONE
#property indicator_color4 clrGold
#property indicator_width1 5
#property indicator_width2 5
#property indicator_width3 1
#property indicator_width4 3

input ENUM_TIMEFRAMES Timeframe = PERIOD_CURRENT;
input int       MA1Period=1;
input ENUM_MA_METHOD  MA1Method = MODE_SMA;
input ENUM_APPLIED_PRICE MA1Price = PRICE_CLOSE;
input int       MA2Period=200;
input ENUM_MA_METHOD  MA2Method = MODE_EMA;
input ENUM_APPLIED_PRICE MA2Price = PRICE_CLOSE;
extern bool   AlertOn = true,
              EmailOn = false,
              PushOn = false,
              AlertOnClosedCandle = true;
extern bool    ShowArrows = true;
extern int     ArrowWidth = 2;
extern color   ArrowsUpColor = Green,
               ArrowsDnColor = Red;
extern int    Corner = 1;               

double buffer1[];
double buffer2[];
double buffer3[];
double buffer4[];
int Trend=0,SignalCandle=0;
datetime LastAlert=0;
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+

int init()
{
   SetIndexBuffer(0,buffer3); SetIndexStyle(0,DRAW_HISTOGRAM, STYLE_SOLID, 1);
   SetIndexBuffer(1,buffer4); SetIndexStyle(1,DRAW_HISTOGRAM, STYLE_SOLID, 1);
   SetIndexBuffer(2,buffer1);
   SetIndexBuffer(3,buffer2);
   if (AlertOnClosedCandle) SignalCandle=1;
   return(0);
}
int deinit() {
   Comment("");
   if (ShowArrows) {
      for (int i=ObjectsTotal()-1;i>=0;i--) {
         if (StringFind(ObjectName(i),"MARibbon")>-1) ObjectDelete(ObjectName(i));
         }
      }
   ObjectDelete("Trade");
   return(0);
} 

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+

int start()
{
   int counted_bars=IndicatorCounted();
   int limit,i;
   
   if(counted_bars<0) return(-1);
   if(counted_bars>0) counted_bars--;
           limit=Bars-counted_bars;

   for(i=limit; i>=0; i--)
   {
      buffer1[i] = iMA(NULL,Timeframe,MA1Period,0,MA1Method,MA1Price,i);
      buffer2[i] = iMA(NULL,Timeframe,MA2Period,0,MA2Method,MA2Price,i);
      buffer3[i] = buffer1[i];
      buffer4[i] = buffer2[i];
      if (buffer1[i+SignalCandle]>buffer2[i+SignalCandle] && buffer1[i+1+SignalCandle]<=buffer2[i+1+SignalCandle] && Trend<1) {
         Trend=1;
	      if (ShowArrows) DrawArrow(i+SignalCandle,buffer2[i+SignalCandle],ArrowsUpColor,233,false);
	      }
      else if (buffer1[i+SignalCandle]<buffer2[i+SignalCandle] && buffer1[i+1+SignalCandle]>=buffer2[i+1+SignalCandle] && Trend>-1) {
      	Trend=-1;
      	if (ShowArrows) DrawArrow(i+SignalCandle,buffer2[i+SignalCandle],ArrowsDnColor,234,true);
         }
   }
   if (buffer1[SignalCandle]>buffer2[SignalCandle] && buffer1[SignalCandle+1]<=buffer2[SignalCandle+1] && LastAlert!=Time[0]) {
      LastAlert=Time[0];
      if (AlertOn) Alert("MA Ribbon Buy Alert! - "+Symbol()+"["+Period()+"m]");
      if (EmailOn) SendMail("MA Ribbon Buy Alert!","Buy alert on "+Symbol()+"["+Period()+"m]");
      if (PushOn) SendNotification("Buy alert on "+Symbol()+"["+Period()+"m]");
      }
   else if (buffer1[SignalCandle]<buffer2[SignalCandle] && buffer1[SignalCandle+1]>=buffer2[SignalCandle+1] && LastAlert!=Time[0]) {
      LastAlert=Time[0];
      if (AlertOn) Alert("MA Ribbon Sell Alert! - "+Symbol()+"["+Period()+"m]");
      if (EmailOn) SendMail("MA Ribbon Sell Alert!","Sell alert on "+Symbol()+"["+Period()+"m]");
      if (PushOn) SendNotification("Sell alert on "+Symbol()+"["+Period()+"m]");
      }
   string OPstr;
   color OPclr;
   if (Trend>0) {
      OPstr = "BUY";
      OPclr = Green;
      }
   else if (Trend<0) {
      OPstr = "SELL";
      OPclr = Red;
      }
   else {
      OPstr = "NO Trade";
      OPclr = Red;
      }
   ObjectCreate("Trade", OBJ_LABEL, 0, 0, 0);
   ObjectSetText("Trade", OPstr, 15, "Arial Bold", OPclr);
   ObjectSet("Trade", OBJPROP_CORNER, Corner);
   ObjectSet("Trade", OBJPROP_XDISTANCE, 5);
   ObjectSet("Trade", OBJPROP_YDISTANCE, 30);
   
   double MAve=iMA(Symbol(),Timeframe,MA2Period,0,MA2Method,MA2Price,0);   
   double MArange = (Bid-MAve)/Point;
   
   DrawLabel("MARange",85,10,"MA-RANGE",10,"Arial",clrDodgerBlue,"");   
   
   if(DoubleToStr(MArange,0)> 0 ) DrawLabel("MARangex",5,10,DoubleToStr(MArange,0) + " PIPS",10,"Arial",clrLime,DoubleToStr(MArange,0));
      else
        if(DoubleToStr(MArange,0) < 0 ) DrawLabel("MARangex",5,10,DoubleToStr(MArange,0) + " PIPS",10,"Arial",clrRed,DoubleToStr(MArange,0));
   
   DrawPriceTag("MAPriceTag", Time[0], Time[0],MAve,MAve,clrGray,1);
   
   return(0);
}

void DrawArrow(int i, double ma, color theColor,int theCode,bool up) {
   string name = "MARibbon:"+Time[i];
   double gap  = 3.0*iATR(NULL,0,10,i)/4.0;   
   ObjectCreate(name,OBJ_ARROW,0,Time[i],0);
      ObjectSet(name,OBJPROP_ARROWCODE,theCode);
      ObjectSet(name,OBJPROP_COLOR,theColor);
      ObjectSet(name,OBJPROP_WIDTH,ArrowWidth);
      if (up)
            ObjectSet(name,OBJPROP_PRICE1,ma+gap);
      else  ObjectSet(name,OBJPROP_PRICE1,ma-gap);
   return;
}

//+------------------------------------------------------------------+
void DrawLabel(string name, int x,int y,string label,int size=9,string font="Arial",color clr=DimGray,string tooltip="")
  {   

   ObjectDelete (name);
   ObjectCreate (name, OBJ_LABEL,0,0,0,0,0,0);   
   ObjectSetText(name,label,size,font,clr);
   ObjectSet(name,OBJPROP_CORNER,1);
   ObjectSet(name,OBJPROP_XDISTANCE,x);
   ObjectSet(name,OBJPROP_YDISTANCE,y);
   ObjectSetString(0,name,OBJPROP_TOOLTIP,tooltip);
  }
//+------------------------------------------------------------------+
void DrawPriceTag(string name, datetime Time1, datetime Time2, double Price1, double Price2,color lcolor, int lwidth)
{  
          ObjectDelete(name);            
          ObjectCreate(name,OBJ_ARROW,0,Time1,0,Time2,0);           
          ObjectSet(name, OBJPROP_ARROWCODE, SYMBOL_RIGHTPRICE);   
          ObjectSet(name,OBJPROP_PRICE1,Price1);
          ObjectSet(name,OBJPROP_PRICE2,Price2);   
          ObjectSet(name,OBJPROP_COLOR,lcolor);                             
          ObjectSet(name,OBJPROP_WIDTH,lwidth);   
} 
//+------------------------------------------------------------------+