hello everyone
i got this AFl from ami broker library site and i like you AFL very much and its help me lots.. now if you don't mind...would you please help me to solve this Afl to modify something...what i actually need all i describe in this jpg picture which i attached here and i know this is very easy to solve for you ....may god bless you.
Regards
Rinku
AFL Code:
_SECTION_BEGIN("Williams %R with 9 period signal line");
//------------------------------------------------------------------------------
//
// Formula Name: Williams %R with 9 period signal line
// Author/Uploader: Anthony Faragasso
// E-mail: [email protected]
// Date/Time Added: 2001-11-11 07:31:44
// Origin:
// Keywords:
// Level: basic
// Flags: indicator
// Formula URL: http://www.amibroker.com/library/formula.php?id=133
// Details URL: http://www.amibroker.com/library/detail.php?id=133
/* Williams %R and 9 day Mov.avg.*/
/* by Anthony Faragasso */
MaxGraph =10;
tr=Param("tr",9,1,60,1);
R = ((HHV(H,tr) - C) /(HHV (H,tr) -LLV (L,tr))) *-100;
Graph0 = r;
Graph1 =-30;
Graph2 =-70;
Graph3 =-90;
Graph4 =-10;
Graph5=MA(R , 9);
Graph5Style = 1+4;
Graph5Color =7;
Graph0Style=1+4;
Graph1Style =Graph2Style= 1;
Graph3Style =Graph4Style =4;
Graph3Color = Graph4Color =6;
Graph2Color = Graph1Color =10;
Plot(-40,"",colorGreen,styleLine);
Buy= R>-30 ;
Sell= R<-40 ;
Buy=ExRem(Buy,Sell); Sell=ExRem(Sell,Buy);
PlotShapes( shapeUpArrow*Buy , colorGreen ,0);
PlotShapes( shapeDownArrow*Sell , colorWhite ,0);
/*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: " +" % R Line " +"("+ WriteVal ( Graph0,format=1.2)+")"+ " Signal Line " + ""+"("+WriteVal(Graph5,format=1.2)+")" +" , " + Date( );
_SECTION_END();
i got this AFl from ami broker library site and i like you AFL very much and its help me lots.. now if you don't mind...would you please help me to solve this Afl to modify something...what i actually need all i describe in this jpg picture which i attached here and i know this is very easy to solve for you ....may god bless you.
Regards
Rinku
AFL Code:
_SECTION_BEGIN("Williams %R with 9 period signal line");
//------------------------------------------------------------------------------
//
// Formula Name: Williams %R with 9 period signal line
// Author/Uploader: Anthony Faragasso
// E-mail: [email protected]
// Date/Time Added: 2001-11-11 07:31:44
// Origin:
// Keywords:
// Level: basic
// Flags: indicator
// Formula URL: http://www.amibroker.com/library/formula.php?id=133
// Details URL: http://www.amibroker.com/library/detail.php?id=133
/* Williams %R and 9 day Mov.avg.*/
/* by Anthony Faragasso */
MaxGraph =10;
tr=Param("tr",9,1,60,1);
R = ((HHV(H,tr) - C) /(HHV (H,tr) -LLV (L,tr))) *-100;
Graph0 = r;
Graph1 =-30;
Graph2 =-70;
Graph3 =-90;
Graph4 =-10;
Graph5=MA(R , 9);
Graph5Style = 1+4;
Graph5Color =7;
Graph0Style=1+4;
Graph1Style =Graph2Style= 1;
Graph3Style =Graph4Style =4;
Graph3Color = Graph4Color =6;
Graph2Color = Graph1Color =10;
Plot(-40,"",colorGreen,styleLine);
Buy= R>-30 ;
Sell= R<-40 ;
Buy=ExRem(Buy,Sell); Sell=ExRem(Sell,Buy);
PlotShapes( shapeUpArrow*Buy , colorGreen ,0);
PlotShapes( shapeDownArrow*Sell , colorWhite ,0);
/*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: " +" % R Line " +"("+ WriteVal ( Graph0,format=1.2)+")"+ " Signal Line " + ""+"("+WriteVal(Graph5,format=1.2)+")" +" , " + Date( );
_SECTION_END();