#property indicator_chart_window

//#property  indicator_separate_window

#property indicator_buffers 4
#property indicator_color1 Red
#property indicator_color2 White
#property indicator_color3 Red
#property indicator_color4 White
#property indicator_width1 1
#property indicator_width2 1
#property indicator_width3 4
#property indicator_width4 4

//----
extern color color1 = Red;
extern color color2 = White;
extern color color3 = Red;
extern color color4 = White;
// indicators parameters 
extern int period1=13;
extern int period2= 13;

extern int period3= 65;
extern int period4= 13;


//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
double ExtMapBuffer4[];


//

double ExtMapBuffer5[];
double ExtMapBuffer6[];
double ExtMapBuffer7[];
double ExtMapBuffer8[];


int ExtCountedBars=0;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//|------------------------------------------------------------------|
int init()
  {
//---- indicators
   SetIndexStyle(0,DRAW_HISTOGRAM, 0, 1, color1);
   SetIndexBuffer(0, ExtMapBuffer1);
   
   SetIndexStyle(1,DRAW_HISTOGRAM, 0, 1, color2);
   SetIndexBuffer(1, ExtMapBuffer2);
   
   SetIndexStyle(2,DRAW_HISTOGRAM, 0, 3, color3);
   SetIndexBuffer(2, ExtMapBuffer3);
   SetIndexStyle(3,DRAW_HISTOGRAM, 0, 3, color4);
   SetIndexBuffer(3, ExtMapBuffer4);
//----
   SetIndexDrawBegin(0,10);
   SetIndexDrawBegin(1,10);
   SetIndexDrawBegin(2,10);
   SetIndexDrawBegin(3,10);
//---- indicator buffers mapping
   SetIndexBuffer(0,ExtMapBuffer1);
   SetIndexBuffer(1,ExtMapBuffer2);
   SetIndexBuffer(2,ExtMapBuffer3);
   SetIndexBuffer(3,ExtMapBuffer4);
//---- initialization done

     SetIndexBuffer(4,ExtMapBuffer5);
     SetIndexBuffer(5,ExtMapBuffer6);
     SetIndexBuffer(6,ExtMapBuffer7);
     SetIndexBuffer(7,ExtMapBuffer8);
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//---- TODO: add your code here
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
  
     double haOpen, haHigh, haLow, haClose;
  
  // ca commence caclcul 
    int limit ;
    int   counted_bars=IndicatorCounted();
    
     if(counted_bars>0) counted_bars--;
      limit=Bars-counted_bars;
  
    //-- first moving average in the first buffer 
       for(int i=0; i<limit; i++)
    {
         ExtMapBuffer5[i] = iMA(NULL,0,period1,0,MODE_SMA,PRICE_CLOSE,i);
        
                  
    }
    
          for(i=0; i<limit; i++)
    {
                ExtMapBuffer6[i] = iMAOnArray(ExtMapBuffer5,0,period2,0,MODE_SMA,i);
        
     }
     
         for(i=0; i<limit; i++)
    {
               ExtMapBuffer7[i] = iMAOnArray(ExtMapBuffer6,0,period2,0,MODE_SMA,i);
    }
    
         for(i=0; i<limit; i++)
    {
                ExtMapBuffer8[i] = iMAOnArray(ExtMapBuffer7,0,period2,0,MODE_SMA,i);
    } 

  
  
   
   if(Bars<=10) return(0);
   ExtCountedBars=IndicatorCounted();
//---- check for possible errors
   if (ExtCountedBars<0) return(-1);
//---- last counted bar will be recounted
   if (ExtCountedBars>0) ExtCountedBars--;
   int pos=Bars-ExtCountedBars-1;
   
   
   while(pos>=0)
     {
     
     
      haOpen= ExtMapBuffer6[pos];
      
      haClose=ExtMapBuffer7[pos];
      
      /*
      
      haHigh=(High[pos]);
      haLow=(Low[pos]);
      
     */
      
     // if (haOpen<haClose) 
     // si tendance baissière 
     if (ExtMapBuffer6[pos]< ExtMapBuffer7[pos])
        {
        
           ExtMapBuffer1[pos]=ExtMapBuffer5[pos];
         ExtMapBuffer2[pos]= ExtMapBuffer8[pos];
            
        /*
         ExtMapBuffer1[pos]=haLow;
         ExtMapBuffer2[pos]=haHigh;
         
         */
        } 
      else
        {
          ExtMapBuffer1[pos]=ExtMapBuffer8[pos];
         ExtMapBuffer2[pos]= ExtMapBuffer5[pos];
        /*
         ExtMapBuffer1[pos]=haHigh;
         ExtMapBuffer2[pos]=haLow;
         
         */
            
        } 
        
        
      ExtMapBuffer3[pos]=ExtMapBuffer6[pos];
      ExtMapBuffer4[pos]=ExtMapBuffer7[pos];
 	   pos--;
 	   
 	   
     }
//----
   return(0);
  }
//+------------------------------------------------------------------+