//+------------------------------------------------------------------+
//|                                           DoubleCCI-With_EMA.mq4 |
//|                   Copyright © 2005, Jason Robinson (jnrtrading). |
//|                                      http://www.jnrtrading.co.uk |
//+------------------------------------------------------------------+
//mod kino ff http://www.forexfactory.com/showthread.php?t=71075&page=6
//mod2009fxtsd

#property copyright "Copyright © 2005, Jason Robinson (jnrtrading)."
#property link      "http://www.jnrtrading.co.uk"

#property indicator_separate_window
#property indicator_buffers 8
#property indicator_color1 C'0,64,0'
#property indicator_color2 Maroon
#property indicator_color3 ForestGreen
#property indicator_color4 Red
#property indicator_color5 Lime
#property indicator_color6 Yellow
#property indicator_color7 Goldenrod
#property indicator_color8 DeepSkyBlue

#property indicator_width1 2
#property indicator_width2 2
#property indicator_width3 2
#property indicator_width4 2
#property indicator_width5 2   
#property indicator_width5 2
#property indicator_width6 2
#property indicator_width7 1 
#property indicator_width8 1 


#property indicator_level1 100
#property indicator_level2 250
#property indicator_level3 350
#property indicator_level4 -350
#property indicator_level5 -250
#property indicator_level6 -100

#property indicator_levelcolor DimGray

//---- input parameters
extern int EntryCCI_period = 22;
extern int TrendCCI_period = 88;
extern bool Levels_cross_Alert = true;
extern int  Alert_Level__includes_negative = 100;

extern bool Show_MAs = true;
extern int  MAencci_periode=5;
extern int  MAencci_mode=0;

extern int  MAtrcci_periode=5;
extern int  MAtrcci_mode=0;

extern bool Show_SMA_PriceDist = true;
extern int SMA_Price_periode=50;
extern int zoom=10000;


extern bool Automatic_timeframe_setting = false;
extern int M1_TrendCCI_period = 88;
extern int M1_EntryCCI_period = 22;
extern int M5_TrendCCI_period = 88;
extern int M5_EntryCCI_period = 22;
extern int M15_TrendCCI_period = 14;
extern int M15_EntryCCI_period = 6;
extern int M30_TrendCCI_period = 14;
extern int M30_EntryCCI_period = 6;
extern int H1_TrendCCI_period = 14;
extern int H1_EntryCCI_period = 6;
extern int H4_TrendCCI_period = 14;
extern int H4_EntryCCI_period = 6;
extern int D1_TrendCCI_period = 14;
extern int D1_EntryCCI_period = 6;
extern int W1_TrendCCI_period = 14;
extern int W1_EntryCCI_period = 6;
extern int MN_TrendCCI_period = 14;
extern int MN_EntryCCI_period = 6;



double TrendCCIBuffer[];
double CCIHistogramUpBuffer[];
double CCIHistogramUpUpBuffer[];
double CloseSmaBuffer[];

double CCIHistogramDownBuffer[];
double CCIHistogramDownDownBuffer[];

double EntryCCIBuffer[];
double SMA[];

//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
   SetIndexStyle (0, DRAW_HISTOGRAM);
   SetIndexBuffer(0, CCIHistogramUpBuffer);
   SetIndexStyle (1, DRAW_HISTOGRAM);
   SetIndexBuffer(1, CCIHistogramDownBuffer);

   SetIndexStyle (2, DRAW_HISTOGRAM);
   SetIndexBuffer(2, CCIHistogramUpUpBuffer);
   SetIndexStyle (3, DRAW_HISTOGRAM);
   SetIndexBuffer(3, CCIHistogramDownDownBuffer);
  
  
   SetIndexStyle (4, DRAW_LINE);
   SetIndexBuffer(4, TrendCCIBuffer);
   SetIndexStyle (5, DRAW_LINE);
   SetIndexBuffer(5, SMA);
   
   SetIndexStyle (6, DRAW_LINE);
   SetIndexBuffer(6, EntryCCIBuffer);
   SetIndexLabel (6,"entrycci"+EntryCCI_period);
   
   if(Show_SMA_PriceDist) 
   {  SetIndexStyle (7, DRAW_LINE);
      SetIndexBuffer(7, CloseSmaBuffer);
      SetIndexLabel(7,"Price-SMA "+SMA_Price_periode);
      
    }


   
   int lv = Alert_Level__includes_negative;

   SetIndexLabel(0,"trcci >0 &<" +lv);
   SetIndexLabel(1,"trcci <0 &>-"+lv);
   SetIndexLabel(2,"trcci >0 &>" +lv);
   SetIndexLabel(3,"trcci <0 &<-"+lv);
   
//   
   for(int b=0;b<indicator_buffers;b++)    SetIndexDrawBegin (b,TrendCCI_period);
   

