@verb #9613:"spank" any none none rdo #9613
@program #9613:"spank" any none none
"Copied from killeen (#562):spank Aug 11 15:21:31 2000"
who = $su:match_player(args[1])
player:tell("You spank ", who:title(1), ".")
player.location:announce_all_but({player, who}, player:title(1), " spanks ", who, ".")
who:tell(player:title(1), " spanks you.")
.