# step a given number of types, printing each one.
define ms
set pagination 0
set variable $scnt = $arg0
while $scnt
stepi
set variable $scnt = $scnt - 1
end
set pagination 1
end

# next a given number of types, printing each one.
define mn
set pagination 0
set variable $scnt = $arg0
while $scnt
nexti
set variable $scnt = $scnt - 1
end
set pagination 1
end

