Hello Don, Thanks for the code. It's a nice training example for explorer; updated to use the latest features. I haven't been game to try Alan's AFL code 'I am lost' not having read the book on how to write VB in Xcel.
A small tip, in case you haven't noticed it. To scroll through the info page symbol by symbol: select info view in workspace display ticker tool bar select the symbol in the ticker box on ticker tool bar (symbol is highlighted in blue) use the keyboard down arrow to scroll down through the hidden symbol list and vice versa. BrianB. --- In [email protected], "Don Lindberg" <[EMAIL PROTECTED]> wrote: > > // This is a sample Exploration using the Fundamental Data collected > by AmiBroker. Written by Don Lindberg 08-16-2006 > // Exploration is run against all symbols and all quotations (the > Status("lastbarintest") setting limits output to current date.) > // I have also include some calculations on Shares Short at bottom, > just uncomment to use. > // I did this to show that even a programming dummy can create a > useful Exploration. Play around make some changes, learn and enjoy! > // To Use, just copy everything into your Formula Editor save to a > name that makes sense to you, then run the Exploration. > > EPS = GetFnData ("EPS"); > EPSEstCurrent = GetFnData("EPSEstCurrentYear") ; > EPSEstNext = GetFnData ("EPSEstNextYear" ); > PEGRatio = GetFnData("PEGRatio"); > SharesOut = GetFnData("SharesOut"); > SharesShort = GetFnData("SharesShort"); > SharesShortPrev = GetFnData("SharesShortPrevMonth"); > SharesShortChg= SharesShortPrev -SharesShort ; > BookValue = GetFnData("BookValuePerShare"); > ReturnOnEquity = GetFnData("ReturnOnEquity"); > GrossProfit = GetFnData("GrossProfitPerShare"); > ProfitMargin = GetFnData("ProfitMargin"); > OneYrTarget = GetFnData("OneYearTargetPrice"); > PE = Close / EPS; > UpSidePotential = 100 * ((EPSEstNext / EPS)-1); > ESPEstChange =EPSEstNext -EPSEstCurrent; > InstitutionPercent = GetFnData ("InstitutionHoldPercent"); > > Filter = Close <= 50 AND Close <= OneYrTarget AND UpSidePotential > > 1 > AND ReturnOnEquity > 1 AND GrossProfit > 1 AND ProfitMargin > 1 > AND ESPEstChange > 1 AND Status("lastbarintest"); > > AddColumn (Close, "Close", 1.3); > AddColumn (InstitutionPercent, "InstitutionPercent", 1.2); > AddColumn (PE, "CalculatedPE", 1.2); > AddColumn (OneYrTarget, "OneYrTarget", 1.2); > AddColumn (UpSidePotential, "UpSidePotential", 1.2); > AddColumn (BookValue, "BookValue",1.2); > AddColumn (ReturnOnEquity,"ReturnOnEquity",1.2); > AddColumn (GrossProfit, "GrossProfitPerShare",1.2); > AddColumn (ProfitMargin, "ProfitMargin",1.2); > AddColumn (EPS, "EPSCurrent", 1.2); > AddColumn (ESPEstChange, "ESPEstChange", 1.2); > //AddColumn (SharesShort, "SharesShort", 1); > //AddColumn (SharesShortPrev, "SharesShortPrev", 1); > //AddColumn (SharesShortChg, "SharesShortChg", 1); > ------------------------ Yahoo! Groups Sponsor --------------------~--> Great things are happening at Yahoo! Groups. See the new email design. http://us.click.yahoo.com/TISQkA/hOaOAA/yQLSAA/GHeqlB/TM --------------------------------------------------------------------~-> Please note that this group is for discussion between users only. To get support from AmiBroker please send an e-mail directly to SUPPORT {at} amibroker.com For other support material please check also: http://www.amibroker.com/support.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: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
