on *:text:*!spin:#:{
  if (%limited3 == 0) set %limited3 1
  elseif (%limited3 == 1) halt
  var %nick = $nick(#,$r(1,$nick(#,0)))
  describe $chan spins the bottle...
  timer 1 3 msg $chan 14,1The bottle is slowing down...
  timer 1 5 msg $chan 4,1The bottle stopped...
  timer 1 7 msg $chan 0,1It landed on...
  timer 1 9 msg $chan 15,1 %nick $+ !
  timer 1 11 msg $chan 14,1 $nick must $gettok(Make Out With|Kiss|Make Love With|Have Sex With|Smooch|French Kiss|Shoot|Stab|Rape|Karate Chop|Eat|Do Something to|Eat out,$r(1,13),124) %nick $+ !
  timer 1 11 set %limited3 0
}