//+------------------------------------------------------------------+
//| T3_ADX.mq4 |
//| MojoFX |
//| 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

extern int ADX_Period = 8;
extern int T3_Period = 8;
extern double T3_Curvature = 0.618;

double t3Array[];
double rsiArray[];
double PlusSdiBuffer[];


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

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

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

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

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

SetIndexBuffer(2,PlusSdiBuffer);

//---- 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()
{
int limit=Bars;

//---- indicator calculation


   double pdm,mdm,tr;

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

      pdm=Open[i]-Open[i+1];
      mdm=-Open[i+1]+Open[i];
      if(pdm<0) pdm=0;  // +DM
      if(mdm<0) mdm=0;  // -DM
      if(pdm==mdm) { pdm=pdm; mdm=mdm; }
      else if(pdm<mdm) pdm=0;
           else if(mdm<pdm) mdm=0;
      tr=Open[i]-Open[i+1];
      
      //---- counting plus/minus direction
      if(tr==0) { PlusSdiBuffer[i]=0; }
      else      { PlusSdiBuffer[i]=100.0*pdm/tr;}
      
     }
//---- last counted bar will be recounted

//---- apply EMA to +DI
   for(i=limit; i>=0; i--)
      rsiArray[i]=iMAOnArray(PlusSdiBuffer,0,ADX_Period,0,MODE_EMA,i);   
   
   
   
for(i=limit; i>=0; 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;
}
//----
return(0);
}
//+------------------------------------------------------------------+