SI
SI
discoversearch

We've detected that you're using an ad content blocking browser plug-in or feature. Ads provide a critical source of revenue to the continued operation of Silicon Investor.  We ask that you disable ad blocking while on Silicon Investor in the best interests of our community.  If you are not using an ad blocker but are still receiving this message, make sure your browser's tracking protection is set to the 'standard' level.
Strategies & Market Trends : TA-Quotes Plus -- Ignore unavailable to you. Want to Upgrade?


To: David N. Jones who wrote (8208)1/4/1999 2:59:00 PM
From: John Hunt  Read Replies (1) | Respond to of 11149
 
Bullish Kiss & Run Scan

Hi David,

As per our PM discussion, I have reconstructed my missing Kiss & Run Scan ... It is based on 160 day (32 week) EMA, but if you really need 30 weeks it should be easy to fix. If you want more stocks output, just increase the 1.025 to 1.030 or 1.035.

It should be easy to write a similar one for bearish stocks if you just modify each line for what you want to do ... Not sure what you would call it ... maybe 'Kiss of Death'? < g >

Have fun.

John

// Bullish Kiss & Run Scan

// This scan finds stocks that are greater than $2 and
// have an hourly volume > 4,000 and
// have closed higher than their open today and
// have closed today higher than yesterday and
// closed in the top half of today's daily range and
// have a rising 160d Exponential Moving Average and
// are above, but within 2.5% their 160d EMA and
// have today closed over the 160d EMA and
// have been above the 160d EMA for 7 days and
// have hopefully kissed the 160d EMA and
// will run like a spouse at a Park 'n ride.

integer today;

today:= 0; // make negative for backtesting

Output="KissRun.lst";

Exchange=NYSE,AMEX,NASDAQ;

If

close(today) > 2 and
AvgVol(today, today-22) > 26000 and
Close(today) > Open(today) and
Close(today) > Close(today-1) and
close(today) - Low(today) > 0.50*( High(today) - Low(today) ) and
EMovAvg(today,today+160,cl) > EMovAvg(today-22,today+182,cl) and
close(today) <= 1.025*EMovAvg(today,today+160,cl) and
close(today) > EMovAvg(today,today+160,cl) and

close(today-1) > EMovAvg(today-1,today-1+160,cl) and
close(today-2) > EMovAvg(today-2,today-2+160,cl) and
close(today-3) > EMovAvg(today-3,today-3+160,cl) and
close(today-4) > EMovAvg(today-4,today-4+160,cl) and
close(today-5) > EMovAvg(today-5,today-5+160,cl) and
close(today-6) > EMovAvg(today-6,today-6+160,cl) and
close(today-7) > EMovAvg(today-7,today-7+160,cl) then

println Symbol;

endif;