#decider on
on *:text:!decide*:#:{
  if ($2 == help) { msg # NAKi Jumala arvamuse saamiseks kirjuta '!decide variant1 variant2' või '!decide nick1 nick2 nick3' jne. | msg # mitme_s6nalised_variandid kirjuta _ abil! Kui kirjutad lihtsalt '!decide' siis keerutatakse pudelit kogu kanali kaadri vahel; valitakse yks user kanalist | halt }
  if ($2- == $null) { var %pudel.nick = $nick(#,$r(1,$nick(#,0))) | goto spin }
  if ($numtok( $2- ,32) == 1) { var %pudel.nick = $2- | describe $chan arvab, et siin pole eriti mõtet pudelit keerutama hakatagi .. Ilmselgelt %pudel.nick $+ ! | halt }
  else { var %pudel.partno = 1 + $numtok( $2- ,32) | set %pudel.partwin $rand(2,%pudel.partno) | set %pudel.nick $($+($,%pudel.partwin),2) | goto spin }
  :spin
  describe $chan keerutab tõepudelit ..
  .timer 1 2 msg $chan .. pudel kaotab hoogu ..
  .timer 1 3 msg $chan .. ja pudel peatus ..
  .timer 1 5 msg $chan Pudel näitab variandi [[ $remove(%pudel.nick,$chr(44)) ]] suunas!
  .disable #decider
  .timerdecideron 1 10 enable #decider
  halt
  #decider end
}