if you just want it complicated for fun use this

(yes its redundant and pretty pointless but its complicated :) )

on :text:!8ball :#: {
var %8ball $rand(1,5)
describe $chan dont take this stuff to seriously its just a thingermabob :)
if ((%8ball == 1 )) msg # The magic 8ball says \" $+ $read(8ball.txt,1) $+ \"
if ((%8ball == 2 )) msg # The magic 8ball says \" $+ $read(8ball.txt,2) $+ \"
if ((%8ball == 3 )) msg # The magic 8ball says \" $+ $read(8ball.txt,3) $+ \"
if ((%8ball == 4 )) msg # The magic 8ball says \" $+ $read(8ball.txt,4) $+ \"
if ((%8ball == 5 )) msg # The magic 8ball says \" $+ $read(8ball.txt,5) $+ \"
}