Just another in an endless string of these kinds of scripts. This is intended for use in a bot, and the bot must be opped in the channel that the game is played in.
;============================
;Russian Roulette
;Bot must be Opped in Channel
;By Anthalus
;Irc.FlirtUniverse.Net
;============================
on *!:TEXT:!rusr:#: {
if ( $me !isop # ) {
.msg $chan 12,15 I am not an Op on this Channel. I must be Opped to Play this game
.halt
}
else {
.inc $+(%,russ.roul.,$nick) 1
var %roulette.random = $rand(1,6)
inc %spins.roulette 1
if ( %roulette.random === 1 ) {
.msg $chan $nick picks up the pistol, spins the chamber, and pulls the trigger...
.msg $chan 8BANG!!!!!!
.kick $chan $nick You are Dead
inc %roulette.dead 1
.set %latest.death $nick
.unset $+(%,russ.roul.,$nick)
goto advert
}
else {
.msg $chan $nick picks up the pistol, spins the chamber, and pulls the trigger...
.msg $chan 14CLICK
if ( %record.nick.att == $null ) {
.set %record.nick.att $($+(%,russ.roul.,$nick),2)
.set %record.nick $nick
goto advert
}
elseif ( $($+(%,russ.roul.,$nick),2) > %record.nick.att ) {
.set %record.nick.att $($+(%,russ.roul.,$nick),2)
.set %record.nick $nick
goto advert
}
else {
goto advert
}
}
:advert
.set %percent.dead $calc(%roulette.dead / %spins.roulette )
.msg $chan Record Attempts: %record.nick %record.nick.att Total Spins: %spins.roulette Total Deaths: %roulette.dead Death Percent: %percent.dead Last Dead: %latest.death
}
}
on *!:TEXT:!rusr record:#: {
if ( $2 == record ) {
.notice $nick The Russian Roulette Records are: Record Attempts: %record.nick %record.nick.att Total Spins: %spins.roulette Death Percent: %percent.dead Total Deaths: %roulette.dead Last Dead: %latest.death
}
else {
.notice $nick The commands are: !rusr to play the game and !rusr record to see the records
.halt
}
.halt
}