bdog or woody or anyone else with qp2
see what you think of this, trying to get a top 20 for shortpct and shortdays, if ya like it or agree with it, lets get it out to excel, waiting on feedback.
input="prescan.lst";
output="short interest.lst";
daystoload=500;
float shortdays, shortpct;
PrintHdrln "Symbol,close,shortpct,shortdays,vol,avgvol30";
If Shortint > 0 and
close(0)> 0 and
sharesfloat > 0 and
Vol(0) > (AvgVol(-1, -30) * 1.1) and
avgvol(-1, -30) > 200000 then
shortpct:=shortint/sharesfloat;
shortdays:=shortint/avgvol(-1,-30);
Println symbol, "," , Close(0), "," ,shortpct*100, "," ,shortdays:2, ",", Vol(0), ",", avgvol(-1,-30);
endif; |
