Volume Spike Buy Scan

Volume Spike Scan taken from "The Volume Spike Screen" article found in the March 2004 issue of Active Trader magazine.

input = "sp500.lst";
output = "VolSpk.lst";


Printhdrln "Symbol,Company,Industry Group,Close,Change, % Chg,EPSRank,QRS,PE,Vol,30adv,SharesFloat,SharesShort, % Short";
if ( Close(0) => 15 )and
   Sharesfloat > 0 and
   (Close (0) => .5 * Range (0)+low(0)) and
   RSI(0)<30 and
   (Vol (0) => 2 * AvgVol(0,-21)) 
then
  println symbol , "," , Description,",",IRLsymbol:12,",",Close(0):7:2,",",
Close(0)-Close(-1):7:2,",",((Close(0)-Close(-1))/Close(-1))*100:7:2,",",EPSRank(0):3:0,",",
QRS(0):3:0,",",PE:5:0,",",vol(0)/1000:8:1,",",avgvol(0,-29)/1000:8:1,",",Sharesfloat:5:0,
",",Shortint:5:3,",",100*Shortint/(Sharesfloat):3:1;
endif;

Download VSB.EXP (Volume Spike Buy Scan) Download sp500.lst (S$P 500 Input List File)