81e
@verb #4312:"slurp" any any any rdo #4312
@program #4312:"slurp" any any any
if (valid(dobj))
  player:sub_tell("You lick your lips and walk up to %d.")
  dobj:sub_tell("%N licks %p lips and walks over to you.")
  player.location:sub_announce_all_but({player, dobj}, "%N licks %p lips and walks over to %d.")
  suspend(6)
  player:sub_tell("Giggling softly, you brush the hair out of your face and wrap your arms around %d and hold %d~o in a long hug.")
  dobj:sub_tell("Giggling softly, %n brushes the hair out of %p face and wraps %p arms around you, holding you in a long hug.")
  player.location:sub_announce_all_but({player, dobj}, "Giggling softly, %n brushes the hair out of %p face and wraps %p arms around %d, holding %d~o in a long hug.")
  suspend(5)
  player:sub_tell("You squirm a bit in %d's arms and lick %d~p face in one continuous line, from the bottom of %d~p chin to %d~p temple.")
  dobj:sub_tell("%N squirms a bit in your arms and licks your face in one continuous line, from the bottom of your chin to your temple.")
  player.location:sub_announce_all_but({player, dobj}, "%N squirms a bit in %d's arms and licks %d~p face in one continuous line, from the bottom of %d~p chin to %d~p temple.")
  suspend(4)
  player:sub_tell("You climb out of %d~p arms and shiver slightly, going back to where you were before. %d looks dazed.")
  dobj:sub_tell("%N climbs out of your arms and shivers slightly, going back to where %s was before. You look dazed.")
  player.location:sub_announce_all_but({player, dobj}, "%N climbs out of %d~p arms and shivers slightly, going back to where %s was before. You look on dazedly, as does %d.")
else
  player:sub_tell("You produce a can of whipped cream from seemingly nowhere and spray it onto your finger. You slide it into your mouth and wink.")
  player.location:sub_announce_all_but({player}, "%N produces a can of whipped cream from seemingly nowhere and sprays it onto %p finger. %S slides it into %p mouth and winks.")
endif
"Last modified by Midnight (#4312) on Wed Oct 11 17:04:03 2000 MDT."
.

0