@verb #1462:"smk" any any any rxdo #4051
@program #1462:"smk" any any any
if (valid(dobj))
  player:sub_tell("You smack %d upside the head.")
  dobj:sub_tell("%N smacks you upside the freakin head.")
  this.location:sub_announce_all_but({player, dobj}, "%N smacks %d upside the head.")
else
  player:sub_tell("You smack yourself upside the head.")
  player.location:announce_all_but({player}, player:title(), " smacks %p forehead.")
endif
"Last modified by Illusion (#4051) on Sun May  6 19:06:44 2001 MDT."
.