Hi Reinsley.
Again thanks to you & sorry to bore you. Is it possible to
modification if i am click previous swing any bar , it will find
automatically swing top & bottom and plot retracement accordingly? If
yes, pl, post it.
Thanks
--- In [email protected] <mailto:amibroker%40yahoogroups.com>,
reinsley <reins...@...> wrote:
>
>
>
> Please find the formula below
>
> Best regards
>
> |_SECTION_BEGIN( "Fibonacci" );
> Offset = 5; //use two sheets: one with 5 and another with 7, or maybe
> other offset value
> Avgmov = Offset * MA( abs( ROC( *C*, 1 ) ), 20 );
> //per = LastValue( Avgmov );//original value
> per = Param( "Pivot %", 0.3, 0.01, 6, 0.01 );
> x = Cum( 1 );
> Range = 0.01;
> PS = TroughBars( *L*, per, 1 ) == 0;
> xa = LastValue( ValueWhen( PS, x, 1 ) );//x from last trough
> Ya = LastValue( ValueWhen( PS, *L*, 1 ) );//y (Low) last trough
> PR = PeakBars( *H*, per, 1 ) == 0;
> xb = LastValue( ValueWhen( PR, x, 1 ) );//x from last peak
> Yb = LastValue( ValueWhen( PR, *H*, 1 ) );//y (High) last peak
> Trough_ReTest = abs( ( *L* / ya ) - 1 ) < Range;
> Peak_ReTest = abs( ( *H* / yb ) - 1 ) < Range;
> Trough_Cross = Cross( ya, *C* );
> Peak_Cross = Cross( *C*, yb );
> //UP = upSwing DN = downSwing
> UP = xb > xa;
> //upSwing
> DN = xa > xb;
> //DownSwing
> RT23_6 = IIf( UP, yb - ( yb - ya ) * 0.236, IIf( DN, ya + ( yb - ya ) *
> 0.236, -1e10 ) );
> RT38_2 = IIf( UP, yb - ( yb - ya ) * 0.382, IIf( DN, ya + ( yb - ya ) *
> 0.382, -1e10 ) );
> RT50_0 = IIf( UP, yb - ( yb - ya ) * 0.500, IIf( DN, ya + ( yb - ya ) *
> 0.500, -1e10 ) );
> RT61_8 = IIf( UP, yb - ( yb - ya ) * 0.618, IIf( DN, ya + ( yb - ya ) *
> 0.618, -1e10 ) );
> RT78_6 = IIf( UP, yb - ( yb - ya ) * 0.786, IIf( DN, ya + ( yb - ya ) *
> 0.786, -1e10 ) );
> RT127_2 = IIf( UP, yb - ( yb - ya ) * 1.272, IIf( DN, ya + ( yb - ya
) *
> 1.272, -1e10 ) );
> RT161_8 = IIf( UP, yb - ( yb - ya ) * 1.618, IIf( DN, ya + ( yb - ya
) *
> 1.618, -1e10 ) );
> RT261_8 = IIf( UP, yb - ( yb - ya ) * 2.618, IIf( DN, ya + ( yb - ya
) *
> 2.618, -1e10 ) );
> RT = IIf( UP, -100 * ( yb - *L* ) / ( yb - ya ), 100 * ( *H* - ya ) / (
> yb - ya ) );//Retracement_Value
> InZone = *C*<yb & *C*>ya;
> Plot( IIf( x > xa, ya, -1e10 ), "", *colorBrown*, 1 + 8 );//"Bottom"
> Plot( IIf( x > xb, yb, -1e10 ), "", *colorBrown*, 1 + 8 );//"Top"
> xab = IIf( xb > xa, xb, xa );
> //Retracements
> Plot( IIf( x >= xab + 1, RT23_6, -1e10 ), "", *colorWhite*, 1
);//"23,6%
> Retr."
> Plot( IIf( x >= xab + 1, RT38_2, -1e10 ), "", *colorGreen*, 1
);//"38,2%
> Retr."
> Plot( IIf( x >= xab + 1, RT50_0, -1e10 ), "", *colorYellow*, 1
> );//"50,0% Retr."
> Plot( IIf( x >= xab + 1, RT61_8, -1e10 ), "", *colorRed*, 1 + 8
> );//"61,8% Retr."
> Plot( IIf( x >= xab + 1, RT78_6, -1e10 ), "", *colorBlue*, 1 + 8
> );//"78,6% Retr."
> Plot( IIf( x >= xab + 1, RT127_2, -1e10 ), "", *colorSkyblue*, 1 +
> *styleNoRescale* );//"127,2% Retr."
> Plot( IIf( x >= xab + 1, RT161_8, -1e10 ), "", *colorLavender*, 1 +
> *styleNoRescale* );//"161,8% Retr."
> Plot( IIf( x >= xab + 1, RT261_8, -1e10 ), "", *colorDarkGreen*, 1 +
> *styleNoRescale* );//"261,8% Retr."
> _SECTION_END();
> |
>
> Le 30/07/2010 19:01, prasantaroy36 a écrit :
> >
> >
> > Hi reinsley,
> >
> > Ok thanks for your quick respone. Pl, spare your time for post it. If
> > some modification required i will let you know.
> >
> > Thanks
> >
> > --- In [email protected]
<mailto:amibroker%40yahoogroups.com>
<mailto:amibroker%40yahoogroups.com>,
> > reinsley <reinsley@> wrote:
> > >
> > >
> > > I have one based on Zig param....
> > >
> > > Best regards
> > >
> > > Le 30/07/2010 11:03, prasantaroy36 a écrit :
> > > >
> > > > Hi,
> > > >
> > > > I want automatic plot FIb retarce in which high to low select
> > > > manually. So, Pl, pl, give afl in this regard.
> > > >
> > > > Thanks
> > > >
> > > >
> > >
> >
> >
>
