Holy Grail
LBR Holy Grail scan
Input= "udu5550.lst";
output = "HolyGrail.lst";
daystoload=500;
DaysRequired=500;
SET ADX = 14;
Printhdrln "Symbol,Close,EPSRank,QRS,30adv,Vol,PE,IRLGroup,SharesFloat,SharesShort,Name,InstHold";
if ADX (0)>30 and
ADX (-5)> 30 and
ADX (-4) > ADX (-5) and
Low (0) \<= EMovAvg(0,20,cl) and
Low (-1) >EMovAvg(-1,20,cl) and
Vol(0)>=50000 and
Close(0)>=7
then
println Symbol,",",Close(0):7:2,",",EPSRank(0):3:0,",",QRS(0):3:0,",",avgvol(0,-29):8:0,",",vol(0):8:0,",",PE:5:0,",",IRLsymbol:12,",",Sharesfloat:5:2,",",Shortint:5:2,",",description:-15,",",InstHold:3:2;
endif;