Digital_CCI_Woodies_v4
Download scriptThis script is designed to provide traders with a specialized visual tool for analyzing price momentum and volatility on a trading platform. By processing historical price data, it generates two distinct indicators that help identify whether the current market movement is significant relative to its recent history.
Core Logic Overview
The script operates by calculating two different "channels" of data simultaneously, using two different timeframes (periods) to give you a multi-layered view of the market. Here is how the logic flows from raw data to visual information:
1. Weighted Price Smoothing Instead of simply taking an average of recent prices, the script uses a sophisticated weighting system. It applies specific mathematical multipliers to the closing prices of the last 26 bars. This means that some recent price points carry more "weight" in the calculation than others, allowing the indicator to react more intelligently to current trends while still respecting historical context.
2. Moving Average Generation The script takes those weighted prices and calculates a smoothed "Moving Average." This represents the "baseline" or the "normal" path of the price. It does this for both your primary period (e.g., 14 bars) and your secondary, faster period (e.g., 6 bars).
3. Deviation and Relationship Analysis Once the averages are established, the script performs two critical secondary calculations:
- Relative Position: It measures how far the current price is sitting away from its moving average.
- Standard Deviation: It calculates the "spread" or volatility—essentially measuring how much the price typically bounces around that average.
4. The Final Output (The CCI) The final values you see on your screen are produced by dividing the Relative Position by the Standard Deviation.
How to Interpret the Results
By calculating the ratio between distance and volatility, the script produces a "Commodity Channel Index" (CCI). In non-technical terms:
- If the resulting number is very high, it tells you that the price is moving significantly further away from its average than usual (potential overbought territory).
- If the number is very low, it suggests the price is dropping further than usual relative to its volatility (potential oversold territory).
By providing two different lines on your chart—one based on a longer timeframe and one on a shorter timeframe—the script allows you to see both the "big picture" trend and the immediate, short-term momentum at a single glance.
/*-----------------------------+
| |
| Shared by www.Aptrafx.com |
| |
+------------------------------*/
//+------------------------------------------------------------------+
//| CCI.mq4 |
//| Ramdass programmed |
//| Digital filter from Kenny-Goodman |
//+------------------------------------------------------------------+
#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 DodgerBlue
#property indicator_color2 Red
//---- input parameters
extern int CCIPeriod=14;
extern int CCIPeriod2=6;
//---- buffers
double CCIBuffer[];
double RelBuffer[];
double DevBuffer[];
double MovBuffer[];
double CCIBuffer2[];
double RelBuffer2[];
double DevBuffer2[];
double MovBuffer2[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
string short_name;
//---- 3 additional buffers are used for counting.
IndicatorBuffers(8);
SetIndexBuffer(2, RelBuffer);
SetIndexBuffer(3, DevBuffer);
SetIndexBuffer(4, MovBuffer);
SetIndexBuffer(5, RelBuffer2);
SetIndexBuffer(6, DevBuffer2);
SetIndexBuffer(7, MovBuffer2);
//---- indicator lines
SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,2,SteelBlue);
SetIndexBuffer(0,CCIBuffer);
SetIndexStyle(1,DRAW_LINE,STYLE_SOLID,1,Red);
SetIndexBuffer(1,CCIBuffer2);
//---- name for DataWindow and indicator subwindow label
short_name="CCI("+CCIPeriod+")";
IndicatorShortName(short_name);
SetIndexLabel(0,short_name);
//----
SetIndexDrawBegin(0,CCIPeriod);
SetIndexDrawBegin(1,CCIPeriod2);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Commodity Channel Index |
//+------------------------------------------------------------------+
int start()
{
int i,k,x,s,counted_bars=IndicatorCounted();
double price,sum,mul;
if(Bars<=CCIPeriod) return(0);
//---- initial zero
if(counted_bars<1)
{
for(i=1;i<=CCIPeriod;i++) CCIBuffer[Bars-i]=0.0;
for(i=1;i<=CCIPeriod;i++) DevBuffer[Bars-i]=0.0;
for(i=1;i<=CCIPeriod;i++) MovBuffer[Bars-i]=0.0;
for(i=1;i<=CCIPeriod2;i++) CCIBuffer2[Bars-i]=0.0;
for(i=1;i<=CCIPeriod2;i++) DevBuffer2[Bars-i]=0.0;
for(i=1;i<=CCIPeriod2;i++) MovBuffer2[Bars-i]=0.0;
}
//---- last counted bar will be recounted
int limit=Bars-counted_bars;
if(counted_bars>0) limit++;
//---- moving average
sum=0;
int pos=Bars-counted_bars-1;
//---- initial accumulation
if(pos<CCIPeriod) pos=CCIPeriod;
for(i=1;i<CCIPeriod;i++,pos--)
sum+=0.225654509516691*Close[pos+0]
+0.219241264585139*Close[pos+1]
+0.200688479689899*Close[pos+2]
+0.171992513765923*Close[pos+3]
+0.136270408129286*Close[pos+4]
+0.0971644469103302*Close[pos+5]
+0.0585064796603445*Close[pos+6]
+0.0237448140297671*Close[pos+7]
-0.00442869436477854*Close[pos+8]
-0.0243636783229045*Close[pos+9]
-0.0355617365834807*Close[pos+10]
-0.0386306817434228*Close[pos+11]
-0.0350564564449243*Close[pos+12]
-0.0268963490805002*Close[pos+13]
-0.0164157887033052*Close[pos+14]
-0.00573862260748731*Close[pos+15]
+0.00342620684434*Close[pos+16]
+0.00996574022237624*Close[pos+17]
+0.0134223280887248*Close[pos+18]
+0.0139394004237978*Close[pos+19]
+0.0121149938483286*Close[pos+20]
+0.00883315067608292*Close[pos+21]
+0.0050235681107559*Close[pos+22]
+0.00151954406404245*Close[pos+23]
-0.00108567173532015*Close[pos+24]
-0.0133301689797048*Close[pos+25];
//---- main calculation loop
while(pos>=0)
{
sum+=0.225654509516691*Close[pos+0]
+0.219241264585139*Close[pos+1]
+0.200688479689899*Close[pos+2]
+0.171992513765923*Close[pos+3]
+0.136270408129286*Close[pos+4]
+0.0971644469103302*Close[pos+5]
+0.0585064796603445*Close[pos+6]
+0.0237448140297671*Close[pos+7]
-0.00442869436477854*Close[pos+8]
-0.0243636783229045*Close[pos+9]
-0.0355617365834807*Close[pos+10]
-0.0386306817434228*Close[pos+11]
-0.0350564564449243*Close[pos+12]
-0.0268963490805002*Close[pos+13]
-0.0164157887033052*Close[pos+14]
-0.00573862260748731*Close[pos+15]
+0.00342620684434*Close[pos+16]
+0.00996574022237624*Close[pos+17]
+0.0134223280887248*Close[pos+18]
+0.0139394004237978*Close[pos+19]
+0.0121149938483286*Close[pos+20]
+0.00883315067608292*Close[pos+21]
+0.0050235681107559*Close[pos+22]
+0.00151954406404245*Close[pos+23]
-0.00108567173532015*Close[pos+24]
-0.0133301689797048*Close[pos+25];
MovBuffer[pos]=sum/CCIPeriod;
sum-=0.225654509516691*Close[pos+CCIPeriod-1+0]
+0.219241264585139*Close[pos+CCIPeriod-1+1]
+0.200688479689899*Close[pos+CCIPeriod-1+2]
+0.171992513765923*Close[pos+CCIPeriod-1+3]
+0.136270408129286*Close[pos+CCIPeriod-1+4]
+0.0971644469103302*Close[pos+CCIPeriod-1+5]
+0.0585064796603445*Close[pos+CCIPeriod-1+6]
+0.0237448140297671*Close[pos+CCIPeriod-1+7]
-0.00442869436477854*Close[pos+CCIPeriod-1+8]
-0.0243636783229045*Close[pos+CCIPeriod-1+9]
-0.0355617365834807*Close[pos+CCIPeriod-1+10]
-0.0386306817434228*Close[pos+CCIPeriod-1+11]
-0.0350564564449243*Close[pos+CCIPeriod-1+12]
-0.0268963490805002*Close[pos+CCIPeriod-1+13]
-0.0164157887033052*Close[pos+CCIPeriod-1+14]
-0.00573862260748731*Close[pos+CCIPeriod-1+15]
+0.00342620684434*Close[pos+CCIPeriod-1+16]
+0.00996574022237624*Close[pos+CCIPeriod-1+17]
+0.0134223280887248*Close[pos+CCIPeriod-1+18]
+0.0139394004237978*Close[pos+CCIPeriod-1+19]
+0.0121149938483286*Close[pos+CCIPeriod-1+20]
+0.00883315067608292*Close[pos+CCIPeriod-1+21]
+0.0050235681107559*Close[pos+CCIPeriod-1+22]
+0.00151954406404245*Close[pos+CCIPeriod-1+23]
-0.00108567173532015*Close[pos+CCIPeriod-1+24]
-0.0133301689797048*Close[pos+CCIPeriod-1+25];
pos--;
}
//---- moving average2
sum=0;
pos=Bars-counted_bars-1;
//---- initial accumulation
if(pos<CCIPeriod2) pos=CCIPeriod2;
for(i=1;i<CCIPeriod2;i++,pos--)
sum+=0.225654509516691*Close[pos+0]
+0.219241264585139*Close[pos+1]
+0.200688479689899*Close[pos+2]
+0.171992513765923*Close[pos+3]
+0.136270408129286*Close[pos+4]
+0.0971644469103302*Close[pos+5]
+0.0585064796603445*Close[pos+6]
+0.0237448140297671*Close[pos+7]
-0.00442869436477854*Close[pos+8]
-0.0243636783229045*Close[pos+9]
-0.0355617365834807*Close[pos+10]
-0.0386306817434228*Close[pos+11]
-0.0350564564449243*Close[pos+12]
-0.0268963490805002*Close[pos+13]
-0.0164157887033052*Close[pos+14]
-0.00573862260748731*Close[pos+15]
+0.00342620684434*Close[pos+16]
+0.00996574022237624*Close[pos+17]
+0.0134223280887248*Close[pos+18]
+0.0139394004237978*Close[pos+19]
+0.0121149938483286*Close[pos+20]
+0.00883315067608292*Close[pos+21]
+0.0050235681107559*Close[pos+22]
+0.00151954406404245*Close[pos+23]
-0.00108567173532015*Close[pos+24]
-0.0133301689797048*Close[pos+25];
//---- main calculation loop
while(pos>=0)
{
sum+=0.225654509516691*Close[pos+0]
+0.219241264585139*Close[pos+1]
+0.200688479689899*Close[pos+2]
+0.171992513765923*Close[pos+3]
+0.136270408129286*Close[pos+4]
+0.0971644469103302*Close[pos+5]
+0.0585064796603445*Close[pos+6]
+0.0237448140297671*Close[pos+7]
-0.00442869436477854*Close[pos+8]
-0.0243636783229045*Close[pos+9]
-0.0355617365834807*Close[pos+10]
-0.0386306817434228*Close[pos+11]
-0.0350564564449243*Close[pos+12]
-0.0268963490805002*Close[pos+13]
-0.0164157887033052*Close[pos+14]
-0.00573862260748731*Close[pos+15]
+0.00342620684434*Close[pos+16]
+0.00996574022237624*Close[pos+17]
+0.0134223280887248*Close[pos+18]
+0.0139394004237978*Close[pos+19]
+0.0121149938483286*Close[pos+20]
+0.00883315067608292*Close[pos+21]
+0.0050235681107559*Close[pos+22]
+0.00151954406404245*Close[pos+23]
-0.00108567173532015*Close[pos+24]
-0.0133301689797048*Close[pos+25];
MovBuffer2[pos]=sum/CCIPeriod2;
sum-=0.225654509516691*Close[pos+CCIPeriod2-1+0]
+0.219241264585139*Close[pos+CCIPeriod2-1+1]
+0.200688479689899*Close[pos+CCIPeriod2-1+2]
+0.171992513765923*Close[pos+CCIPeriod2-1+3]
+0.136270408129286*Close[pos+CCIPeriod2-1+4]
+0.0971644469103302*Close[pos+CCIPeriod2-1+5]
+0.0585064796603445*Close[pos+CCIPeriod2-1+6]
+0.0237448140297671*Close[pos+CCIPeriod2-1+7]
-0.00442869436477854*Close[pos+CCIPeriod2-1+8]
-0.0243636783229045*Close[pos+CCIPeriod2-1+9]
-0.0355617365834807*Close[pos+CCIPeriod2-1+10]
-0.0386306817434228*Close[pos+CCIPeriod2-1+11]
-0.0350564564449243*Close[pos+CCIPeriod2-1+12]
-0.0268963490805002*Close[pos+CCIPeriod2-1+13]
-0.0164157887033052*Close[pos+CCIPeriod2-1+14]
-0.00573862260748731*Close[pos+CCIPeriod2-1+15]
+0.00342620684434*Close[pos+CCIPeriod2-1+16]
+0.00996574022237624*Close[pos+CCIPeriod2-1+17]
+0.0134223280887248*Close[pos+CCIPeriod2-1+18]
+0.0139394004237978*Close[pos+CCIPeriod2-1+19]
+0.0121149938483286*Close[pos+CCIPeriod2-1+20]
+0.00883315067608292*Close[pos+CCIPeriod2-1+21]
+0.0050235681107559*Close[pos+CCIPeriod2-1+22]
+0.00151954406404245*Close[pos+CCIPeriod2-1+23]
-0.00108567173532015*Close[pos+CCIPeriod2-1+24]
-0.0133301689797048*Close[pos+CCIPeriod2-1+25];
pos--;
}
//---- standard deviations
i=Bars-CCIPeriod+1;
if(counted_bars>CCIPeriod-1) i=Bars-counted_bars-1;
mul=0.015/CCIPeriod;
while(i>=0)
{
sum=0.0;
k=i+CCIPeriod-1;
while(k>=i)
{
price=0.225654509516691*Close[k+0]
+0.219241264585139*Close[k+1]
+0.200688479689899*Close[k+2]
+0.171992513765923*Close[k+3]
+0.136270408129286*Close[k+4]
+0.0971644469103302*Close[k+5]
+0.0585064796603445*Close[k+6]
+0.0237448140297671*Close[k+7]
-0.00442869436477854*Close[k+8]
-0.0243636783229045*Close[k+9]
-0.0355617365834807*Close[k+10]
-0.0386306817434228*Close[k+11]
-0.0350564564449243*Close[k+12]
-0.0268963490805002*Close[k+13]
-0.0164157887033052*Close[k+14]
-0.00573862260748731*Close[k+15]
+0.00342620684434*Close[k+16]
+0.00996574022237624*Close[k+17]
+0.0134223280887248*Close[k+18]
+0.0139394004237978*Close[k+19]
+0.0121149938483286*Close[k+20]
+0.00883315067608292*Close[k+21]
+0.0050235681107559*Close[k+22]
+0.00151954406404245*Close[k+23]
-0.00108567173532015*Close[k+24]
-0.0133301689797048*Close[k+25];
sum+=MathAbs(price-MovBuffer[i]);
k--;
}
DevBuffer[i]=sum*mul;
i--;
}
i=Bars-CCIPeriod+1;
if(counted_bars>CCIPeriod-1) i=Bars-counted_bars-1;
while(i>=0)
{
price=0.225654509516691*Close[i+0]
+0.219241264585139*Close[i+1]
+0.200688479689899*Close[i+2]
+0.171992513765923*Close[i+3]
+0.136270408129286*Close[i+4]
+0.0971644469103302*Close[i+5]
+0.0585064796603445*Close[i+6]
+0.0237448140297671*Close[i+7]
-0.00442869436477854*Close[i+8]
-0.0243636783229045*Close[i+9]
-0.0355617365834807*Close[i+10]
-0.0386306817434228*Close[i+11]
-0.0350564564449243*Close[i+12]
-0.0268963490805002*Close[i+13]
-0.0164157887033052*Close[i+14]
-0.00573862260748731*Close[i+15]
+0.00342620684434*Close[i+16]
+0.00996574022237624*Close[i+17]
+0.0134223280887248*Close[i+18]
+0.0139394004237978*Close[i+19]
+0.0121149938483286*Close[i+20]
+0.00883315067608292*Close[i+21]
+0.0050235681107559*Close[i+22]
+0.00151954406404245*Close[i+23]
-0.00108567173532015*Close[i+24]
-0.0133301689797048*Close[i+25];
RelBuffer[i]=price-MovBuffer[i];
i--;
}
//---- standard deviations2
i=Bars-CCIPeriod2+1;
if(counted_bars>CCIPeriod2-1) i=Bars-counted_bars-1;
mul=0.015/CCIPeriod2;
while(i>=0)
{
sum=0.0;
k=i+CCIPeriod2-1;
while(k>=i)
{
price=0.225654509516691*Close[k+0]
+0.219241264585139*Close[k+1]
+0.200688479689899*Close[k+2]
+0.171992513765923*Close[k+3]
+0.136270408129286*Close[k+4]
+0.0971644469103302*Close[k+5]
+0.0585064796603445*Close[k+6]
+0.0237448140297671*Close[k+7]
-0.00442869436477854*Close[k+8]
-0.0243636783229045*Close[k+9]
-0.0355617365834807*Close[k+10]
-0.0386306817434228*Close[k+11]
-0.0350564564449243*Close[k+12]
-0.0268963490805002*Close[k+13]
-0.0164157887033052*Close[k+14]
-0.00573862260748731*Close[k+15]
+0.00342620684434*Close[k+16]
+0.00996574022237624*Close[k+17]
+0.0134223280887248*Close[k+18]
+0.0139394004237978*Close[k+19]
+0.0121149938483286*Close[k+20]
+0.00883315067608292*Close[k+21]
+0.0050235681107559*Close[k+22]
+0.00151954406404245*Close[k+23]
-0.00108567173532015*Close[k+24]
-0.0133301689797048*Close[k+25];
sum+=MathAbs(price-MovBuffer2[i]);
k--;
}
DevBuffer2[i]=sum*mul;
i--;
}
i=Bars-CCIPeriod2+1;
if(counted_bars>CCIPeriod2-1) i=Bars-counted_bars-1;
while(i>=0)
{
price=0.225654509516691*Close[i+0]
+0.219241264585139*Close[i+1]
+0.200688479689899*Close[i+2]
+0.171992513765923*Close[i+3]
+0.136270408129286*Close[i+4]
+0.0971644469103302*Close[i+5]
+0.0585064796603445*Close[i+6]
+0.0237448140297671*Close[i+7]
-0.00442869436477854*Close[i+8]
-0.0243636783229045*Close[i+9]
-0.0355617365834807*Close[i+10]
-0.0386306817434228*Close[i+11]
-0.0350564564449243*Close[i+12]
-0.0268963490805002*Close[i+13]
-0.0164157887033052*Close[i+14]
-0.00573862260748731*Close[i+15]
+0.00342620684434*Close[i+16]
+0.00996574022237624*Close[i+17]
+0.0134223280887248*Close[i+18]
+0.0139394004237978*Close[i+19]
+0.0121149938483286*Close[i+20]
+0.00883315067608292*Close[i+21]
+0.0050235681107559*Close[i+22]
+0.00151954406404245*Close[i+23]
-0.00108567173532015*Close[i+24]
-0.0133301689797048*Close[i+25];
RelBuffer2[i]=price-MovBuffer2[i];
i--;
}
//---- cci counting
i=Bars-CCIPeriod+1;
if(counted_bars>CCIPeriod-1) i=Bars-counted_bars-1;
while(i>=0)
{
if(DevBuffer[i]==0.0) CCIBuffer[i]=0.0;
else CCIBuffer[i]=RelBuffer[i]/DevBuffer[i];
i--;
}
//---- cci counting2
i=Bars-CCIPeriod2+1;
if(counted_bars>CCIPeriod2-1) i=Bars-counted_bars-1;
while(i>=0)
{
if(DevBuffer2[i]==0.0) CCIBuffer2[i]=0.0;
else CCIBuffer2[i]=RelBuffer2[i]/DevBuffer2[i];
i--;
}
//----
return(0);
}
//+------------------------------------------------------------------+
Comments