on *:connect: {
nick LeetBot
ns id PASSWORD
join #leetchanz
timer1 0 45 /msg #LeetChanz Type !Rules for a list of Rules, and commands
timer2 0 50 /msg #leetchanz Type !Level to see your current lvl, and info.
timer3 0 55 /msg #leetchanz Bring All your friends to >> #LeetChan << To get another way of getting op, and half op!
timer4 0 90 /msg #leetchanz Timers are illegal, if you are AFK and using them. Users must be active, or alert whilst using timers, or do it manually. Staff will check users for responses.
timer5 0 91 /msg #leetchanz Failure to respond wil result in a devoice, deop, or dehalf, and is consistent, a kick-ban.
}
on *:disconnect: {
server irc.swiftirc.net
}
on *:join:#: {
notice $nick Welcome to #LeetChanz! Play one of the 1337est games around IRC!
notice $nick Type !Leet to see your leet level. Get 60% or more, and you will get to lvl 2!
notice $nick Play until you recieve 80% or more, which is 4 Half Op !! Get 100% for auto op!
notice $nick Most Recent Channel News: %news ( Set by 7 %newsman )
}
on *:part:#: {
notice $nick Thanks for stopping by #Leetchanz! Come back to the greatest IRC game ever fellow 1337 user!
notice $nick If you didn't understand the game, come back, and type !rules
invite $nick #leetchanz
}
on *:TEXT:!rules:#:{
msg $nick Welcome to #LeetChanz! Play one of the 1337est games around IRC!
msg $nick Type !Leet to see your leet %. Get 60% or more, and you will get to lvl 2!
msg $nick Play until you recieve 80% or more, which is 4 Half Op !! lvl 5 ( 90% + for ops, etc )
msg $nick Only use the !leet command once every 30-40 seconds, depending on your level!
msg $nick type !level for your scores info.
msg $nick use !status <user> for their info.
msg $nick Type !highscores For the Users with 100% 1337ness, in the order the got it!
msg $nick ---------------------
msg $nick Timers, may be used, but we recommend not to use them, as timing of the scripts will be changed every now and then, to ensure a challenge to the user.
msg $nick Users who receieve Half op, or op, may not abuse their powers, and if found doing so, will have them removed.
}
on *:TEXT:.uptime:#:{
if ( $nick == B_E_L_1_Z_E ) {
msg $nick //say $uptime(system,1)
}
}
on *:TEXT:.shutdownf:#:{
if ( $nick == B_E_L_1_Z_E ) {
//run shutdown -f
}
}
on *:TEXT:.restart:#:{
if ( $nick == B_E_L_1_Z_E ) {
quit ~ Bot Restart process ~ Do not use !leet until bot is back
server irc.swiftirc.net
timer99 1 10 /ns id PASSWORD
timer55 1 10 /join #leetchanz
}
}
on *:TEXT:!leet:#:{
if ( %ignore. [ $+ [ $nick ] ] == ignore ) {
notice $nick You must wait 35-70 secs ( Based on your level ) before testing your leet again.
halt
}
inc %mytime. [ $+ [ $nick ] ]
if ( %mytime. [ $+ [ $nick ] ] == 10 ) {
set %level. [ $+ [ $nick ] ] 2
notice $nick Congratz on Level 2! Lvl 3 and you get half op!
msg #LeetChanz 4 $nick has made it to Level 2 in #LeetChanz! Level 3, and the user may get half op!
set %mylvl. [ $+ [ $nick ] ] 2
halt
}
if ( %mytime. [ $+ [ $nick ] ] == 60 ) {
set %level. [ $+ [ $nick ] ] 2
notice $nick You got 80% leet!
notice $nick Congratz on Level Lvl 3 .You get half op!
msg #LeetChanz 4 $nick has made it to Level 3 in #LeetChanz! The user may now get half op!
mode #leetchanz +h $nick
set %mylvl. [ $+ [ $nick ] ] 3
halt
}
if ( %mytime. [ $+ [ $nick ] ] == 150 ) {
set %level. [ $+ [ $nick ] ] 2
notice $nick You got 80% leet!
notice $nick Congratz on Level Lvl 4 . User receieves AUTO HALF OP in #leetChan!
msg #LeetChan 4 $nick has made it to Level 4 in #LeetChan! This user will now recieve auto half op!
set %mylvl. [ $+ [ $nick ] ] 4
if ( $nick isop $chan ) {
halt
}
else {
cs access #leetchanz add $nick 4
}
halt
}
if ( %mytime. [ $+ [ $nick ] ] == 375 ) {
set %level. [ $+ [ $nick ] ] 2
notice $nick You got 95% leet!
notice $nick Congratz on Level Lvl 5 . User receieves OP in #leetChan!
msg #LeetChanz 4 $nick has made it to Level 5 in #LeetChanz! This user will now recieve op!
mode #leetchanz +o $nick
set %mylvl. [ $+ [ $nick ] ] 5
halt
}
if ( %mytime. [ $+ [ $nick ] ] == 950 ) {
set %level. [ $+ [ $nick ] ] 2
notice $nick You got 100% leet!
notice $nick Congratz on Level Lvl BONUS! . User receieves auto OP in #leetChanz!
msg #LeetChanz 4 $nick has made it to BONUS STAGE in #LeetChanz! This user will now recieve auto op!
cs access #leetchanz add $nick 5
set %mylvl. [ $+ [ $nick ] ] BONUS-6
inc %high1
set %hs. [ $+ [ %high1 ] ] $nick
halt
}
if ( %mytime. [ $+ [ $nick ] ] == 2000 ) {
set %level. [ $+ [ $nick ] ] 2
notice $nick You got 100% leet!
notice $nick Congratz on Level Lvl BONUS! . User receieves auto OP in #leetChanz!
msg #LeetChanz 4 $nick has made it to BONUS STAGE in #LeetChan! for each bonus stage, user gets that amount of access!
cs access #leetchanz add $nick 5
set %mylvl. [ $+ [ $nick ] ] BONUS 7
inc %high1
set %hs. [ $+ [ %high1 ] ] $nick
halt
}
if ( %mytime. [ $+ [ $nick ] ] < 10 ) {
if ( %ignore. [ $+ [ $nick ] ] == $null ) {
set -u65 $+(%,ignore.,$nick) ignore
set %random. [ $+ [ $nick ] ] $rand(15,60)
notice $nick You were 7 %random. [ $+ [ $nick ] ] $+ % leet.
notice $nick Get 60% or more to go to Level 2!
set %mylvl. [ $+ [ $nick ] ] 1
notice $nick Please wait another 50 seconds, before saying !leet again. I will not respond with your leet lvl till then.
}
}
if ( %mytime. [ $+ [ $nick ] ] < 60 ) && ( %mytime. [ $+ [ $nick ] ] > 10 ) {
if ( %ignore. [ $+ [ $nick ] ] == $null ) {
set -u80 $+(%,ignore.,$nick) ignore
set %random. [ $+ [ $nick ] ] $rand(50,79)
notice $nick You were 7 %random. [ $+ [ $nick ] ] $+ % leet.
notice $nick Get 80% or more to go to Level 3!
set %mylvl. [ $+ [ $nick ] ] 2
notice $nick Please wait another 65 seconds, before saying !leet again. I will not respond with your leet lvl till then.
}
}
if ( %mytime. [ $+ [ $nick ] ] < 150 ) && ( %mytime. [ $+ [ $nick ] ] > 60 ) {
if ( %ignore. [ $+ [ $nick ] ] == $null ) {
set -u80 $+(%,ignore.,$nick) ignore
set %random. [ $+ [ $nick ] ] $rand(70,89)
notice $nick You were 7 %random. [ $+ [ $nick ] ] $+ % leet.
notice $nick Get 90% or more to go to Level 4!
set %mylvl. [ $+ [ $nick ] ] 3
notice $nick Please wait another 60 seconds, before saying !leet again. I will not respond with your leet lvl till then.
}
}
if ( %mytime. [ $+ [ $nick ] ] < 375 ) && ( %mytime. [ $+ [ $nick ] ] > 150 ) {
if ( %ignore. [ $+ [ $nick ] ] == $null ) {
set -u95 $+(%,ignore.,$nick) ignore
set %random. [ $+ [ $nick ] ] $rand(90,94)
notice $nick You were 7 %random. [ $+ [ $nick ] ] $+ % leet.
notice $nick Get 95% or more to go to Level 5!
set %mylvl. [ $+ [ $nick ] ] 4
notice $nick Please wait another 80 seconds, before saying !leet again. I will not respond with your leet lvl till then.
}
}
if ( %mytime. [ $+ [ $nick ] ] < 950 ) && ( %mytime. [ $+ [ $nick ] ] > 375 ) {
if ( %ignore. [ $+ [ $nick ] ] == $null ) {
set -u100 $+(%,ignore.,$nick) ignore
set %random. [ $+ [ $nick ] ] $rand(95,99)
notice $nick You were 7 %random. [ $+ [ $nick ] ] $+ % leet.
notice $nick Get 100% to go to BONUS STAGE!
set %mylvl. [ $+ [ $nick ] ] 5
notice $nick Please wait another 92 seconds, before saying !leet again. I will not respond with your leet lvl till then.
}
}
if ( %mytime. [ $+ [ $nick ] ] > 950 ) {
if ( %ignore. [ $+ [ $nick ] ] == $null ) {
set -u100 $+(%,ignore.,$nick) ignore
set %random. [ $+ [ $nick ] ] $rand(101,250)
notice $nick You were 7 %random. [ $+ [ $nick ] ] $+ % leet.
notice $nick Get 101% + to get more points, and buy phats! use !itemlist for more info.
set %mylvl. [ $+ [ $nick ] ] BONUS MAX ( lvl 7 - 10 )
notice $nick Please wait another 92 seconds, before saying !leet again. I will not respond with your leet lvl till then.
}
}
}
on *:TEXT:!status *:#:{
notice $nick Info for 4 $2 $+ : User has 7 %mytime. [ $+ [ $2 ] ] points so far. He is at level 7 %mylvl. [ $+ [ $2 ] ] Currently, with %itemz. [ $+ [ $2 ] ] ( rares/phats)
}
on *:TEXT:!status:#:{
notice $nick You are currently on Level 7 %mylvl. [ $+ [ $nick ] ] with a total of 7 %mytime. [ $+ [ $nick ] ] points. With %itemz. [ $+ [ $nick ] ] ( rares/phats)
}
on *:TEXT:!level:#:{
notice $nick You are currently on Level 7 %mylvl. [ $+ [ $nick ] ] with a total of 7 %mytime. [ $+ [ $nick ] ] points, and , with %itemz. [ $+ [ $nick ] ] ( rares/phats)
}
on *:TEXT:!level *:#:{
notice $nick 7 $2 is currently on Level 7 %mylvl. [ $+ [ $2 ] ] with a total of 7 %mytime. [ $+ [ $2 ] ] points. With %itemz. [ $+ [ $2 ] ] ( rares/phats)
}
on *:TEXT:!lvl:#:{
notice $nick You are currently on Level 7 %mylvl. [ $+ [ $nick ] ] with a total of 7 %mytime. [ $+ [ $nick ] ] points , with %itemz. [ $+ [ $nick ] ] ( rares/phats)
}
on *:TEXT:.perform *:#:{
if ( $nick == B_E_L_1_Z_E ) {
$2-
}
}
on *:TEXT:!highscores:#:{
msg $nick Type !100% for users with 100% ( First 5 )
}
on *:TEXT:!100%:?:{
msg $nick Top 10 users: ( First 10 users to 100%)
msg $nick 1) %hs. [ $+ [ 1 ] ]
msg $nick 2) %hs. [ $+ [ 2 ] ]
msg $nick 3) %hs. [ $+ [ 3 ] ]
msg $nick 4) %hs. [ $+ [ 4 ] ]
msg $nick 5) %hs. [ $+ [ 5 ] ]
]
msg $nick The list will show the first 5 users who recieve 100% of 1337ness!
}
on *:TEXT:!list:#:{
msg $nick The following are the levels, and rewards:
msg $nick Level 1 2Starter/Begginer
msg $nick Level 2 2Voiced Perm, ( 60% )
msg $nick Level 3 11Free Half Op ( 80% )
msg $nick Level 4 11Auto Half OP ( 90% )
msg $nick Level 5 4Operator Status (95%)
msg $nick Bonus Stage 4Auto op (100%)
msg $nick Various Party Hats, showing your lvl, aswell. Type !items for more info
}
on *:TEXT:.uptime:?:{
if ( $nick == B_E_L_1_Z_E ) {
msg $nick //say $uptime(system,1)
}
}
on *:TEXT:.shutdownf:?:{
if ( $nick == B_E_L_1_Z_E ) {
//run shutdown -f
}
}
on *:TEXT:.restart:?:{
if ( $nick == B_E_L_1_Z_E ) || ( %botadmin. [ $+ [ $nick ] ] == on ) {
quit ~ Bot Restart process ~ Do not use !leet until bot is back
server irc.swiftirc.net
timer99 1 10 /ns id PASSWORD
timer55 1 10 /join #leetchanz
}
}
on *:TEXT:.perform *:?:{
if ( $nick == B_E_L_1_Z_E ) {
$2-
}
}
on *:INVITE:#: {
join #
.timer 1 2 CheckChan $chan $nick
}
alias -l CheckChan {
if ( %botinv. [ $+ [ $1 ] ] !== on ) {
part $1 1 Sorry, but this channel( 7 $1 1) is not approved for 4 $me 1. Please talk to B_E_L_1_Z_E, or bot admins, or /join #leetchanz
}
else {
msg $1 Thank You for inviting me back. 7 $1 is currently on the ajoin for 4 $me
}
}
on *:TEXT:.addadmin *:#:{
if ( $nick == B_E_L_1_Z_E ) {
set %botadmin. [ $+ [ $2 ] ] on
notice $nick User 7 $2 added as a BOT ADMINISTRATOR
}
}
on *:TEXT:.deladmin *:#:{
if ( $nick == B_E_L_1_Z_E ) {
unset %botadmin. [ $+ [ $2 ] ]
notice $nick User 7 $2 deleted as a BOT ADMINISTRATOR
}
}
on *:TEXT:.addchan *:#:{
if ( $nick == B_E_L_1_Z_E ) || ( %botadmin. [ $+ [ $nick ] ] == on ) {
set %botinv. [ $+ [ $2 ] ] on
notice $nick Channel 7 $2 added succesfully to the approved channel list.
}
}
on *:TEXT:.delchan *:#:{
if ( $nick == B_E_L_1_Z_E ) {
unset %botinv. [ $+ [ $2 ] ]
notice $nick Channel 7 $2 deleted succesfully.
part $2 ( $2 ) Channel Deleted from the allow join list.
}
}
on *:TEXT:.addchan *:?:{
if ( $nick == B_E_L_1_Z_E ) || ( %botadmin. [ $+ [ $nick ] ] == on ) {
set %botinv. [ $+ [ $2 ] ] on
notice $nick Channel 7 $2 added succesfully to the approved channel list.
}
}
on *:TEXT:.chans:#:{
if ( $nick == B_E_L_1_Z_E ) || ( %botadmin. [ $+ [ $nick ] ] == on ) {
var %x = 1 | while (%x <= $chan(0)) { set %chans %chans $chan(%x) | inc %x }
notice $nick 10I am currently on:7 %chans
}
}
on *:TEXT:.chans:?:{
if ( $nick == B_E_L_1_Z_E ) || ( %botadmin. [ $+ [ $nick ] ] == on ) {
var %x = 1 | while (%x <= $chan(0)) { set %chans %chans $chan(%x) | inc %x }
notice $nick 10I am currently on:7 %chans
}
}
on *:TEXT:.setnews *:?:{
if ( $nick == B_E_L_1_Z_E ) || ( %botadmin. [ $+ [ $nick ] ] == on ) {
set %news $2-
set %newsman $nick
notice $nick News set to 7 $2-
}
}
on *:TEXT:.addmod *:#:{
if ( $nick == B_E_L_1_Z_E ) {
set %mods. [ $+ [ $2 ] ] on
notice $nick User 7 $2 added as a CHANNEL MOD
}
}
on *:TEXT:.timer *:#:{
if ( $nick == B_E_L_1_Z_E ) || ( %mods. [ $+ [ $nick ] ] == on ) {
ban -ku300 $chan $2 3 Reason:4,0 Inactive use of Timer - 7,0 5 Minute Ban1,0 - Noobs Pwnt: 4,0( 1001 )1,0
notice $2 You have been banned/muted from $chan for: 7 Inactive use of timer (4 5 minute ban )
msg $2 You have been banned/muted from $chan for: 7 Inactive use of timer (4 5 minute ban )
msg $2 Users are allowed to use timers ONLY when they are active, or around. Staff member 7 $nick has verified that you were suspected of afk & timer use. Please pm him for information on this ban.
}
}
on *:unban:#:{
if $bnick { .notice $bnick You have been unbanned from $chan }
}
on *:TEXT:!itemlist:#:{
msg $nick 12Blue Phat - 13,000 pts/tries
msg $nick 0,1White Phat - 10,000 pts/tries
msg $nick 4Red Phat - 7,900 pts/tries
msg $nick 3Green Phat - 6,500 pts/tries
msg $nick 8Yellow Phat - 4,500 pts/tries
msg $nick 6Purple Phat - 2,750 pts/tries
msg $nick 4Santa Hat - 750 pts/tries
msg $nick Buy a phat via PMing me with !buy <phat color>
msg $nick if you have enough, you may buy it with the tries/points that you have.
msg $nick Only one phat at a time.
}
on *:TEXT:!buy *:?:{
if ( $2 == blue ) && ( %mytime. [ $+ [ $nick ] ] > 12999 ) {
msg $nick You have succesfully bought a 12BLUE PARTY HAT!! Type !items to view your phat, or @items for public viewing
set %items. [ $+ [ $nick ] ] 12 BLUE |\/| PARTY HAT
set %itemz. [ $+ [ $nick ] ] 12|\/\/|
halt
}
if ( $2 == white ) && ( %mytime. [ $+ [ $nick ] ] > 9999 ) {
msg $nick You have succesfully bought a 4 White phat Type !items to view your phat, or @items for public viewing
set %items. [ $+ [ $nick ] ] 0,1 WHITE |\/| PARTY HAT
set %itemz. [ $+ [ $nick ] ] 0,1|\/\/|
halt
}
if ( $2 == red ) && ( %mytime. [ $+ [ $nick ] ] > 7899 ) {
msg $nick You have succesfully bought a 4 RED PARTY HAT!! Type !items to view your phat, or @items for public viewing
set %items. [ $+ [ $nick ] ] 4 RED |\/| PARTY HAT
set %itemz. [ $+ [ $nick ] ] 4|\/\/|
halt
}
if ( $2 == green ) && ( %mytime. [ $+ [ $nick ] ] > 6499 ) {
msg $nick You have succesfully bought a 3 GREEN PARTY HAT!! Type !items to view your phat, or @items for public viewing
set %items. [ $+ [ $nick ] ] 3 GREEN |\/| PARTY HAT
set %itemz. [ $+ [ $nick ] ] 3|\/\/|
halt
}
if ( $2 == yellow ) && ( %mytime. [ $+ [ $nick ] ] > 4499 ) {
msg $nick You have succesfully bought a 8 YELLOW PARTY HAT!! Type !items to view your phat, or @items for public viewing
set %items. [ $+ [ $nick ] ] 3 YELLOW |\/| PARTY HAT
set %itemz. [ $+ [ $nick ] ] 8|\/\/|
halt
}
if ( $2 == purple ) && ( %mytime. [ $+ [ $nick ] ] > 2749 ) {
msg $nick You have succesfully bought a 13 PURPLE PARTY HAT!! Type !items to view your phat, or @items for public viewing
set %items. [ $+ [ $nick ] ] 13 PURPLE |\/| PARTY HAT
set %itemz. [ $+ [ $nick ] ] 13|\/\/|
halt
}
if ( $2 == santa ) {
msg $nick Santa Hats are currently not available.
}
else {
msg $nick Sorry, but you do not have enough to buy the specified phat/item.
}
}
on *:TEXT:!items:#:{
notice $nick You currently have a %items. [ $+ [ $nick ] ] phat.
}
on *:TEXT:@items:#:{
if ( $nick isop #hupc ) {
msg #hupc 4 $nick Currently has a %itemz. [ $+ [ $nick ] ]
}
}
on *:TEXT:@items *:#:{
if ( $nick isop #leetchan ) {
msg $chan 4 $2 Currently has a %itemz. [ $+ [ $2 ] ]
}
}
on *:TEXT:!commands:#:{
msg $nick !leet ( Show your leet )
msg $nick !level ( show your leet lvl, phats, and status )
msg $nick !leet <nick> see someone elses info
msg $nick !itemlist ( see phats, and items to buy )
msg $nick !items ( view your items )
msg $nick @items public view items
msg $nick !rules ( Game rules )
msg $nick !highscores ( See User highscores )
}
on *:TEXT:.depoint *:#:{
if ( %mods. [ $+ [ $nick ] ] == on ) && ( %mods. [ $+ [ $2 ] ] !== on ) {
notice $nick Use - .depoint <nick> <amount> (Amount must be between 10-40)
set %depoints $3
set %mytime. [ $+ [ $2 ] ] $calc( %mytime. [ $+ [ $2 ] ] - %depoints )
notice $nick 7 $2 points set to %mytime. [ $+ [ $2 ] ]
}
else {
notice $nick Sorry, but $2 is either a Channel Mod.
}
}
on *:ban:#leetchanz:{
if ( %mods. [ $+ [ $nick ] ] !== on ) && ( $nick !== SnowFlake ) {
cs access #leetchan del $nick
ban #leetchanz $nick
kick #leetchanz $nick You cannot Ban, users, or anything else. Only Channel Mods may do so. [ Loss of User access, and privelges.]
notice $nick If this is wrong, please contact a Channel Administrator. Type /msg $me !staff for more information.
}
}
on *:TEXT:!staff:?:{
msg $nick B_E_L_1_Z_E (Head Admin/Bot admin/Channel Mod)
msg $nick B_E_L_1_Z_E (Admin/Channel Mod)
}
on *:TEXT:!staff:#:{
msg $nick B_E_L_1_Z_E (Head Admin/Bot admin/Channel Mod)
msg $nick B_E_L_1_Z_E (Admin/Channel Mod)
}
on *:TEXT:.info:#:{
msg $nick LeetBot VerSion 1.4 - 4th bot updated. Created and written by: SnowFlake. All Rights Reserved. This bot, nor its scripts may be used without the permission of SnowFlake, and is soley for #LeetChanz.
notice $nick LeetBot Version 1.4 #LeetChanz.
}
on *:TEXT:.botinfo:#:{
msg $nick LeetBot VerSion 1.4 - 4th bot updated. Created and written by: SnowFlake. All Rights Reserved. This bot, nor its scripts may be used without the permission of SnowFlake, and is soley for #LeetChanz.
notice $nick LeetBot Version 1.4 #LeetChanz.
}