on *:TEXT:!8ball*:*:{
/set %said3 %said2
/set %said2 %said1
/set %said1 $1-
/var %rand = $rand(1,12)
if %said1 != %said3 {
  if %rand == 1 /msg $chan Yes!
  if %rand == 2 /msg $chan No!
  if %rand == 3 /msg $chan Maybe
  if %rand == 4 /msg $chan You betcha!
  if %rand == 5 /msg $chan I dont think so...
  if %rand == 6 /msg $chan Its possible
  if %rand == 7 /msg $chan I think not!
  if %rand == 8 /msg $chan How should I know?
  if %rand == 9 /msg $chan No comment...
  if %rand == 10 /msg $chan I dont know, and I really dont care.
  if %rand == 11 /msg $chan Yup!
  if %rand == 12 /msg $chan Nope!
}
if %said1 == %said3 {
  /msg $chan Why do you repeat yourself, $nick ?
}
}