Code: Select all

//------------------------------------------------------------------

#property copyright "<Deleted>"

#property link      " <Deleted> "

#property description "OBS:LEI 184. Violar direitos de autor e os que lhe são conexos: Pena – detenção, de 3 (três) meses a 1 (um) ano, ou multa."

//------------------------------------------------------------------

#property indicator_separate_window

#property indicator_buffers 6



#property indicator_color1 4294967295

#property indicator_color2 4294967295

#property indicator_color3 4294967295

#property indicator_color4 4294967295

#property indicator_color5 65280 

#property indicator_color6 255



#property indicator_style2 STYLE_DOT

#property indicator_style3 STYLE_DOT

#property indicator_style4 STYLE_DOT



extern int    RsiLength     = 5;

extern int    RsiPrice      = PRICE_CLOSE;

extern int    HalfLength    = 5;

extern int    DevPeriod     = 100;

extern double Deviations    = 0.7;



extern bool   NoDellArr     = false;

extern int    Arr_otstup    = 0;

extern int    Arr_width     = 1;

extern color  Arr_Up        = 4294967295;

extern color  Arr_Dn        = 4294967295;

extern bool   AlertsMessage = false;

extern bool   AlertsSound   = false;

extern bool   AlertsEmail   = false;

extern bool   AlertsMobile  = false;

extern int    SignalBar     = 0;

extern bool   ShowArrBuf    = true;

extern int    History       = 3000;



int TimeBar;

#define PREFIX "vs1"



double RS[];

double ChMid[];

double ChUp[];

double ChDn[];

double SigUp[];

double SigDn[];

//------------------------------------------------------------------

int init()

{

   HalfLength=MathMax(HalfLength,1);

   

         SetIndexBuffer(0,RS); 

         SetIndexBuffer(1,ChMid);

         SetIndexBuffer(2,ChUp); 

         SetIndexBuffer(3,ChDn);

         SetIndexBuffer(4,SigUp);

         SetIndexArrow (4,233);

         SetIndexBuffer(5,SigDn);

         SetIndexArrow (5,234);

         

      if(ShowArrBuf)

       {

         SetIndexStyle (5,DRAW_ARROW); 

         SetIndexStyle (4,DRAW_ARROW);

       }else{

         SetIndexStyle (5,DRAW_NONE);

         SetIndexStyle (6,DRAW_NONE);

       }

         SetIndexLabel (0,"RSI");

         SetIndexLabel (1,"ChMid");

         SetIndexLabel (2,"ChUp");

         SetIndexLabel (3,"ChDn");

         SetIndexLabel (4,"SigUp");

         SetIndexLabel (5,"SigDn");

         

   return(0);

}

//------------------------------------------------------------------

int deinit() 

{ 

   for (int i = ObjectsTotal()-1; i >= 0; i--)   

   if (StringSubstr(ObjectName(i), 0, StringLen(PREFIX)) == PREFIX)

       ObjectDelete(ObjectName(i));

  return(0); 

}

//------------------------------------------------------------------

int start()

{

   int i,j,k,counted_bars=IndicatorCounted();

      if(counted_bars<0) return(-1);

      if(counted_bars>0) counted_bars--;

      int limit=MathMin(History,Bars-counted_bars+HalfLength);



   for (i=limit; i>=0; i--) RS[i] = iRSI(NULL,0,RsiLength,RsiPrice,i);

   for (i=limit; i>=0; i--)

   {

      double dev  = iStdDevOnArray(RS,0,DevPeriod,0,MODE_SMA,i);

      double sum  = (HalfLength+1)*RS[i];

      double sumw = (HalfLength+1);

      for(j=1, k=HalfLength; j<=HalfLength; j++, k--)

      {

         sum  += k*RS[i+j];

         sumw += k;

         if (j<=i)

         {

            sum  += k*RS[i-j];

            sumw += k;

         }

      }

      ChMid[i] = sum/sumw;

      ChUp[i] = ChMid[i]+dev*Deviations;

      ChDn[i] = ChMid[i]-dev*Deviations;

  }    

//-----------------------------------------------------------------------+ 

 for (i = limit; i >= 0; i--)

  {   

  if(RS[i]<ChDn[i] && RS[i+1]>ChDn[i+1])

   { 

     SigUp[i] = RS[i]-10;

     arrows_wind(i,"RSI TMA Up",Arr_otstup ,233,Arr_Up,Arr_width,false);

   }else{

     if(!NoDellArr)

      {

        SigUp[i] = EMPTY_VALUE;

        ObjectDelete(PREFIX+"RSI TMA Up"+TimeToStr(Time[i],TIME_DATE|TIME_SECONDS));

      }  

   }

   

  if(RS[i]>ChUp[i] && RS[i+1]<ChUp[i+1]) 

   {

     SigDn[i] = RS[i]+10;

     arrows_wind(i,"RSI TMA Dn",Arr_otstup ,234,Arr_Dn,Arr_width,true);

   }else{

     if(!NoDellArr)

      {

        SigDn[i] = EMPTY_VALUE;

        ObjectDelete(PREFIX + "RSI TMA Dn" + TimeToStr(Time[i],TIME_DATE|TIME_SECONDS));

      }  

   }  

//-----------------------------------------------------------------------+

 if(AlertsMessage || AlertsEmail || AlertsMobile || AlertsSound)

  { 

   string message1 = ("RSI TMA  - "+Symbol()+" TF("+Period()+") - Signal for BUY"); 

   string message2 = ("RSI TMA  - "+Symbol()+" TF("+Period()+") - Signal for SELL");

       

    if(TimeBar!=Time[0] && RS[SignalBar]<ChDn[SignalBar] && RS[SignalBar+1]>ChDn[SignalBar+1])

     { 

        if (AlertsMessage) Alert(message1);

        if (AlertsEmail)   SendMail(Symbol()+" RSI TMA  ",message1);

        if (AlertsMobile)  SendNotification(message1);

        if (AlertsSound)   PlaySound("alert2.wav");

        TimeBar=Time[0];

     }

    if(TimeBar!=Time[0] && RS[SignalBar]>ChUp[SignalBar] && RS[SignalBar+1]<ChUp[SignalBar+1])

     { 

        if (AlertsMessage) Alert(message2);

        if (AlertsEmail)   SendMail(Symbol()+" RSI TMA  ",message2);

        if (AlertsMobile)  SendNotification(message2);

        if (AlertsSound)   PlaySound("alert2.wav");

        TimeBar=Time[0];

    }

   }

  }

//-----------------------------------------------------------------------+

   return(0);

}

//-----------------------------------------------------------------------+

void arrows_wind(int k, string N,int ots,int Code,color clr, int ArrowSize,bool up)                 

{           

   string objName = PREFIX+N+TimeToStr(Time[k],TIME_DATE|TIME_SECONDS); 

   double gap  = ots*Point;

   

   ObjectCreate(objName, OBJ_ARROW,0,Time[k],0);

   ObjectSet   (objName, OBJPROP_COLOR, clr);  

   ObjectSet   (objName, OBJPROP_ARROWCODE,Code);

   ObjectSet   (objName, OBJPROP_WIDTH,ArrowSize);  

  if (up)

      ObjectSet(objName,OBJPROP_PRICE1,High[k]+gap);

     else  

      ObjectSet(objName,OBJPROP_PRICE1,Low[k]-gap);

}