on *:TEXT:!numbers*:#:{ if (%numbergame[ $+ [ $chan ] ] == 0) {
    set %numbergame[ $+ [ $chan ] ] 1
    var %number[ $+ [ $chan ] ] = $rand(0,1000)
  msg $chan $nick has started a game of Guess the Number! Type !guess (number) to guess. }
  if (%numbergame[ $+ [ $chan ] ] == 1) {
  notice $nick A game is already being played! }
}
on *:TEXT:!guess*:#:{ 
  set %guess[ $+ [ $chan ] ] $2
  if (%guess[ $+ [ $chan ] ] > %number[ $+ [ $chan ] ]) { msg $chan $nick $+ , %guess[ $+ [ $chan ] ] is too large. }
  if (%guess[ $+ [ $chan ] ] < %number[ $+ [ $chan ] ]) { msg $chan $nick $+ , %guess[ $+ [ $chan ] ] is too small. }
  if (%guess[ $+ [ $chan ] ] == %number[ $+ [ $chan ] ]) { msg $chan $nick got the correct answer!
    set %numbergame[ $+ [ $chan ] ] 0
    unset %number[ $+ [ $chan ] ]
  }
}