Number Guessing Game

[chain]

!Ng-game - Start Game
!guess 1 - 100 - Play Game
!ad - Ad for the script
!Ngg-End - End Game
!a - Get The Answer send to you in PM {OWNER ONLY}

NOTE: Thanks to ICE and Relurk for helpin

 

;;;;;;;;;;;;;;;;;;;;;;;;;;
;                        ;
;  Number Guessing Game  ;
;       By Dj 801        ;
;                        ;
;  irc.wubnet.org:6667   ;
;  #dj801,#mIRC,#games   ;
;                        ;
;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:LOAD: {
  .timer 1 1 /echo -a 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) 9,1 Thanks for Loading Number Guessing Game 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ 
  .timer 1 2 /set %ng-game-owner $$?="Game Owner:" 
  .timer 1 3 /set %ng-game-chan $$?="Game Channel:" 
}
Menu Channel {
 Number Guessing Game
 .Settings
 ..Channel Owner
 ...Owner:/echo -a 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) 9,1 The Game Owner is %ng-game-owner 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ 
 ...Change Owner:/set %ng-game-owner $$?="New Game Owner:" | /echo -a 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) 9,1 The New Game Owner is %ng-game-owner 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ 
 ..Channel
 ...Channel:/echo -a 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) 9,1 The Game Channel is %ng-game-chan 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ 
 ...Change Channel:/set %ng-game-owner $$?="New Game Channel:" | /echo -a 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) 9,1 The New Game Channel is %ng-game-chan 4,1 $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ $chr(171) $+ 
}
on *:TEXT:*:%ng-game-chan: { 
  if ($1 == !Ng-Game) { set %number $r(1,100) | msg $chan The Number Guessing game has begun. Type !Guess <Number 1 - 100 to play> | halt
  }  
  elseif (!Guess isin $1-) {
    if (%number isin $2) { msg $chan 4 Well Done $nick The Number Was $2 } 
    if ($2 == $null) { msg $chan 4 $nick Be sure to include a number when you guess. }
    if ($2 > 100) { msg $chan 3Please only guess numbers 1 - 100 }
    if ($2 < 1) { msg $chan 3Please only guess numbers 1 - 100 }
    if ($2 < %number ) { msg $chan 3It's Higher Than $2 }
    if ($2 > %number ) { msg $chan 3It's Lower Than $2 }
  }
  if (!ad isin $1) { msg $chan This was made by dj801. Dj 801: http://www.hawkee.com/profile/48694/ | msg $chan Thanks to ICE and Relurk for helping with the script  }
  if (!Ngg-End isin $1) && ($nick isop $chan) { msg $chan The number guessing game has been ended by $nick. | unset %number }
  if (!a isin $1) && ($nick == %owner) { inc %number | msg $nick The Number is %number }
}