Untitled

alias quest {
  set %q $rand(1,6)
  set %trivia on
  if ( %q == 1 ) goto 1
  if ( %q == 2 ) goto 2
  if ( %q == 3 ) goto 3
  if ( %q == 4 ) goto 4
  if ( %q == 5 ) goto 5
  if ( %q == 6 ) goto 6
  else echo -a error
  :1
  set %question What's abyssal demon's max hit?
  set %answ 8
  msg $1 Question:  $+ %question
  halt
  :2
  set %question Who is currently ranked 1 in prayer?
  set %answ Bobcow64
  msg $1 Question:  $+ %question
  halt
  :3
  set %question What's the only music that starts with "X"?
  set %answ Xenophobe
  msg $1 Question:  $+ %question
  halt
  :4
  set %question How many worlds are there?
  set %answ 153
  msg $1 Question:  $+ %question
  halt
  :5
  set %question What runecrafting level you need to craft 7 minds per ess?
  set %answ 84
  msg $1 Question:  $+ %question
  halt
  :6
  set %question Example of 1 click teleports are...
  set %answ Teletabs
  msg $1 Question:  $+ %question
  halt
}

on *:TEXT:!trivia:#:{
  quest $chan
}
on *:TEXT:*:#:{
  if ( $1- == %answ ) { 
    msg $chan $nick got it right! The answer was:  $+ %answ    
    quest $chan
  }
  else halt
}

ctcp 1:end:{
  unset %q
  unset %answ
  unset %question
  msg $2 4Game halted by $nick :(
}