alias spin.backup {
   if $prop == check { return 1 }
   else { hsave spin channels\spin.txt }
}
on *:START: { hmake spin 1 | hload spin channels\spin.txt }
on *:TEXT:*:*: {
   if $hget(chanlist,$chan) {
     if $1 == $bot(prefix) $+ spin || $1 == $bot(prefix) $+ bottle || $1 == $bot(prefix) $+ кручу || $1 == $bot(prefix) $+ бутылочка {
       if !$hget(var,spin) && $nick($chan,0) > 3 && !$hget(settings. $+ $chan,spin) {
         hadd -u25 var spin 1 | :spin
         var %. = $nick($chan,$rand(1,$nick($chan,0)))
         if %. == $me { goto spin }
         timer 1 1 msg $chan И вот, $nick крутанул бутылку | timer 1 2 msg $chan Интересно на кого она выпадет | timer 1 5 msg $chan Бутылка крутится.... | timer 1 8 msg $chan Начинается замедлять движение... | timer 1 11 msg $chan Решающий момент.. | timer 1 13 msg $chan И..! Она выпадает на... | timer 1 17 msg $chan На %. | timer 1 20 msg $chan $nick должен $hget(spin,$rand(1,$hget(spin,0).item)) %.
       }
     }
   }
}