@verb #7113:"roomtell" none none none rdo #7113
@program #7113:"roomtell" none none none
x = {}
for each in (player.location.contents)
  if (is_player(each))
    x = {@x, each}
  endif
endfor
player:tell("List of players in the room:")
player:tell("~~~~~~~~~~~")
player:tell($string_utils:columnize({"Title", "Number", "Rank"}, 3))
player:tell($string_utils:columnize({"-----", "------", "----"}, 3))
for each in (x)
  player:tell($string_utils:columnize({each.name, tostr(each), each:rank()}, 3))
endfor
player:tell("~~~~~~~~~~~")
player:tell("End of list. Total number of players in the room: ", $string_utils:english_number(length(x)), ".")
"Last modified by Dax (#789) on Tue May 12 00:25:04 1998 EDT."
.