@verb #3319:"mywho" none none none rdo #3319
@program #3319:"mywho" none none none
player:tell_lines($string_utils:columnize({"Player Name", "Player Location"}, 2))
player:tell_lines($string_utils:columnize({"-----------", "---------------"}, 2))
for x in (connected_players())
  if (x.wizard)
    add = "*"
  elseif (x.programmer)
    add = "^"
  else
    add = ""
  endif
  player:tell_lines($string_utils:columnize({tostr(add, x:title(), " (", x, ")"), tostr(x.location:title(), " (", x.location, ")")}, 2))
endfor
player:tell("")
player:tell("* == Wizard, ^ == Programmer, and nothing == a nobody.")
player:tell("Total: ", length(connected_players()), " players connected.")
"Last modified by Tolkien (#3319) on Sat Mar 16 14:32:54 2002 MST."
.