/ScriptServ

on *:LOAD: {
  write 8ball.txt 11,1Outlook not so good...
  write 8ball.txt 11,1Yes
  write 8ball.txt 11,1No
  write 8ball.txt 11,1Maybe
  write 8ball.txt 11,1Reply is hazy please try again.
  write 8ball.txt 11,1Definetly!
  write 8ball.txt 11,1No way!
  write 8ball.txt 11,1It's likely.
  write 8ball.txt 11,1I'm leaning toward no.
  write 8ball.txt 11,1It's a chance.
  write 8ball.txt 11,1No chance at all!
  write 8ball.txt 11,1I think you should ask yourself that question.
  write 8ball.txt 11,1I'm leaning toward yes.
  write 8ball.txt 11,1It is decidely so.
  write 8ball.txt 11,1Yes definitly.
  write 8ball.txt 11,1You may rely on it.
  write 8ball.txt 11,1Outlook not so good.
  write 8ball.txt 11,1Signs point to yes.
  write 8ball.txt 11,1Outlook good.
  write 8ball.txt 11,1Most likely.
  write 8ball.txt 11,1Without a doubt.
  write 8ball.txt 11,1Dont count on it.
  write 8ball.txt 11,1My sources say no.
  write 8ball.txt 11,1Can not predict now.
  write 8ball.txt 11,1Yes definitly.
  write 8ball.txt 11,1Ask agian later.
  write 8ball.txt 11,1My reply is no.
  write 8ball.txt 11,1Yes
  write 8ball.txt 11,1No
  write 8ball.txt 11,1As i see it yes.
  write 8ball.txt 11,1Concentrate and ask agian.
  write 8ball.txt 11,1It is certaint.
  write 8ball.txt 11,1I better not tell you now.
  write 8ball.txt 11,1My reply is no.
  write 8ball.txt 11,1Reply hazy try agian.
  write 8ball.txt 11,1My sources say yes.
  write 8ball.txt 11,1Dont ask me, ask yourself that one.
}

menu channel {
  KLøWñ× 8-ball
  .On:/enable #8ball | set %8-Ball.chan # | /msg %8-Ball.chan 15,1I have just activated the 8-Ball. Just type !8ball <yes/no> question | timerball 0 180 /msg %8-Ball.chan 15,1The 8-Ball was activated, to get your answer right now just type !8ball <yes/no> question!
  .Off:/disable #8ball | /msg %8-Ball.chan 15,14Sorry guys, but I had to terminate the 8ball. | /timerball off | unset %8-Ball.chan
}

#8ball off
on *:text:!8ball*:*:/msg %8-Ball.chan 12,1Sooo $nick wants to know the answer to their question. Well here it is: $read 8ball.txt