/spin {
  if ($lower($1) == on) {
    if ($2 == $null) set %ek_trigger_spinthebottle ! $+ $me 
    else set %ek_trigger_spinthebottle $2
    .enable #spinthebottle
    me breaks out an empty 0,4Coke bottle . . .
    say 2SPiN 12THe 6BoTTLe 13started.
    say Type 8,1 $+ %ek_trigger_spinthebottle $+  to play . . .
  }
  else if ($lower($1) == off) {
    .disable #spinthebottle
    unset %ek_trigger_spinthebottle
    me throws the bottle at the wall . . .  The bottle shatters . . .  The game is OVER . . .
  }
}



Paste this in events.



#spinthebottle disabled
on 1:TEXT:%ek_trigger_spinthebottle:#:{
  msg $chan 12It's time 4 SPiN Da BoTTLE!!!!
  msg $chan 12 $+ %ek_logo 12created by %ek_author
  //set [ %ek_victim_ $+ [ $nick ] ] $nick($rand(1,$nick(0,$chan)),$chan)
  /.timer 1 3 /msg $chan 4 $+ $nick 12spins the bottle . . .
  /.timer 1 5 /msg $chan 12The bottle slows down and lands on . . .
  /.timer 1 6 /msg $chan 12. . .  6 $+ [ [ [ [ % $+ [ ek_victim_ $+ [ $nick ] ] ] ] ] ] $+ 12!!!!
  /.timer 1 7 /msg $chan 12LooKZ LiKE 4 $+ $nick 12has GoTZ Ta KiSS 6 $+ [ [ [ [ % $+ [ ek_victim_ $+ [ $nick ] ] ] ] ] ] 12. . .
  //unset [ % $+ [ ek_victim_ $+ [ $nick ] ] ]
}
#spinthebottle end