//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//---- 
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start() {

   int limit, trendCCI, entryCCI;
   static datetime prevtime = 0;
   int counted_bars = IndicatorCounted();
//---- check for possible errors
   if(counted_bars < 0) return(-1);
//---- last counted bar will be recounted
   if(counted_bars > 0) counted_bars--;

   limit=Bars-counted_bars;
   
   if (Automatic_timeframe_setting) 
   {
      switch(Period()) 
      {
         case 1: trendCCI = M1_TrendCCI_period; entryCCI = M1_EntryCCI_period; break;
         case 5: trendCCI = M5_TrendCCI_period; entryCCI = M5_EntryCCI_period; break;
         case 15: trendCCI = M15_TrendCCI_period; entryCCI = M15_EntryCCI_period; break;
         case 30: trendCCI = M30_TrendCCI_period; entryCCI = M30_EntryCCI_period; break;
         case 60: trendCCI = H1_TrendCCI_period; entryCCI = H1_EntryCCI_period; break;
         case 240: trendCCI = H4_TrendCCI_period; entryCCI = H4_EntryCCI_period; break;
         case 1440: trendCCI = D1_TrendCCI_period; entryCCI = D1_EntryCCI_period; break;
         case 10080: trendCCI = W1_TrendCCI_period; entryCCI = W1_EntryCCI_period; break;
         case 43200: trendCCI = MN_TrendCCI_period; entryCCI = MN_EntryCCI_period; break;
      }
   }
   else 
      {
      trendCCI = TrendCCI_period;
      entryCCI = EntryCCI_period;
      }
//    IndicatorShortName("(TrendCCI: " + trendCCI + ", EntryCCI: " + entryCCI + ") ");   

   string trname   ="  MA("+MAtrcci_periode+") TrendCCI "+TrendCCI_period;
   string entrname ="  MA("+MAencci_periode+") EntryCCI "+EntryCCI_period;

      SetIndexLabel(4,trname);
      SetIndexLabel(5,entrname);

      IndicatorShortName(entrname+trname+" ");  
      
      
      
      
      for(int i = 0; i <= limit; i++) 
      {
        TrendCCIBuffer[i] = iCCI(NULL, 0, trendCCI, PRICE_TYPICAL, i);
      
      if (TrendCCIBuffer[i] >= 0 && TrendCCIBuffer[i] <= 100 )
         CCIHistogramUpBuffer[i] = TrendCCIBuffer[i];
      else
         CCIHistogramUpBuffer[i] = 0;
         
      if (TrendCCIBuffer[i] >= 100 )
         CCIHistogramUpUpBuffer[i] = TrendCCIBuffer[i];
      else
         CCIHistogramUpUpBuffer[i] = 0  ; 
    
      if (TrendCCIBuffer[i] < -100 )
         CCIHistogramDownDownBuffer[i] = TrendCCIBuffer[i];
      else
         CCIHistogramDownDownBuffer[i]=0;
         
      if (TrendCCIBuffer[i] < 0  && TrendCCIBuffer[i] >=-100)
         CCIHistogramDownBuffer[i] = TrendCCIBuffer[i];
      else
         CCIHistogramDownBuffer[i]=0;   
         
      
      EntryCCIBuffer[i] = iCCI(NULL, 0, entryCCI, PRICE_TYPICAL, i);
     
//     if(Show_SMA_PriceDist) 
      CloseSmaBuffer[i] =-zoom*(iMA(NULL,0,SMA_Price_periode,0,MODE_SMA,PRICE_CLOSE,i)-Close[i]);

      }

      

   
   if (Levels_cross_Alert) { int alv = Alert_Level__includes_negative;
      if (prevtime == Time[0]) {
         return(0);   
      }
      else {    
            if(EntryCCIBuffer[0] < -alv &&   TrendCCIBuffer[0] < -alv){  
            if(EntryCCIBuffer[1] >=-alv ||   TrendCCIBuffer[1] >= -alv) 
               Alert(Symbol(), " M", Period(), " Trend & Entry CCI both crossed Level -"+alv+" Down");
                  }
               
            if(EntryCCIBuffer[0] > alv &&   TrendCCIBuffer[0] > alv){  
            if(EntryCCIBuffer[1] <=alv ||   TrendCCIBuffer[1] <= alv) 
               Alert(Symbol(), " M", Period(), " Trend & Entry CCI both crossed Level +"+alv+" Up");
                  }
             prevtime = Time[0];
            }
  
     }
   
   
   
      if (Show_MAs == true) 
      {
         for(i=0; i<limit; i++)
            SMA[i] = iMAOnArray(EntryCCIBuffer, 0, MAencci_periode, 0, MAencci_mode, i);
         
         for(i=0; i<limit; i++)
           TrendCCIBuffer[i] = iMAOnArray(TrendCCIBuffer, 0, MAtrcci_periode, 0, MAtrcci_mode, i);
       } 

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