output = "DayTrade.lst";
IssueType = common;
integer j;
integer n;
n := 0;
if ( close(0) > 30 ) and
( avgvol( 0 , -29 ) >= 500000 )
then
for j=0 to -9 step -1 do
if range(j) >= close(j-1) * .05
then
n := n + 1;
endif;
next j;
endif;
if ( n >= 7 ) then
println symbol , "," , description;
endif;