[ Fast Scan ] Ken,
You may want to play around with this one.
I run most all my other scans off this 1st one.
So on the other scans this line needs to be added.
; Input="1 Fast.lst"
It may speed things up for you.
Modify as you see fit. I think it's correct but
double check me since I'm not a programer.
Ray
Output="1 Fast.lst"
;Exchange NYSE, AMEX
;IssueType Common, Preferred//, Warrants
;DaystoLoad=2200
;If PE>-200 and PE<100 and
Min(0,-10,vol) > 100 and
QTRREV(0)>QTRREV(-4) and
Close(0) <=15 then
Println Symbol,"",",", PE:5:0, " ,", date(0):12
;Else
;Exchange Nasdaq
// qualify for continued listing
// except by price
;IssueType Common, Preferred//, Warrants
; DaystoLoad=2200
;If PE>-200 and PE<100 and
Min(0,-10,vol) > 100 and
QTRREV(0)>QTRREV(-4) and
((Bookvalue * Sharesout >= 2 or
// Net Assets > 2 Mil
MarketCap >= 35 or
// MarketCap > 35 mil
EPS * Sharesout >= .5 ) and
// Net Earnings last 12 mo > 500k
(Sharesfloat >= .5 and
// 500K shares trading
Sharesfloat*Close(0)>= 1)) and
//Market Value of Float > 1 Mil
Close(0) <=15 then
Println Symbol,"",",", PE:5:0, " ,", date(0):12
;endif;
;endif; |
