/*
//----+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -+ 
//Version  July 20, 2006                                             |
Editing   Nikolay Kositsin  15.06.2006  farria@mail.redcom.ru        |
//----+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -+ 
*/
//+------------------------------------------------------------------+ 
//|                                                    3Color_Ch.mqh | 
//|                           Copyright © 2006,     Nikolay Kositsin | 
//|                               Khabarovsk,  farria@mail.redcom.ru | 
//+------------------------------------------------------------------+
/*
#property copyright "Nikolay Kositsin"
#property link "farria@mail.redcom.ru" 
//---- отрисовка индикатора в главном окне
#property indicator_chart_window 
//---- количество индикаторных буферов
#property indicator_buffers 6
//---- цвета индикатора
#property indicator_color1 Lime
#property indicator_color2 Lime
#property indicator_color3 Red 
#property indicator_color4 Red 
#property indicator_color5 Gray
#property indicator_color6 Gray
*/
//---- ВХОДНЫЕ ПАРАМЕТРЫ ИНДИКАТОРА ------------------------------------+
extern int  Channel_width = 100; // ширина канала в пунктах
extern int Ind_Shift = 0;       // cдвиг индикатора вдоль оси времени 
extern int Trend_Minimum = 0;  // минимальная скорость тренда в пунктах
//---- +----------------------------------------------------------------+
//---- индикаторные буферы
double Buffer1 [];
double Buffer2 [];
double Buffer3 [];
double Buffer4 [];
double Buffer5 []; 
double Buffer6 []; 
double Buffer7 []; 
double Buffer8 []; 
//----
double Value_Buffer[4]; 
//----  введение логических констант
bool   ReStart=false;
//---- введение констант с плавающей точкой 
int    ind_N1,ind_N2,bar;
//---- введение констант и переменных с плавающей точкой 
double Value1,Value0,Trend0,Trend1,Trend2,MINIMUM,Half_Width;
//+------------------------------------------------------------------+
//| 3Color_Channel initialization function                           |
//+------------------------------------------------------------------+
int init() 
  { 
//---- стили изображения индикатора
   SetIndexStyle  (0, DRAW_LINE); 
   SetIndexStyle  (1, DRAW_LINE);
   SetIndexStyle  (2, DRAW_LINE);
   SetIndexStyle  (3, DRAW_LINE); 
   SetIndexStyle  (4, DRAW_LINE);
   SetIndexStyle  (5, DRAW_LINE); 
   SetIndexStyle  (6, DRAW_LINE);
   SetIndexStyle  (7, DRAW_LINE); 
//---- 8 индикаторных буферов использованы для счёта 
   IndicatorBuffers(8);   
   SetIndexBuffer (0, Buffer1);
   SetIndexBuffer (1, Buffer2);
   SetIndexBuffer (2, Buffer3);   
   SetIndexBuffer (3, Buffer4);
   SetIndexBuffer (4, Buffer5);   
   SetIndexBuffer (5, Buffer6); 
   SetIndexBuffer (6, Buffer7);   
   SetIndexBuffer (7, Buffer8);          
//---- установка значений индикатора, которые не будут видимы на графике 
   SetIndexEmptyValue(0,EmptyValue);
   SetIndexEmptyValue(1,EmptyValue);
   SetIndexEmptyValue(2,EmptyValue);
   SetIndexEmptyValue(3,EmptyValue);
   SetIndexEmptyValue(4,EmptyValue);
   SetIndexEmptyValue(5,EmptyValue); 
   SetIndexEmptyValue(6,EmptyValue);
   SetIndexEmptyValue(7,EmptyValue); 
//---- установка сдига значений индикатора вдоль оси времени 
   SetIndexShift(0,Ind_Shift); 
   SetIndexShift(1,Ind_Shift); 
   SetIndexShift(2,Ind_Shift); 
   SetIndexShift(3,Ind_Shift); 
   SetIndexShift(4,Ind_Shift); 
   SetIndexShift(5,Ind_Shift); 
   SetIndexShift(6,Ind_Shift); 
   SetIndexShift(7,Ind_Shift);    
//---- установка номера бара, начиная с которого будет отрисовываться индикатор  
   int drow_begin;  
   if (COUNT_begin()>=0)
   {
   drow_begin=COUNT_begin()+Ind_Shift+3;  
   SetIndexDrawBegin(0,drow_begin);
   SetIndexDrawBegin(1,drow_begin);
   SetIndexDrawBegin(2,drow_begin); 
   SetIndexDrawBegin(3,drow_begin);
   SetIndexDrawBegin(4,drow_begin);
   SetIndexDrawBegin(5,drow_begin); 
   SetIndexDrawBegin(6,drow_begin);
   SetIndexDrawBegin(7,drow_begin); 
   }
//---- Установка формата точности (количество знаков после десятичной точки) для визуализации значений индикатора  
   IndicatorDigits(digits());
//---- имена для окон данных и лэйбы для субъокон
   IndicatorShortName(""+Label+"");
   SetIndexLabel(0,"Up_Trend");
   SetIndexLabel(1,"Up_Trend");
   SetIndexLabel(2,"Down_Trend");
   SetIndexLabel(3,"Down_Trend");
   SetIndexLabel(4,"Straight_Trend");
   SetIndexLabel(5,"Straight_Trend"); 
   SetIndexLabel(6,"Channals_UP");
   SetIndexLabel(7,"Channals_DOUN"); 
//---- инициализация констант  
   MINIMUM=Trend_Minimum*Point;
//---- размер канала в пунктах
   Half_Width = Channel_width*Point/2;
//---- завершение инициализации
return(0); 
  } 
