on *:text:!guesson:#: { 
  set %number $rand(2,100) {
  msg $chan Type !guess <number> }
}
on *:text:!guess *:#: {
  if ($2 == %number) { set %number 0 | msg $chan Wahoo $nick $+ , you got it right, the number was %number }
  if (%number < $2) { msg $chan Less Than $2 }
  if (%number > $2) { msg $chan Greater Than $2 }
  if ($2 == $null) { msg $chan You Didn't Guess Any Number.. }
  if (%number == $null) { msg $chan Type !guesson to start a game. }
}
-------------------------------
on *:input:#: {
  if ($1 == !guesson) { /set %number $rand(1,100) {
    msg $chan Type !guess <number> }
  }
}
on *:input:#: {
  if (($1 == !guess) && ($2 < %number)) { msg $chan Less then $2 }
  if (($1 == !guess) && ($2 > %number)) { msg $chan Greater then $2 }
  if (($1 == !guess) && ($2 == %number)) { msg $chan Wahoo $nick $+ , you got it right, the number was %number2 }
}