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;