//+------------------------------------------------------------------+
//|  3Color_Channel CODE                                             |
//+------------------------------------------------------------------+
int start() 
{ 
//----+ Введение целых переменных и получение уже посчитанных баров
int limit,limit1,size,MaxBar,MaxBar1,counted_bars=IndicatorCounted();
//---- проверка на возможные ошибки
if (counted_bars<0)return(-1);
//---- последний посчитанный бар должен быть пересчитан
if (counted_bars>0) counted_bars--;
//---- определение номера самого старого бара, начиная с которого будет произедён пересчёт новых баров
MaxBar=Bars-1;
limit=MaxBar-counted_bars;  
size=limit+4;
if (size>MaxBar+1)size=MaxBar+1;
ArrayResize(Value_Buffer,size);        
//---- Загрузка значений исходного индикатора в буфер
for(bar=size-1; bar>=0; bar--)Value_Buffer[bar]=INDICATOR(bar);
//---- определение номера самого старого бара, начиная с которого будет произедён пересчёт всех баров 
if ((counted_bars==0)&&(COUNT_begin()==-1))
 {
  for(bar=MaxBar; bar>=0; bar--)if (Value_Buffer[bar]!=EmptyValue){MaxBar1=bar-3;break;}
  //---- установка номера бара, начиная с которого будет отрисовываться индикатор  
   int drow_begin;  
   drow_begin=MaxBar-MaxBar1+Ind_Shift;  
   SetIndexDrawBegin(0,drow_begin);
   SetIndexDrawBegin(1,drow_begin);
   SetIndexDrawBegin(2,drow_begin); 
   SetIndexDrawBegin(3,drow_begin);
   SetIndexDrawBegin(4,drow_begin);
   SetIndexDrawBegin(5,drow_begin); 
//---- 
 }
else MaxBar1=MaxBar-COUNT_begin()-3;  

//---- корекция максимального номера самого старого бара, начиная с которого будет произедён пересчёт новых баров 
//---- инициализация нуля
if (limit>MaxBar1)
 {
  limit=MaxBar1; 
  for(int ttt=MaxBar;ttt>MaxBar1;ttt--)
   {
    Buffer1[ttt]=EmptyValue; Buffer2[ttt]=EmptyValue; 
    Buffer3[ttt]=EmptyValue; Buffer4[ttt]=EmptyValue;
    Buffer5[ttt]=EmptyValue; Buffer6[ttt]=EmptyValue; 
    Buffer7[ttt]=EmptyValue; Buffer8[ttt]=EmptyValue; 
   }
 }
//---- Вычисление каналов
for(bar=limit; bar>=0; bar--)
  {
   Buffer7[bar]=Value_Buffer[bar]+Half_Width;     
   Buffer8[bar]=Value_Buffer[bar]-Half_Width;
  }
bar=limit;
//---- ОСНОВНОЙ ЦИКЛ РАСЧЁТА ИНДИКАТОРА
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
//|++++++++++++++++++++++++ <<< Three Color Indicator code >>> ++++++++++++++++++++++++++++++++++++++++++++|
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
// Input indicator buffer: Value_Buffer.                                                                   |
// Output indicator buffers: Buffer1, Buffer2, Buffer1, Buffer2, Buffer1, Buffer2.                         |                                                                                  |                                                                                          
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+  
while(bar>=0)   
 {    
     if (!ReStart)
       { 
        Trend2=Value_Buffer[bar+2]-Value_Buffer[bar+3]; 
        Trend1=Value_Buffer[bar+1]-Value_Buffer[bar+2];
          
        if (MathAbs(Trend2)<MINIMUM)Trend2=0;
        if (MathAbs(Trend1)<MINIMUM)Trend1=0;  
             
        if (Trend2>0) ind_N2=1; else {if (Trend2<0) ind_N2=3; else ind_N2=5;}    
        if (Trend1>0) ind_N1=1; else {if (Trend1<0) ind_N1=3; else ind_N1=5;}
       } 
     //----+---------------------------------------------------------------------------------------------------------------+  
     if((ReStart)&&(bar==limit))
       {
        Trend2=Value_Buffer[bar+2]-Value_Buffer[bar+3]; 
        Trend1=Value_Buffer[bar+1]-Value_Buffer[bar+2];
        
        if (MathAbs(Trend2)<MINIMUM)Trend2=0;
        if (MathAbs(Trend1)<MINIMUM)Trend1=0;   
        
        for(int iii=bar;iii<=bar;iii++)
         {
          if (Trend2> 0){if (Buffer1[iii+2]!=EmptyValue){ind_N2=1;break;} if (Buffer2[iii+2]!=EmptyValue){ind_N2=2;break;}}
          if (Trend2< 0){if (Buffer3[iii+2]!=EmptyValue){ind_N2=3;break;} if (Buffer4[iii+2]!=EmptyValue){ind_N2=4;break;}}
          if (Trend2==0){if (Buffer5[iii+2]!=EmptyValue){ind_N2=5;break;} if (Buffer6[iii+2]!=EmptyValue){ind_N2=6;break;}}
         }
        for(int kkk=bar;kkk<=bar;kkk++)
         {
          if (Trend1> 0){if (Buffer1[kkk+1]!=EmptyValue){ind_N1=1;break;} if (Buffer2[kkk+1]!=EmptyValue){ind_N1=2;break;}}
          if (Trend1< 0){if (Buffer3[kkk+1]!=EmptyValue){ind_N1=3;break;} if (Buffer4[kkk+1]!=EmptyValue){ind_N1=4;break;}}
          if (Trend1==0){if (Buffer5[kkk+1]!=EmptyValue){ind_N1=5;break;} if (Buffer6[kkk+1]!=EmptyValue){ind_N1=6;break;}}
         }
        }
     //----+---------------------------------------------------------------------------------------------------------------+   
     Value0 = Value_Buffer[bar+0];   
     Value1 = Value_Buffer[bar+1];             
     Trend0 = Value0 - Value1; 
     if (MathAbs(Trend0)<MINIMUM)Trend0=0;   
     //----+======================================================================+         
    switch(ind_N1)
            {  
            //----+----------------------------------------------------------+                     
             case 1 :{ Buffer2[bar+1]=EmptyValue;   Buffer3[bar+1]=EmptyValue;
                       Buffer4[bar+1]=EmptyValue;   Buffer5[bar+1]=EmptyValue;
                       Buffer6[bar+1]=EmptyValue;}  break;
            //----+----------------------------------------------------------+                                                                  
             case 2 :{ Buffer1[bar+1]=EmptyValue;   Buffer3[bar+1]=EmptyValue;
                       Buffer4[bar+1]=EmptyValue;   Buffer5[bar+1]=EmptyValue;
                       Buffer6[bar+1]=EmptyValue;}  break;
            //----+----------------------------------------------------------+                                                                                                                 
             case 3 :{ Buffer1[bar+1]=EmptyValue;   Buffer2[bar+1]=EmptyValue;
                       Buffer4[bar+1]=EmptyValue;   Buffer5[bar+1]=EmptyValue;
                       Buffer6[bar+1]=EmptyValue;}  break;
            //----+----------------------------------------------------------+                                                
             case 4 :{ Buffer1[bar+1]=EmptyValue;   Buffer2[bar+1]=EmptyValue;
                       Buffer3[bar+1]=EmptyValue;   Buffer5[bar+1]=EmptyValue;
                       Buffer6[bar+1]=EmptyValue;}  break;
            //----+----------------------------------------------------------+                                                          
             case 5 :{ Buffer1[bar+1]=EmptyValue;   Buffer2[bar+1]=EmptyValue;
                       Buffer3[bar+1]=EmptyValue;   Buffer4[bar+1]=EmptyValue;
                       Buffer6[bar+1]=EmptyValue;}  break;
            //----+----------------------------------------------------------+                                                                  
             case 6 :{ Buffer1[bar+1]=EmptyValue;   Buffer2[bar+1]=EmptyValue;
                       Buffer3[bar+1]=EmptyValue;   Buffer4[bar+1]=EmptyValue;
                       Buffer5[bar+1]=EmptyValue;}  break;  
            //----+----------------------------------------------------------+                                                                            
            } 
     //----+======================================================================+                 
                       Buffer1[bar+0]=EmptyValue;   Buffer2[bar+0]=EmptyValue;                                                                                                            
                       Buffer3[bar+0]=EmptyValue;   Buffer4[bar+0]=EmptyValue;                            
                       Buffer5[bar+0]=EmptyValue;   Buffer6[bar+0]=EmptyValue;  
//----+=============================================================================================+                           
        if(!ReStart)  
             {
              if(Trend0 >0){Buffer1[bar]=Value0; Buffer1[bar+1]=Value1; ind_N1=1; ReStart=true;}  
              if(Trend0 <0){Buffer3[bar]=Value0; Buffer3[bar+1]=Value1; ind_N1=3; ReStart=true;}  
              if(Trend0==0){Buffer5[bar]=Value0; Buffer5[bar+1]=Value1; ind_N1=5; ReStart=true;}
             }
//----+=============================================================================================+ 
        
        if(Trend0>0)Up_Trend();else if(Trend0<0)Down_Trend();else No_trend(); 
  bar--; 
 }
 //----ЗАВЕРШЕНИЕ ОСНОВНОГО ЦИКЛА       
// ++++++++++++++++ <<< Three Color Indicator code done >>> +++++++++++++++++++++++++++++  
for(kkk=2; kkk>=0; kkk--)Value_Buffer[kkk+1]=Value_Buffer[kkk];
return(0); 
} 

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

