LOL BLT, the closest deal to the pluto scan is the give me the GOLD scan I wrote for nico after giving the TA thread grief for not "giving" him the gold...
let it run past the indexes and as soon as it starts to print cancel it, you can change it to PLUTO if you wish...>g<
I hope you're bringing your bag o tricks to Seattle, for that matter Ivan, if you are reading this gibberish, I wish you would bring you cat suitcase to the city of rain too!
b4laughsdog
//for those who don't want to work, but eat well...
output = "pot of gold.lst";
//input = "common.lst";
integer i;
exchange = nyse, amex, nasdaq;
for i = 0 to 0
do
if close(i) > 3 and
movavg(-15,4,cl)/movavg(-20,4,cl)>1.03 and
movavg(-15,4,cl)/movavg(-20,4,cl)<1.07 and
movavg(-10,4,cl)/movavg(-15,4,cl)>1.03 and
movavg(-10,4,cl)/movavg(-15,4,cl)<1.07 and
movavg(-5,4,cl)/movavg(-10,4,cl)>1.03 and
movavg(-5,4,cl)/movavg(-10,4,cl)<1.07 and
movavg(0,4,cl)/movavg(-5,4,cl)>1.03 and
movavg(0,4,cl)/movavg(-5,4,cl)<1.07
then
endif;
next i;
if close(0)>0 then
println" 00000 00000 000 000000";
endif;
if marketcap >= 100 and marketcap <= 800 then
i:=2;
endif;
if close(0)>0 then
println"000 000 000 000 000 000 000";
endif;
if ( EMovAvg(0,9,cl) > EMovAvg(0,21,cl) ) and
// Short term ema above the long term
( Close(0)>= 2 ) and // At least a 2 dollar stock
( Close(0)<= 29 ) and // And less than or equal to a 29 dollar stock
( AvgVol(0,-29)>= 20000 ) and // 20,000 shares average volume
( Close(-2 ) < Close( -3 ) ) and // down for 2 days
( Close(-1 ) < Close( -2 ) ) and
( Close( 0 ) > Close( -1 ) ) and // and then up
( Close(0) > close(-3)*.9 ) then
//After 2 down days, close is greater than 90 % of the 3-day close.
i:=3;
endif;
if close(0)>0 then
println"000 000 000 000 000 000";
endif;
if StochasticPctK(0) > StochasticPctD(0) and
// The percentK is above the percen D today
StochasticPctK(-1) < StochasticPctD(-1) then
// Yesterday it was below
i:=4;
endif;
if close(0)>0 then
println"000 000 000 000 000 000 000";
endif;
if sharesfloat < 50 and
Beta > 1.5 and
EPS3growth > 20 and
Rev3growth >= 20 and
EPS1growth >= 25 and
Rev1growth >= 25 and
QTRREV (0) > QTRREV (-4) and QTRREV (-1) > QTRREV (-5) and
QTRREV (-2) > QTRREV (-6) and
QTRREV (-3) > QTRREV (-7) and
HasOptions = True and Close (0) < 50 and QRS(0) >= 70 then
i:=5;
endif;
if close(0)>0 then
println"000 000 000 000 000 000 000";
endif;
if ( obv(0) > Max( -1 , -130 , obv ) ) and
( close(0) > Max( -1 , -130 , cl ) ) then
i:=6;
endif;
if close(0)>0 then
println"000 000 000 000 00000000 000 000";
endif;
if Close( 0 ) >= Max( -1 , -40 , cl ) * .95 and
Close(0) <= Max( -1 , -40 , cl ) and // No breakout
Min( -1 , -40 , cl ) >= Max( -1 , -40 , cl ) * .8 and
AvgVol( 0 , -29 ) >= 250 and // Average volume
Close(0) >= 10 and
MovAvg( 0 , 150 , cl ) <= MovAvg( -9 , 150 , cl )and
RSI( 0 ) >= 60 and
MovAvg( 0 , 150 , cl ) <= MovAvg( -9 , 150 , cl ) and
AvgVol( 0 , -29 ) >= 250 then
i:=7;
endif;
if close(0)>0 then
println" 00000 00000 00000000 000000";
println;
println;
endif;
|
