2a9
@verb #8043:"@shout-all" any any any rdo #8043
@program #8043:"@shout-all" any any any
"Copied from erik (#6612):@shout-all Sep 24 17:03:00 1999"
"Changed by Dax (#789) to only tell those whom are subscribed to the shout-FO."
people = {}
for x in (connected_players())
  #1213 in x.features ? people = {@people, x} | 0
endfor
for person in (people)
  if (!$object_utils:isa(person.location, $room) || person.location in {#50, #49, #48})
    player:tell(person:title(1) + " is in the " + person.location:title(1) + ".")
  else
    person:tell(this.name, " shouts, \"", argstr, "\"")
  endif
endfor
"Last modified by Russ (#8043) on Fri Sep 24 17:05:19 1999 MDT."
.

0