3a8
@verb #3291:"superk" any none none rdo #3291
@program #3291:"superk" any none none
"Copied from Norm (#4805):superk Apr 20 16:39:26 2000"
"Copied from Strahd (#7744):superk Jan 23 07:06:07 2000"
if (player != this)
  player:tell("This particular verb cannot be used by you.")
elseif (dobj.gender != "female")
  player:tell("This particular verb does not allow you to kiss any other being than a female.")
else
  this.location:announce_all_but({player, dobj}, player:title(), " gives ", dobj:title(), "an extremely long kiss on the lips. he enjoys it. the question is, does she? he wishes he does, though, with all his heart. ")
  player:tell("you give ", dobj:title(), "a very long kiss. ")
  dobj:tell(player:title(), "gives you an extremely long kiss on the lips. he enjoys it, but do you? he wishes you do, though, with all his heart. ")
endif
"Last modified by Ash-Ketchum (#3291) on Thu Jun 22 06:41:33 2000 MDT."
.

0