//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
//----+ +++++++++++++++++++ <<< Дополнительные функции для индикатора >>> ++++++++++++++++++++++++++
//+SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS+
void Up_Trend(){switch(ind_N1)
{   
 case 1 :          {Buffer1[bar]=Value0;  Buffer1[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=1;}break;
 case 2 :          {Buffer2[bar]=Value0;  Buffer2[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=2;}break;         
 case 3 :{switch(ind_N2)
         {case 1 : {Buffer2[bar]=Value0;  Buffer2[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=2;}break;          
         default : {Buffer1[bar]=Value0;  Buffer1[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=1;}}}break;                           
 case 4 :{switch(ind_N2)
         {case 1 : {Buffer2[bar]=Value0;  Buffer2[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=2;}break;  
         default : {Buffer1[bar]=Value0;  Buffer1[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=1;}}}break;                            
 case 5 :{switch(ind_N2)
         {case 1 : {Buffer2[bar]=Value0;  Buffer2[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=2;}break;    
         default : {Buffer1[bar]=Value0;  Buffer1[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=1;}}}break;         
 case 6 :{switch(ind_N2)
         {case 1 : {Buffer2[bar]=Value0;  Buffer2[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=2;}break;
         default : {Buffer1[bar]=Value0;  Buffer1[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=1;}}} }
}
//+================================================================================================+
void Down_Trend(){switch(ind_N1)
{   
 case 3 :          {Buffer3[bar]=Value0;  Buffer3[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=3;}break;
 case 4 :          {Buffer4[bar]=Value0;  Buffer4[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=4;}break;         
 case 1 :{switch(ind_N2)
         {case 3 : {Buffer4[bar]=Value0;  Buffer4[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=4;}break; 
         default : {Buffer3[bar]=Value0;  Buffer3[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=3;}}}break;                           
 case 2 :{switch(ind_N2)
         {case 3 : {Buffer4[bar]=Value0;  Buffer4[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=4;}break;
         default : {Buffer3[bar]=Value0;  Buffer3[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=3;}}}break;                           
 case 5 :{switch(ind_N2)
         {case 3 : {Buffer4[bar]=Value0;  Buffer4[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=4;}break;
         default : {Buffer3[bar]=Value0;  Buffer3[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=3;}}}break;       
 case 6 :{switch(ind_N2)
         {case 3 : {Buffer4[bar]=Value0;  Buffer4[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=4;}break;
         default : {Buffer3[bar]=Value0;  Buffer3[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=3;}}} }
}
//+================================================================================================+
void No_trend(){switch(ind_N1)
{   
 case 5 :          {Buffer5[bar]=Value0;  Buffer5[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=5;}break;
 case 6 :          {Buffer6[bar]=Value0;  Buffer6[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=6;}break;         
 case 1 :{switch(ind_N2)
         {case 5 : {Buffer6[bar]=Value0;  Buffer6[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=6;}break; 
         default : {Buffer5[bar]=Value0;  Buffer5[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=5;}}}break;                          
 case 2 :{switch(ind_N2)
         {case 5 : {Buffer6[bar]=Value0;  Buffer6[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=6;}break;
         default : {Buffer5[bar]=Value0;  Buffer5[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=5;}}}break;                           
 case 3 :{switch(ind_N2)
         {case 5 : {Buffer6[bar]=Value0;  Buffer6[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=6;}break;
         default : {Buffer5[bar]=Value0;  Buffer5[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=5;}}}break;         
 case 4 :{switch(ind_N2)
         {case 5 : {Buffer6[bar]=Value0;  Buffer6[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=6;}break;
         default : {Buffer5[bar]=Value0;  Buffer5[bar+1]=Value1;  ind_N2=ind_N1;  ind_N1=5;}}} }
}
//+================================================================================================+
                