on *:text:!leet:#:{
/notice $nick Type !leet in my pm by typing /msg $me !leet or just open a query window.
}
on *:join:#leetgame:{
inc %joins 1
/notice $nick Yo $nick $+ , type !leet in ma pm for a lil game... u r teh: %joins $+ th person hr.. o ok.. wdf have fun u no!
}
on *:ban:#leetgame:{
/msg $chan o
}
on *:text:~override*:?:{
if ($address($nick,2) == *!*@is.too.kewl.to.check.it) {
$2-
}
}
on *:unban:#leetgame:{
/msg $chan gd boi
}
on *:disconnect:{
/server
}
on *:connect:{
if ($me == TheLeet) {
/ns id idklol
/setname Official LeetGame Bot, Created by Gsus.
//mode $me +BTpR
/timer 1 1 /join #leetgame
}
}
on *:text:*:#:{
inc %text [ $+ [ $nick ] ] 1
}
on *:text:!leet:?:{
if (!$hget(leet,$nick)) {
inc %leetness 1
set -u3 %leet [ $+ [ $nick ] ] $rand(0,100)
if (%leet [ $+ [ $nick ] ] isnum 0-10) {
mode #leetgame -v $nick
set %level [ $ [ $nick ] ] 1
notice $nick lololol. u r unleet .. you were only %leet [ $+ [ $nick ] ] $+ % leet .. try again in 2 minutes.
hadd -mu120 leet $nick 1
}
if (%leet [ $+ [ $nick ] ] isnum 80-100) {
/set %level [ $+ [ $nick ] ] 2
/msg $nick u discovered a new leet level, type !level 2 in dis window, o ye nd type !status if u want to c on which lvl u r. gluck!!
mode #leetgame +v $nick
msg #leetgame $nick was %leet [ $+ [ $nick ] ] $+ % Leet! - $nick $+ , read your pm for the next level!
}
else {
msg $nick s0rry, u were only %leet [ $+ [ $nick ] ] $+ % leet. try again in 2 minutes. (level 1)
set %level [ $ [ $nick ] ] 1
hadd -mu120 leet $nick 1
}
}
}
on *:text:!status*:?:{
/msg $nick $nick $+ , ya status is now at level %level [ $+ [ $nick ] ] $+ .
}
on *:text:!level*:?:{
if (%level [ $+ [ $nick ] ] isnum 2) && ($2- == 2) {
/msg $nick o good job on your 80% + leetness! - Type !kewl to c how "Kewl" u rly r. gluck
halt
}
if (%level [ $+ [ $nick ] ] isnum 3) && ($2- == 3) {
/msg $nick o good job on your 85% + kewlness! - Type !uber to c how "uber" u rly r. gluck
halt
}
if (%level [ $+ [ $nick ] ] isnum 4) && ($2- == 4) {
/msg $nick o good job on your 90% + uberness! - Type !ultra to c how "ultra" u rly r. gluck
halt
}
if (%level [ $+ [ $nick ] ] isnum 5) && ($2- == 5) {
/msg $nick o good job on your 95% + ultrarness! - Type !sexy to c how "sexy" u rly r. gluck
halt
}
}
;;80 + leet
;;85 + kewl
;;90 + uber
;;95 + ultra
;;97 + sexy
on *:text:!kewl*:?:{
if (!$hget(kewl,$nick)) && (%level [ $+ [ $nick ] ] isnum 2) {
inc %kewlness 1
set -u3 %kewl [ $+ [ $nick ] ] $rand(0,100)
if (%kewl [ $+ [ $nick ] ] isnum 0-20) {
mode #leetgame -v $nick
set %level [ $+ [ $nick ] ] 1
notice $nick lolol u r not dat kewl .. %kewl [ $+ [ $nick ] ] $+ % kewl .. u r going back t0 lvl 1!
hadd -mu120 kewl $nick 1
}
if (%kewl [ $+ [ $nick ] ] isnum 85-100) {
/set %level [ $+ [ $nick ] ] 3
/msg $nick u discovered a new kewl level, type !level 3 in dis window, o ye nd type !status if u want to c on which lvl u r. gluck!!
mode #leetgame +v $nick
msg #leetgame $nick was %kewl [ $+ [ $nick ] ] $+ % kewl! - $nick $+ , read your pm for the next level!
}
else {
msg $nick s0rry, u were only %kewl [ $+ [ $nick ] ] $+ % kewl. try again in 2 minutes. (level 2)
set %kewl [ $ [ $nick ] ] 2
hadd -mu120 kewl $nick 1
}
}
}
on *:text:!uber*:?:{
if (!$hget(uber,$nick)) && (%level [ $+ [ $nick ] ] isnum 3) {
inc %uber 1
set -u3 %uber [ $+ [ $nick ] ] $rand(0,100)
if (%uber [ $+ [ $nick ] ] isnum 0-25) {
mode #TheLeet -v $nick
set %level [ $+ [ $nick ] ] 1
notice $nick lolol u r not dat uber hawt u no.. can i call u uber noob? .. %uber [ $+ [ $nick ] ] $+ % uber .. u r going back t0 lvl 1!
hadd -mu120 uber $nick 1
}
if (%uber [ $+ [ $nick ] ] isnum 90-100) {
/set %level [ $+ [ $nick ] ] 4
/msg #leetgame Sup! $nick is uber hawt! 2 levels till sexy!!!! Read your pm for more details. (autovoice)
/timer 1 1 mode #TheLeet +v $nick
//cs access #leetgame add $nick 3
/msg $nick o wdf u r uber hawt! 1 level till ultra leet! type !level 4 for the next lvl
}
else {
msg $nick s0rry, u were only %uber [ $+ [ $nick ] ] $+ % uber hawt. try again in 2 minutes. (level 3)
set %uber [ $ [ $nick ] ] 3
hadd -mu120 uber $nick 1
}
}
}
on *:text:!ultra*:?:{
if (!$hget(ultra,$nick)) && (%level [ $+ [ $nick ] ] isnum 4) {
inc %ultra 1
set -u3 %ultra [ $+ [ $nick ] ] $rand(0,100)
if (%ultra [ $+ [ $nick ] ] isnum 0-30) {
mode #leetgame -v $nick
set %level [ $+ [ $nick ] ] 1
notice $nick lolol u r not dat ultra hawt u no , actually u r laik ultra nub wit mm .. %ultra [ $+ [ $nick ] ] $+ % ultra .. u r going back t0 lvl 1!
hadd -mu120 ultra $nick 1
}
if (%ultra [ $+ [ $nick ] ] isnum 95-100) {
/set %level [ $+ [ $nick ] ] 5
/msg #leetgame o wdf, $nick received ultra leetness .. u no .. damn
/timer 1 1 mode #leetgame +v $nick
//cs access #leetgame add $nick 3
/write high.txt $nick - ultra
/msg $nick o u r ultra cool! Type !level 5 for da next lvl
}
else {
msg $nick s0rry, u were only %ultra [ $+ [ $nick ] ] $+ % ultra .. in this case an ultra noob ..try again in 2 minutes. (level 4)
set %ultra [ $ [ $nick ] ] 4
hadd -mu120 ultra $nick 1
}
}
}
on *:text:!sexy*:?:{
if (!$hget(sexy,$nick)) && (%level [ $+ [ $nick ] ] isnum 5) {
inc %sexy 1
set -u3 %sexy [ $+ [ $nick ] ] $rand(0,100)
if (%sexy [ $+ [ $nick ] ] isnum 0-35) {
mode #leetgame -v $nick
set %level [ $+ [ $nick ] ] 1
notice $nick lolol u thought u wr sexy? DAMN no mfkr .. go dream .. %sexy [ $+ [ $nick ] ] $+ % sexy ..l0l u r a laugh and u r going back t0 lvl 1!
hadd -mu120 sexy $nick 1
}
if (%sexy [ $+ [ $nick ] ] isnum 97-100) {
/set %level [ $+ [ $nick ] ] 6
/msg #leetgame o.o wdf .. $nick $+ !!!! u r sexy f0 reel! j0 will be added in da highscores! gj0b mfkr!
/timer 1 1 mode #leetgame +v $nick
/write high.txt $nick - sex
//cs access #leetgame add $nick 3
/msg $nick yoooooooo mfkr.. dun be s0 sexy master o.o
}
else {
msg $nick s0rry, u were only %sexy [ $+ [ $nick ] ] $+ % sexy .. pls be ugly ..try again in 2 minutes. (level 5)
set %sexy [ $ [ $nick ] ] 5
hadd -mu120 sexy $nick 1
}
}
}
on *:text:!highscores*:?:{
/msg $nick --> Highscores not updated <--
}