ang_AZad (C)

#property  copyright "ANG3110@latchess.com"
//--------ang_AZad (C)-------------------
#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 Blue
#property indicator_color2 Red
//----------------------
extern double ki=4;
//--------------------
double za[],z,za2[],z2,aza[],a0[];
//********************************************************
int init(){
IndicatorBuffers(4);
SetIndexBuffer(0,aza);
SetIndexBuffer(1,a0);
SetIndexBuffer(2,za);
SetIndexBuffer(3,za2);
return(0);}
//********************************************************
int start() {
int i,cbi;
int n,ai,bi,f,ai2,bi2,f2; 
cbi=Bars-IndicatorCounted()-1;
//------------------------------------------------------------------------------------------------------------------------------
for(i=cbi; i>=0; i--) { 
if (Close[i]>z && Close[i]>Close[i+1]) z=za[i+1]+(Close[i]-za[i+1])/ki;
if (Close[i]<z && Close[i]<Close[i+1]) z=za[i+1]+(Close[i]-za[i+1])/ki;
if (Close[i]>z2 && Close[i]<Close[i+1]) z2=za2[i+1]+(Close[i]-za2[i+1])/ki;
if (Close[i]<z2 && Close[i]>Close[i+1]) z2=za2[i+1]+(Close[i]-za2[i+1])/ki;
if (i>Bars-5) {z=Close[i]; z2=z;}
za[i]=z;  
za2[i]=z2;
aza[i]=(za[i]-za2[i])/Point;
a0[i]=0.00000001;
}
//------------------------------------------------------
   return(0);}
//********************************************************