209
@verb #1935:"pkiss" none none none rxdo #7446
@program #1935:"pkiss" none none none
tar = $string_utils:match_player(dobjstr)
if (!valid(tar))
  player:tell("You need a partner for this kiss.")
else
  tar:tell(player.name, " reaches over to you, draws you close, and tenderly showers you with several soft, quick kisses.")
  player:tell("You reach over, draw ", tar.name, " close, and tenderly best  several soft, quick kisses.")
endif
"Last modified by FiReStArTeR (#2340) on Sat Jan 31 12:39:40 1998 EST."
.

0