Re: [CANSLIM] QP Scan for LLUR

From: "Patrick Wahl" <pjwahl@attbi.com>
Subject: Re: [CANSLIM] QP Scan for LLUR
Date: Thu, 14 Feb 2002 16:52:17 -0700

Next Article (by Author): [CANSLIM] QP Scan for LLUR Quan Tran
Previous Article (by Author): Re: [CANSLIM] BBBY "Patrick Wahl"
Top of Thread: [CANSLIM] QP Scan for LLUR Quan Tran
Articles sorted by: [Date] [Author] [Subject]

Here is an alternate approach, what I described yesterday, has a number of 
variables that can be tweaked to alter the list that is produced.  The two critical 
numbers are the number of days to look back in the For loop (160), and the number 
of days under a 50 day MA, currently set to 15.  Also the filters in the If statement 
can be tightened or loosened up.  

============================================================

output ="llur.lst";
DaysToLoad =250;
Exchange = NASDAQ,NYSE;

integer j;
integer ndaysunder50;


ndaysunder50 :=20;

DaysRequired=250;

 if ( AvgVol(0,-29)>= 30000   and             // 30,000 shares average volume
             Close(0)>= 20 )  Then                // At least a 20 dollar stock
              ndaysunder50 :=0;
             for j=-160 to 0
             do
	     if (close(j) < MovAvg( j , 50 , cl) )  then
	         ndaysunder50 := ndaysunder50 + 1;
                endif;

            next j;
 endif;
if ( ndaysunder50 < 15) then
       println symbol,",",epsrank(0);
endif;


===========================================================

On 14 Feb 2002 at 13:36, Quan Tran wrote:

> This is my first attempt, probably will need more 
> fine tuning.
> 
> All constructive comments are welcome.
> 
> 
> // Scan for LLUR
> Output = "QT-LLUR.lst";
> IssueType Common;
> 
> integer i;
> integer LLUR;
> integer bTightRange;
> 
> // Higher close than previous 40-day close
> // during the pass 200 days.
> LLUR := 1;
> 
> for i = 0 to -200 step -40
> do
> 	if
> 		close(i) < close(i-40)
> 	then
> 		LLUR := 0;
> 	endif;
> next i;
> 
> // Daily 7-day ATR (Average True Range) less than 1.5
> // in the pass 200 days.
> bTightRange := 1;
> 
> for i = 0 to -200 step -1
> do
> 	if
> 		ATR(i) > 1.5
> 	then
> 		bTightRange := 0;
> 	endif;
> next i;
> 
> // Print out the stock meeting the above conditions.
> if
> 	close(0) > 10
> and
> 	LLUR = 1
> and
> 	bTightRange = 1
> then
> 	println symbol;
> endif;
> 
> //////////////////////////////////////////////////
> 
> Here the results of today scan:
> AAAB
> AEM
> AHCI
> ALR
> AOT
> ARG
> ATU
> AVD
> AWK
> BKR
> BMS
> BWL  A
> BYS
> CAG
> CBIN
> CEDC
> CFFC
> CFSB
> CIV
> CNBA
> CRVL
> CTWS
> CVBF
> DEAR
> DLX
> EQSB
> FBSI
> FSBK
> FTCG
> FWV
> GAN
> GG
> GNWR
> HABC
> HR
> HRH
> IDCO
> IFCJ
> IKN
> KEX
> KMX
> KNGT
> KROL
> LARL
> LNCB
> MATW
> MCL
> MHM
> NFI
> NJR
> NMHC
> NOLD
> NXL
> OFIX
> OLP
> ONFC
> OZRK
> PBCI
> PETM
> PFFC
> PHC
> PLSK
> PNP
> PSFC
> PTRS
> REBC
> RGIS
> RGS
> RYAN
> SAFE
> SAL
> SFFS
> SONC
> STK
> SUI
> SVBF
> TARR
> TMA
> UNF
> URBN
> WEBK
> WRO
> YFCB
> 
> 
> 
> =====
> Quan Tran
> vyellon@yahoo.com
> 
> __________________________________________________
> Do You Yahoo!?
> Send FREE Valentine eCards with Yahoo! Greetings!
> http://greetings.yahoo.com
> 
> -
> -To subscribe/unsubscribe, email "majordomo@xmission.com"
> -In the email body, write "subscribe canslim" or
> -"unsubscribe canslim".  Do not use quotes in your email.



- -
- -To subscribe/unsubscribe, email "majordomo@xmission.com"
- -In the email body, write "subscribe canslim" or
- -"unsubscribe canslim".  Do not use quotes in your email.

Go to Jeff Salisbury LWGate Home Page.