260
@verb #9239:"tell" this at/to any rdo #7788
@program #9239:"tell" this at/to any
this.location:announce(player:title(), " tells ", this:title(), " to ", iobjstr, ".")
if (cmd = $list_utils:assoc(iobjstr, this.commands))
  this.location:announce_all($msg:substitute(this, "%T " + cmd[2]))
else
  player:tell(this:title(), " doesn't know how to ", iobjstr, ".")
  this.location:sub_announce_all("%T cocks %t~p head curiously at %n.")
endif
if (random(10) > 7)
  this.location:sub_announce_all("%T " + this:msg_friendly())
endif
"Last modified by manta (#7165) on Fri Sep 11 05:26:06 1998 EDT."
.

0