@verb #7446:"comm" none none none rdo #7446
@program #7446:"comm" none none none
player:tell("Players who are listening to the shout FO are:")
player:tell()
data = {}
for x in (#2353.listening)
  if ($object_utils:connected(x))
    data = {@data, {x:title(), x}}
    $command_utils:suspend_if_needed()
  endif
endfor
player:tellColumns({25, 17}, {"Player Name", "Player Number"}, @data)
"Last modified by Dax (#789) on Sat May 16 14:20:37 1998 EDT."
.