|
PureBytes Links
Trading Reference Links
|
Hello,
The histogram graphs wash through the bands because
histogram style plots the lines always from zero
to value of graphx array.
To plot the band from array1 to array2 you can not simply
use bar style (2).
To plot such a band you would need to use style 128 (bar chart)
and redefine H/L arrays as shown in the code modifed by me
( note the last 4 lines ):
/*Custom Directional Movement Indicator*/
/*with Bullish and Bearish Alerts */
/*Afl Code by Anthony Faragasso */
MaxGraph=8;
/* You can change these variables */
pds=14;
smooth=5;
L1=PDI(pds) - MDI(pds);
L2=0;
L3=MA(L1,smooth);
Graph0=L1;
Graph1=L2;
Graph2=L3;
Graph2Style=Graph0Style=1+4;
Graph1Style=4+8;
/* BANDS */
PDS2=14;
SHIFT=2;
TOPBAND=BBandTop(L1,PDS2,SHIFT);
BOTBAND=BBandBot(L1,PDS2,SHIFT);
Graph3=TOPBAND;
Graph6=BOTBAND;
Graph3Style=Graph6Style=1+4;
Graph3Color=Graph6Color=13;
Title=Name()+ " CUSTOM DIRECTIONAL MOVEMENT =
"+"("+WriteVal(L1,FORMAT=1.2)+") " +" SIGNAL LINE =
"+"("+WriteVal(L3,FORMAT=1.2)+")"+ WriteIf(Cross( L1 , L2), " BULLISH CROSS
","")+WriteIf(Cross(L2 , L1)," BEARISH CROSS","")+WriteIf(Cross(L1,L3),"
BULLISH ALERT ","")+WriteIf(Cross(L3 , L1), " BEARISH
ALERT","")+WriteIf(L1 == L3, " NEUTRAL ","")+WriteIf(L1 <L3, " Market
Currently Bearish","")+WriteIf(L1 > L3," Market Currently Bullish ","");
// plot true cloud using bar graph
// as this redefines High Low arrays it must be the last statement in your
formula
// or you must preserve the original values in a temporary tables
High=TOPBAND;
Low=BOTBAND;
Graph4 = High;
Graph4Style = 128;
Best regards,
Tomasz Janeczko
amibroker.com
----- Original Message -----
From: "Anthony Faragasso" <ajf1111@xxxx>
To: <amibroker@xxxxxxxxxxxxxxx>
Sent: Monday, November 05, 2001 8:20 PM
Subject: Re: [amibroker] Indicator
> Tomasz,
>
> Here are the formulas as you can see they all wash through at some point.
>
> thank you
> anthony
>
> Tomasz Janeczko wrote:
>
> > Hello,
> >
> > Send me the formula - then I will be able to help you.
> >
> > Best regards,
> > Tomasz Janeczko
> > ===============
> > AmiBroker - the comprehensive share manager.
> > http://www.amibroker.com
> >
> > ----- Original Message -----
> > From: "Anthony Faragasso" <ajf1111@xxxx>
> > To: <amibroker@xxxxxxxxxxxxxxx>
> > Sent: Monday, November 05, 2001 5:54 PM
> > Subject: [amibroker] Indicator
> >
> > > Tomasz;
> > >
> > > Please See Attached file;
> > > any answers as to why the indicator washes through the bands. Several
of
> > > the indicators are doing this.
> > >
> > > Anthony
> > >
> > >
> > >
> > > Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/
> > >
> > >
> >
>
> --------------------------------------------------------------------------
------
> >
> >
> >
> >
> > Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>
----------------------------------------------------------------------------
----
> /*Floating Bars
> Using the following technique, you may have "floating bars" for
> Bollinger bands.
> Deleting last pair of you get the limits of Bollinger bands
> envelope.
> Deleting the first pair of you get the line of Close .
> Note : Do not change the numeration of graphs. The result will not be
> the same.*/
>
> MaxGraph=6;
> PDS=20;
> SHIFT=2;
> Graph0=C;
> Graph0BarColor=4;
> Graph1=C;
> Graph1Style=128;
> Graph1BarColor=1;
> Graph2=BBandBot( Close, PDS, SHIFT );
> Graph2Style=2;
> Graph2BarColor=0;
> Graph3=BBandTop( Close, PDS, SHIFT );
> Graph3Style=2;
> Graph3BarColor=3;
> Graph4=BBandTop( Close, PDS, SHIFT );
> Graph5=BBandBot( Close, PDS, SHIFT );
> Graph4Style=1;
> Graph5Style=1;
> Graph4BarColor=3;
> Graph5BarColor=3;
----------------------------------------------------------------------------
----
> /*Multiple Volatility */
> maxgraph = 8;
>
> graph0 = Stdev(log(C/ref(C,-1)),20)*Sqrt(365)*100;
> graph3 = graph0;
> graph3style =2;
> graph3color = 4;
>
> graph1 = Stdev(log(C/ref(C,-1)),90)*Sqrt(365)*100;
> graph2 = graph1;
> graph2style =2;
> graph2color =6;
>
>
> title =name() + " - / 20 / Day Volatility = " +" Red Line =" +" "
+writeval(graph0,format=1.2) + " %" + " , / 90 / Day Volatiltiy = "+" Blue
Line = " +writeval ( graph1,format=1.2) + " % ";
----------------------------------------------------------------------------
----
> /*Custom Directional Movement Indicator*/
> /*with Bullish and Bearish Alerts */
> /*Afl Code by Anthony Faragasso */
>
> MaxGraph=8;
> /* You can change these variables */
> pds=14;
> smooth=5;
>
> L1=PDI(pds) - MDI(pds);
> L2=0;
> L3=MA(L1,smooth);
>
> Graph0=L1;
> Graph1=L2;
> Graph2=L3;
>
> Graph2Style=Graph0Style=1+4;
> Graph1Style=4+8;
>
> /* BANDS */
> PDS2=14;
> SHIFT=2;
>
> TOPBAND=BBandTop(L1,PDS2,SHIFT);
> BOTBAND=BBandBot(L1,PDS2,SHIFT);
> Graph4=TOPBAND;
> Graph5=BOTBAND;
> Graph4Style=Graph5Style=2;
> Graph4Color=Graph5Color=4;
> Graph3=TOPBAND;
> Graph6=BOTBAND;
> Graph3Style=Graph6Style=1+4;
> Graph3Color=Graph6Color=13;
>
> Title=Name()+ " CUSTOM DIRECTIONAL MOVEMENT =
"+"("+WriteVal(L1,FORMAT=1.2)+") " +" SIGNAL LINE =
"+"("+WriteVal(L3,FORMAT=1.2)+")"+ WriteIf(Cross( L1 , L2), " BULLISH CROSS
","")+WriteIf(Cross(L2 , L1)," BEARISH CROSS","")+WriteIf(Cross(L1,L3),"
BULLISH ALERT ","")+WriteIf(Cross(L3 , L1), " BEARISH
ALERT","")+WriteIf(L1 == L3, " NEUTRAL ","")+WriteIf(L1 <L3, " Market
Currently Bearish","")+WriteIf(L1 > L3," Market Currently Bullish ","");
----------------------------------------------------------------------------
----
> /* Williams %R and 9 day Mov.avg.*/
>
> maxgraph =10;
>
> R = ((hhv(h,14) - C) /(hhv (h,14) -llv (l,14))) *-100;
> graph0 = R;
> graph1 =-30;
> graph2 =-70;
> graph3 =-90;
> graph4 =-10;
> graph5=ma(R , 9);
> graph5style = 1;
> graph5color =2;
> graph2style =1;
> graph3style =graph4style =2;
> graph3color = graph4color =6;
> graph2color = graph1color =7;
> /*x = barssince( cross( r, ma( r, 9)));
> y = barssince( cross( ma(r, 9), r));
> graph8 = ( x == 0 OR y == 0 ) * 30;*/
> title =name() + " -Williams %R: " +" Red Line " + writeval ( graph0)
+ " , " + date( );
>
|