Someone

on *:TEXT:!numbergame*:#: { 
  if (%numbergame [ $+ [ $chan ] ] == on) { notice $nick 3game already in play -.- | Halt } 
  set %number [ $+ [ $chan ] ] $rand(1,1000) 
  set %game [ $+ [ $chan ] ] active 
  msg $chan 3 $me 4has thought of a random number between3 1 4and3 1000
  msg $chan 4You can now guess using4 !guess <number>
  set %numbergame [ $+ [ $chan ] ] on 
} 
on *:TEXT:!guess*:#: {
 if (%guessgamespam == off) { halt }
  timer 1 2 set %guessgamespam on 
  set %guessgamespam on
  if (%game [ $+ [ $chan ] ] == active) { set %numberguesses [ $+ [ $nick ] ] 0 } 
  if (%numberguesses [ $+ [ $nick ] ] == 15) { notice $nick Only 5 guesses allowed | Halt } 
  if ($2 == %number [ $+ [ $chan ] ]) { msg $chan 4¤11.12¡9*4°9*12¡11.4¤8,1W1,8I8,1N1,8N8,1E1,8R 8,1 ACadac owns u all 8,1W1,8I8,1N1,8N8,1E1,8R!!4¤11.12¡9*4°9*12¡11.4¤ | unset %numbergame [ $+ [ $chan ] ] } 
  if ($2 < %number [ $+ [ $chan ] ]) { msg $chan 3 $nick $+ , 4The Number Is Higher Than3 $2 } 
  if ($2 == %number [ $+ [ $chan ] ]) { unset %number  [ $+ [ $chan ] ] } 
  if ($2 > %number [ $+ [ $chan ] ]) { msg $chan 3 $nick $+ , 4The Number Is Lower than3 $2 } 
  set %game [ $+ [ $chan ] ] inactive 
  inc %numberguesses [ $+ [ $nick ] ] 
}