@verb #6570:"@pemit @remit" any any any rxd #2633
@program #6570:"@pemit @remit" any any any
"@usage: @pemit/@remit <player> <message>"
"This will send the exact message you type to <player>, using the :tell() verb."
"If you use `@remit' then it will spoof the room that <player> is in."
{who, msg} = $su:first_word(argstr)
remit = verb == "@remit"
if (!who || !msg)
  return player:tell("Syntax:  @pemit/@remit &lt;player&gt; &lt;message&gt;")
endif
who = $string_utils:match_player(who)
if (!$recycler:valid(who))
  return player:tell(who, " is not a player.")
endif
remit ? who.location:announce_all(msg) | who:tell(msg)
player:tell(remit ? who.name + ".location" | who.name, " => ", msg)
"Last modified by Dax (#789) on Thu Nov  8 11:53:55 2001 MST."
.