LO, This is a more advanced version to the one allready posted, its got stats, and you only ot 5 tries to get the number!
;####Higher/Lower####
;####Scripted by Sw1ft @ #United-Kingdom ####
;#### Dont Change :) ####
;####Commmands####
;####$start####
;####$guess####
;####$stop#####
;#### The Game. ####
on 1:TEXT:$($!start):#:{
if (%gameoff == OFF) { halt }
if (%game) { halt }
if ($me isop $chan) {
inc %played [ $+ [ $address($nick,1) ] ]
set %nick $nick
set %channel $chan
set %number $rand(1,100)
set %game on
set %playss 5
timerhigh 1 360 lose
msg $chan 7Game 7On 7 %nick $+ , 7 $chr(36) $+ Guess <7number> ( 7 1 - 7 100 ) , To get the number, Youve got 5 Tries! Youve Got 60 Seocnds To Get The Number!
}
}
on 1:TEXT:$($!guess*):#:{
if (%gameoff == OFF) { halt }
if ($nick == %nick) {
if ($me isop $chan) {
inc %plays
if ($2 == %number) {
inc %well.played [ $+ [ $address($nick,1) ] ]
msg $chan Well Played 7 $nick $+ . , You Got It Right !
msg $chan 7Played: ( %played [ $+ [ $address($nick,1) ] ] ) 7Failed: ( %failed [ $+ [ $address($nick,1) ] ] ) 7Got Right: ( %well.played [ $+ [ $address($nick,1) ] ] )
unset %game
unset %plays
unset %number
timerhigh off
unset %nick
halt
}
if ($2 > 100) {
msg # $nick $+ . N7umbers ( 7 1 -7 100 )
halt
}
if ($2 == $null) {
msg $chan $chr(36) $+ guess <number>
halt
}
if (%plays == %playss) {
inc %failed [ $+ [ $address($nick,1) ] ]
kick $chan $nick 4Unlucky $nick $+ . The number Was (7 %number )
msg $chan 7Played: ( %played [ $+ [ $address($nick,1) ] ] ) 7Failed: ( %failed [ $+ [ $address($nick,1) ] ] ) 7Got Right: ( %well.played [ $+ [ $address($nick,1) ] ] )
unset %plays
unset %game
unset %plays
unset %number
unset %nick
timerhigh off
halt
}
if ($2 > %number) {
msg $chan The Number Is 7Lower $nick
halt
}
if ($2 < %number) {
msg $chan The Number Is 7Higher $nick
halt
}
}
}
}
on 1:TEXT:$($!stop):#:{
if (%gameoff == OFF) { halt }
if ($nick == %nick) { unset %nick | unset %game | unset %number | unset %number | unset %nick | timerhigh off | msg $chan 7Game 7Stopped. } }
on 1:TEXT:$(!stats):#:{
if (%guess) { halt }
else { set -u5 %guess 1 | msg $chan $nick $+ . 7Played: ( %played [ $+ [ $address($nick,1) ] ] ) 7Failed: ( %failed [ $+ [ $address($nick,1) ] ] ) 7Got Right: ( %well.played [ $+ [ $address($nick,1) ] ] )
}
}
alias lose {
inc %failed [ $+ [ $address(%nick,1) ] ]
kick %channel %nick 4Unlucky $nick $+ . The number Was (7 %number )
msg %channel 7Played: ( %played [ $+ [ $address(%nick,1) ] ] ) 7Failed: ( %failed [ $+ [ $address(%nick,1) ] ] ) 7Got Right: ( %well.played [ $+ [ $address(%nick,1) ] ] ) | unset %plays | unset %game | unset %plays | unset %number | unset %nick | halt
}
on 1:TEXT:$($!game*):#:{
if ($address($nick,1) iswm *!*sw1ft@wackybot.users.quakenet.org) {
if ($2 == off) {
set %gameoff off | msg # G7ame O7ff | halt }
if ($2 == on) {
unset %gameoff | msg # G7ame O7n | halt }
}
}