ON $*:TEXT:/^[!@.~]8ball/i:#:{
  /set %8ball $rand(1,7) 
  if (%8ball == 1) /msg $chan 10No! 
  if (%8ball == 2) /msg $chan 10Yes 
  if (%8ball == 3) /msg $chan 10Maybe 
  if (%8ball == 4) /msg $chan 10of course 
  if (%8ball == 5) /msg $chan 10Are you crazy?!?! 
  if (%8ball == 6) /msg $chan 10How should I know? 
  if (%8ball == 7) /msg $chan 10Leave me alone, I'm having a break
}