on *:text:!8ball*:#: {
set %8b $rand(1,20)
if ($2 == $null) { notice $nick Usage: !8ball <Question> | halt }

if (%8b == 1) { msg $chan 3(8BALL)3 2 $2-: I'm not sure, ask again..2 }
if (%8b == 2) { msg $chan 3(8BALL)3 2 $2-: Yes.2 }
if (%8b == 3) { msg $chan 3(8BALL)3 2 $2-: No.2 }
if (%8b == 4) { msg $chan 3(8BALL)3 2 $2-: Without a doubt.2 }
if (%8b == 5) { msg $chan 3(8BALL)3 2 $2-: Are you being serious?2 }
if (%8b == 6) { msg $chan 3(8BALL)3 2 $2-: Shesh, Get lost.2 }
if (%8b == 7) { msg $chan 3(8BALL)3 2 $2-: In time young one. In time..2 }
if (%8b == 8) { msg $chan 3(8BALL)3 2 $2-: Happy to announce, Yes!2 }
if (%8b == 9) { msg $chan 3(8BALL)3 2 $2-: Out look not so good.2 }
if (%8b == 10) { msg $chan 3(8BALL)3 2 $2-: It is decidedly so.2 }
if (%8b == 11) { msg $chan 3(8BALL)3 2 $2-: I don't think you should know.2 }
if (%8b == 12) { msg $chan 3(8BALL)3 2 $2-: Very doubtful.2 }
if (%8b == 13) { msg $chan 3(8BALL)3 2 $2-: Yes, definitely.2 }
if (%8b == 14) { msg $chan 3(8BALL)3 2 $2-: I'm sorry to say.. No.2 }
if (%8b == 15) { msg $chan 3(8BALL)3 2 $2-: Most likely.2 }
if (%8b == 16) { msg $chan 3(8BALL)3 2 $2-: Ask again later.2 }
if (%8b == 17) { msg $chan 3(8BALL)3 2 $2-: Hell no!2 }
if (%8b == 18) { msg $chan 3(8BALL)3 2 $2-: Damn right!2 }
if (%8b == 19) { msg $chan 3(8BALL)3 2 $2-: Hah, you've got no chance.2 }
if (%8b == 20) { msg $chan 3(8BALL)3 2 $2-: patiance grass hopper...2 }
}