[amibroker] A Sample Exploration using the newFundamental Data.

["Don Lindberg" <dlindber@xxxxxxxxxxxxx>]

// 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);