RSI_trial_test.mq4

//+------------------------------------------------------------------+
//| T3_RSI.mq4 |
//| MojoFX | (randomly modified by non computer expert, annbeea)
//| http://groups.yahoo.com/group/MetaTrader_Experts_and_Indicators/ |
//+------------------------------------------------------------------+
#property copyright "MojoFX - Conversion only"
#property link "http://groups.yahoo.com/group/MetaTrader_Experts_and_Indicators/"

#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 Red
#property indicator_color2 White
#property indicator_level1 50
#property indicator_level2 30
#property indicator_level3 70


extern int RSI_Period = 8;
extern int T3_Period = 14;
extern double T3_Curvature = 0.618;
extern bool Cross_Alert=true;

double t3Array[];
double rsiArray[];

double e1,e2,e3,e4,e5,e6;
double c1,c2,c3,c4;
double n,w1,w2,b2,b3;

//---- globals
int        maxLines;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators setting
SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,5,Red);
SetIndexStyle(1,DRAW_LINE,STYLE_SOLID,1,White);

IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS));
IndicatorShortName("T3 RSI Alert "+T3_Period);

SetIndexBuffer(0,t3Array);
SetIndexLabel(0,"T3 "+T3_Period);

SetIndexBuffer(1,rsiArray);
SetIndexLabel(1,"RSI "+T3_Period);


//---- variable reset

e1=0; e2=0; e3=0; e4=0; e5=0; e6=0;
c1=0; c2=0; c3=0; c4=0;
n=0;
w1=0; w2=0;
b2=0; b3=0;

b2=T3_Curvature*T3_Curvature;
b3=b2*T3_Curvature;
c1=-b3;
c2=(3*(b2+b3));
c3=-3*(2*b2+T3_Curvature+b3);
c4=(1+3*T3_Curvature+b3+3*b2);
n=T3_Period;

if (n<1) n=1;
n = 1 + 0.5*(n-1);
w1 = 2 / (n + 1);
w2 = 1 - w1;

//----
return(0);
}

//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
   double crossing;
int limit=Bars;
   static datetime prevtime = 0;

//---- indicator calculation

for(int i=limit; i>=0; i--)
{
rsiArray[i] = iRSI(NULL,0,T3_Period,PRICE_CLOSE,i);

e1 = w1*rsiArray[i] + w2*e1;
e2 = w1*e1 + w2*e2;
e3 = w1*e2 + w2*e3;
e4 = w1*e3 + w2*e4;
e5 = w1*e4 + w2*e5;
e6 = w1*e5 + w2*e6;

t3Array[i]=c1*e6 + c2*e5 + c3*e4 + c4*e3;

}




//----------------------------------------------------------------------------------alert version one is below:
   if (Cross_Alert == true) {
      if (prevtime == Time[0]) {
         return(0);
      }
      else {
         if((rsiArray[0] > t3Array[0]) && (rsiArray[1] < t3Array[1])) {
               PlaySound("alert2.wav"); //buy wav
            
         }
         else if((rsiArray[0] < t3Array[0]) && (rsiArray[1] > t3Array[1])) {
               PlaySound("alert2.wav"); //sell wav
            
         }
         prevtime = Time[0];
      }
   }
// (need add return (0); or not  here ??????????????????????)   


}



//---------------------i notice that alert version one and version two code has some main differences in the codes---(alert version two is below) which is logical correct or better? version one or version 2?

 if (Cross_Alert == true) {
      if (prevtime == Time[0]) {
         return(0);
      }
      else {
         if((rsiArray[1] > t3Array[1]+1) && (rsiArray[2] < t3Array[2])) {
               Alert(Symbol(), " M", Period(), " T3 Cross Up");
            
         }
         else if((rsiArray[1] < t3Array[1]-1) && (rsiArray[2] > t3Array[2])) {
               Alert(Symbol(), " M", Period(), " T3 Cross Down");
            
         }
         prevtime = Time[0];
      }
   }
   
//----
return(0);
}



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






//      (finally could you share the "adaptive T3 RSI nrp indicator" http://www.forex-tsd.com/blogs/newdigital/1213-new-elite-section-indicator-adaptive-t3-rsi-nrp.html to me?) many thanks.