@verb #9102:"srank" this none this rxdo #9102
@program #9102:"srank" this none this
"Copied from ChocolateGuy (#4813):srank Jun 14 12:10:18 2000"
{who} = args
outstr = ""
for i in [#12..#17]
  outstr = outstr + (who:isa(i) ? "*" | " ")
endfor
return {outstr, $su:substitute(outstr, {{" ", "q"}})}
.