Stock Portfolio Organizer

The ultimate porfolio management solution.

Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
For Portfolio Manager Click Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

CCI Woodies Style for Amibroker (AFL)

Rating:
3 / 5 (Votes 3)
Tags:
oscillator, amibroker

This CCI chart incorporates some of the features seen on a Woodies CCI Chart.

Indicator / Formula

Copy & Paste Friendly
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
_SECTION_BEGIN("CCI Woodies Style");
//------------------------------------------------------------------------------
//
//  Formula Name:    CCI Woodies Style
//  Author/Uploader: Larry Jameson
//  E-mail:          cljameson@hotmail.com
//
//------------------------------------------------------------------------------
//
// 
//
//------------------------------------------------------------------------------
 
///////////////////////////////
// CCI Woodies Style - Coded by Wring
// Amibroker 4.63.1
///////////////////////////////
//
// Note: Set Custom Scaling in dialog just below this dialogue box
//       to Min -350, Max +350
// 
//   Set Background color to DarkOliveGreen
//   Set Axes color to white
//
///////////////////////////////
  
 
z = CCI(14);
LSMA = LinearReg(C, 25 );
EMA34 = EMA(C,34);
 
Title = Interval(2) + " " + Name() + ", " + EncodeColor(colorOrange) +
            "CCI 14=" + round(z) + ", " + EncodeColor(colorLightBlue) +
            "CCI 6=" + round(CCI(6)) + EncodeColor(colorPink) +
            "\nPrice=" + H + ", " + L + ", " + C +
            EncodeColor(colorWhite) + " " + Date();
 
// Colour the bars for Woodies Trend Following
Plusbars = BarsSince(z < 0);
Minusbars = BarsSince(z > 0);
TrendBarCount = 5;
for( i = 0; i < BarCount; i++ )
{
    if (Plusbars[i] >= TrendBarCount)
        Color[i] = colorGreen;
    else
        if (Minusbars[i] >= TrendBarCount)
            Color[i] = colorRed;
        else
            Color[i] = colorBlack;
}
 
// CCI Histogram
Plot(z,"",Color,styleHistogram | styleNoLabel);
// CCI Line
Plot(z,"CCI 14",colorWhite,styleLine | styleNoLabel | styleThick);
// Turbo CCI
Plot(CCI(6),"CCI 6",colorLightBlue,styleLine styleNoLabel);
// zero line 25lsma
Plot(0,"",IIf(C > LSMA,colorGreen,IIf(C<LSMA,colorRed,colorBlack)),
                 styleThick | styleNoLabel);
// Print the price label - Note div by 1000 to position price near 0 line
Plot(Prec(C / 1000,3),"",
        IIf(C >=Ref(C,-1),colorGreen,colorRed),styleNoLine);
 
// Set up color for the 100s, green if 34ema above red if below
Color = IIf(C>EMA34,colorGreen,
        IIf(C==EMA34,colorBlack,colorRed));
// Plot the 100s
Plot(100,"",Color,styleDots |styleNoLine | styleNoLabel | styleThick);
Plot(-100,"",Color,styleDots |styleNoLine | styleNoLabel | styleThick);
// Plot the 50s
PlotGrid(50,colorTeal);
PlotGrid(-50, colorTeal);
// Plot the 200s
PlotGrid(200,colorTeal);
PlotGrid(-200,colorTeal);
// Plot the 300s
PlotGrid(-300,colorTeal);
PlotGrid(300,colorTeal);
_SECTION_END();

0 comments

Leave Comment

Please login here to leave a comment.

Back