;;; SPINBOT
 
on 6,7,8,9:text:*spin*:#: {
  set %spin kick,ban,operator,voice,slap,kick,voice,slap,slap 
  var %1 $gettok(%spin,$rand(1,$numtok(%spin)),44)
  set %spin kick,ban,op,vo,slap,kick,voice,slap,slap 
  var %2 $gettok(%spin,$rand(1,$numtok(%spin)),44)
  set %spin kick,ban,op,vo,slap,kick,voice,slap,slap 
  var %3 $gettok(%spin,$rand(1,$numtok(%spin)),44)
  unset %spin
  msg $chan <%1=%2=%3>
  if ((%1 == %2) && (%2 == %3)) {
    msg $chan Jackpot
    if (%1 == slap ) { me take $nick and kick his ass }
    if (%1 == kick ) { k $nick }
    if (%1 == voice ) { mode $chan +v $nick }
    if (%1 == operator ) { mode $chan +o $nick }
    if (%1 == ban ) { msg $chan 10 Secunden ban for $nick in | msg $chan 3 | timer 1 1 /msg $chan 2 | timer 1 1 /msg $chan 1 timer 1 1 /msg $chan 0.... | mode $chan -u10 +b $nick } } {
msg $chan Niete } }