View/Edit #717:agree cuddle dance giggle laugh snicker snuggle

Switch to edit mode.

1:  "Verbs done <b>with</b> someone."
2:  "(e.g. laugh, agree, etc.)"
3:  "match object"
4:  iobj = player:my_match_object(iobjstr)
5:  if (!$command_utils:object_match_failed(iobj, iobjstr))
6:    "do stuff if appropriate"
7:    player:tell("You ", verb = $su:lowercase(verb), " with ", iobj:title(), ".")
8:    player.location:sub_announce_all_but({player, iobj}, "%n " + verb + "s with " + iobj:title() + ".")
9:    iobj:tell(player:title(), " ", verb, "s with you.")
10: else
11:   "can't find iobjstr"
12:   $msg:mtell("failed", iobjstr)
13: endif
14: "Last modified by killeen (#562) on Wed Mar 20 09:18:01 2002 MST."

[home | help | who | search | setup | code]