|
PureBytes Links
Trading Reference Links
|
Hi Bruiser
Here is what I use.
Regards
Johno (Biker32)
/* Woodie's CCI V3*/
//Standard CCI
ST = Param( "CCI", 14, 9, 34, 1 );
//Turbo CCI
T = Param( "TCCI", 6, 6, 12, 1 );
MaxGraph = 5;
LSMA25 = LinearReg( Close, 25 );
LSMA45 = LinearReg( Close, 45 );
//Plot Standard CCI
B=Cross(CCI(ST),0);
D=Cross(0,CCI(ST));
COL=IIf(BarsSince(B)>4 AND CCI(ST)>0,colorGreen,IIf(BarsSince(D)>4
AND CCI(ST)<0,colorRed,colorPink)) ;
Plot(CCI(ST)," ",COL,styleHistogram);
Plot(CCI (ST),"Standard",colorBlack,styleThick);
//Plots Turbo CCI
Plot(CCI (T),"Turbo",colorYellow,styleLine);
// Plot 0 Line Ribbon
Plot(3,"ribbon", IIf (C>LSMA25,
colorGreen,colorRed),styleArea|styleNoLabel, 1, 1000 );
// Plot range lines
Plot(200,"",colorRed);
Plot(-200,"",colorRed);
Plot(100,"",colorBlue);
Plot(-100,"",colorBlue);
PlotGrid(50,colorBlack);
PlotGrid(-50,colorBlack);
PlotGrid(150,colorBlack);
PlotGrid(-150,colorBlack);
Title = " \\c55 " + Name () + " " + FullName() + " " + "CCI
period" + " =" + WriteVal(ST) + "\n" + "\\c42" + " Turbo CCI = " +
WriteVal(T);
/******************************/
--- In amibroker@xxxxxxxxxxxxxxx, "bruiserbbq" <bruiserbbq@xxxx>
wrote:
> Hi gang, below is the code I use for Woddies CCI with a 25
LinearReg
> ribbon at the base of the chart...is it possible to move the
ribbon
> from the base to the zero line of the CCI? Here's the code:
>
>
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
>
> /*red bars : downtrend
> **green bars: uptrend
> **blue bars : trading-range
> */
> T = 14;
> Title = "301-4 " + Name () + " " + FullName() + " "
> + "CCI" + " 14 " + "periods:" + WriteVal(T);
> MaxGraph = 5;
> Graph2 = CCI (T);
>
> Uptrend = 100; Downtrend = -100;
>
> Graph2BarColor = IIf (Graph2 > uptrend, colorGreen,
> IIf (Graph2 < downtrend,30,30));
>
> Graph4 = Graph2;
> Graph4Style = 4;
>
> Buy = Cross (Graph2, 0) AND (Ref (Graph2,-1) < 0) AND (Ref
(Graph2,-
> 2) < 0)AND
> (Ref (Graph2,-3) < 0) AND (LLV (RSI(9),10) < 30) AND Cross (RSI
> (9),50);
> Plot(CCI(6),"C2",4);
> Plot(200,"My line",colorRed);
> Plot(-200,"My line",colorRed);
> Plot(100,"My line",colorWhite);
> Plot(-100,"My line",colorWhite);
> Plot(0,"My line",colorBlack);
> PlotGrid(50,colorBlack);
> PlotGrid(-50,colorBlack);
>
> LSMA25 = LinearReg( Close, 25 );
>
> mycolor25 = IIf(C<Lsma25, colorRed, 5);
>
>
>
> Plot(10,"ribbon", mycolor25 /*IIf(MA(C,8)<MA(C,55)*/
>
> ,styleOwnScale|styleArea|styleNoLabel, - 0.5,
>
> 1000 );
>
> xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
>
> Regards Bruiser
------------------------ Yahoo! Groups Sponsor --------------------~-->
Yahoo! Domains - Claim yours for only $14.70
http://us.click.yahoo.com/Z1wmxD/DREIAA/yQLSAA/GHeqlB/TM
--------------------------------------------------------------------~->
Check AmiBroker web page at:
http://www.amibroker.com/
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> To unsubscribe from this group, send an email to:
amibroker-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|