[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [amibroker] Indicator



PureBytes Links

Trading Reference Links

Hi tomasz;

Tried inserting the 4 lines of code, but the indicator still washed through.
Will continue....thank you for the direction..

Anthony.

Tomasz Janeczko wrote:

> 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( );
> >
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/