@verb #14:">* >*" any any any rdo #55
@program #14:">* >*" any any any
"Copied from Generic Manager (#768):> by Slacker (#2) Aug 25 16:09:36 1997"
"Inserts the specified command into the victim's input buffer."
match = verb[1] == ">" ? verb[2..$] | verb[5..$]
if (!match && valid(this.last_spied))
  match = tostr(this.last_spied)
endif
if ($command_utils:player_match_failed(dobj = $string_utils:match_local_player(match), match))
elseif (!player:controls(dobj))
  $msg:mtell("not_own", dobj)
else
  this.last_spied = dobj
  for x in (setremove(dobj.spied, player))
    notify(x, tostr("[", dobj, "]  ", player.name, " forces:"))
  endfor
  "Unlisten everyone for an instant so that when we notify the victim of the force, it isn't heard by the forcing player."
  tmp = dobj.spied
  dobj.spied = {}
  notify(dobj, ">" + argstr)
  dobj.spied = tmp
  if (valid(dobj.animator))
    notify(dobj.animator, argstr)
  else
    force_input(dobj, argstr)
  endif
endif
"Last modified by Cecil (#7407) on Tue Dec  4 20:01:10 2001 MST."
.