@verb #717:"cackle giggle glare grin growl hmm laugh mmm mumble mutter point snicker" none at/to any rxdo #562
@program #717:"cackle giggle glare grin growl hmm laugh mmm mumble mutter point snicker" none at/to any
"Verbs done <b>at</b> someone."
"(e.g. laugh, point, etc.)"
"match object"
iobj = player:my_match_object(iobjstr)
if (!$command_utils:object_match_failed(iobj, iobjstr))
  "do stuff if appropriate"
  player:tell("You ", verb = $su:lowercase(verb), " at ", iobj:title(), ".")
  player.location:sub_announce_all_but({player, iobj}, "%n " + verb + "s at " + iobj:title() + ".")
  iobj:tell(player:title(), " ", verb, "s at you.")
else
  "can't find iobjstr"
  $msg:mtell("failed", iobjstr)
endif
"Last modified by killeen (#562) on Wed Mar 20 09:15:32 2002 MST."
.