on *:TEXT:!start:#: { 
  if ( %number. [ $+ [ $nick ] ] != $null ) { notice $nick u didnt even complete ur old number | halt }
  else {
    /msg $chan $nick started a game
    set %number. [ $+ [ $nick ] ] $rand(1,10000)
    set %guessamount. [ $+ [ $nick ] ] 20
  }
}
on *:TEXT:!guess *:#: { 
  if ( %number. [ $+ [ $nick ] ] == $null ) { notice $nick u didnt start a game yet! type !start ! | halt }
  else {
    if ( %guessamount. [ $+ [ $nick ] ] == 0) { msg $chan to bad .. u lost the number was %number. [ $+ [ $nick ] ] | unset %guessamount. [ $+ [ $nick ] ] -1 | unset %number. [ $+ [ $nick ] ] } 
    if ($2 < %number. [ $+ [ $nick ] ] ) { inc %guessamount. [ $+ [ $nick ] ] -1 | msg $chan thats to low... u got %guessamount. [ $+ [ $nick ] ] times left... }
    if ($2 > %number. [ $+ [ $nick ] ] ) { inc %guessamount. [ $+ [ $nick ] ] -1 | msg $chan thats to high... u got %guessamount. [ $+ [ $nick ] ] times left... }
    if ($2 == %number. [ $+ [ $nick ] ] ) { msg $chan well done | unset %number. [$+ [ $nick ] ] | unset %guessamount. [ $+ [ $nick ] ] -1 }
  }
}
on *:TEXT:!answer:#: { 
  msg $chan the answer was %number. [ $+ [ $nick ] ]
  unset %number. [ $+ [ $nick ] ] 
  unset %guessamount. [ $+ [ $nick ] ] 
}