Number Guessing Game

By deejay8 on Sep 06, 2008

!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 }
}

Comments

Sign in to comment.
napalm`   -  Sep 07, 2008

zOMG this pwns 11/10

/me RIPS

 Respond  
Akishoot   -  Sep 07, 2008

Haha. :P Looks like a fun bit of code. I'll test each of them later today. Seeing that it is 2:35 a.m. here, I'm gonna try and get some sleep first.

 Respond  
napa182   -  Sep 07, 2008

naw not really i made this one while they were making that one and i showed him it as well. lmao

 Respond  
Akishoot   -  Sep 07, 2008

And yet another code has been Napa'd! ;D

 Respond  
napa182   -  Sep 07, 2008

i didnt help in making this i made a diff one that does all the checks. i showed you the one i made lmao ;x

il show it again

ON *:TEXT:*:#:{ 
  if ($strip($1) == !Ng-Game) { 
    if (!$($+(%,number,$chan),2)) {
      set $+(%,number,$chan) $r(1,100) 
      msg $chan The Number Guessing game has begun. Type !Guess <Number 1 - 100 to play 
    } 
    elseif (!$($+(%,$chan,$nick,yesgame),2)) { msg $chan Game already in progress. Please Type " !guess 1-100 " to play. | set -u5 $+(%,$chan,$nick,yesgame) $nick }
  }
  if ($strip($1) == !guess) && (!$($+(%,flood,$chan),2)) { 
    set -u3 $+(%,flood,$chan) $nick
    if ($($+(%,number,$chan),2)) {
      if (!$2) || ($2 !isnum 1-100) { msg $chan 4Please pick a number 1-100 ex: !guess 34 }
      elseif ($2 == $($+(%,number,$chan),2)) { msg $chan 4 Well Done $nick The Number Was $2 | unset $+(%,number,$chan) }  
      else { msg # 3 $iif($2 < $($+(%,number,$chan),2),It's Higher Than $2,It's Lower Than $2) }
    }
    elseif (!$($+(%,$chan,$nick,nogame),2)) { msg $chan No Game in progress. Please Type " !Ng-Game " to start a game. | set -u5 $+(%,$chan,$nick,nogame) $nick }
  }
  if ($strip($1) == !ad) && (!$($+(%,flood,$chan),2)) { set -u3 $+(%,flood,$chan) $nick | Msg $chan This was made by dj801. Dj 801: http://www.hawkee.com/profile/48694/ }
  if ($strip($1) == !Ngg-End) && ($nick isop #) && ($($+(%,number,$chan),2)) { msg $chan The number guessing game has been ended by $nick | unset $+(%,number,$chan) }
}
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.