Lots of hits there, David.
I nearly never short [though the time is upon us] so haven't collected scans but your post promped me to run one posted by Jan Wolansky a while back [probably in QP] and got only 7 hits in 20 days -- probably want a happy medium.
True Grit is another one. -Bob
--------
ARM, close: 13.875, Up: -0.4375, 04/30/1999, ARM FINL GROUP INC CL A, 95.0009995
AZA, close: 34, Up: -1.75, 04/28/1999, ALZA CORP COM, 95.0009995
AZA, close: 35.9375, Up: -0.9375, 05/17/1999, ALZA CORP COM,95.0009995
CTX, close: 37.8125, Up: -1.375, 04/29/1999, CENTEX CORP COM, 95.0009995
DFS, close: 29.8125, Up: -0.5, 05/25/1999, DEPARTMENT 56 INC COM, 95.0009995
ETEC, close: 30.375, Up: -0.5, 05/03/1999, ETEC SYS INC COM, 95.0009995
RAD, close: 23.375, Up: -0.5, 04/29/1999, RITE AID CORP COM, 95.0009995
------
Output="short1023.lst";
input ="50k.lst";
// Exchange=NYSE,NASDAQ,AMEX;
IssueType Common; DaysToLoad=250; DaysRequired=250; integer i;
For i = -20 to 0 do
If close(i)>=10 and close(i)<40 and
close(i)<movavg(i,200,cl) and
close(i)<emovavg(i,8,cl) and
close(i-1)>emovavg(i-1,8,cl) and
moneyflowosc(i)<0 and
close(i)>1.25*bookvalue and
close(i)<open(i) and
close(i)-low(i)<.4*(high(i)-low(i)) and
high(i)-open(i)<.4*(high(i)-low(i)) and
movavg(i,90,vol)>50000 and
obv(i)<movavg(i,40,obv) and
InstHold>=95 then
println Symbol,", " , "close: " ,close(i), ", " ,
"Up: ",close(i)-close(i-1) , ", " , date(i), ", " , description, ", " ,InstHold;
endif; next i; |
