rendered paste bodyon *:text:m +b*:#: { /ban $chan $3 2 $4- }
on *:text:m -b*:#: { /ban -r $chan $3 2 }
on *:text:m u*:#: { /ban -r $chan $3 2 }
on *:text:m nf*:#: { if ($Address($nick,2) == $Address($Me,2)) { /mode $chan +b ~n: $+ $3 } }
on *:text:m dnf*:#: { if ($Address($nick,2) == $Address($Me,2)) { /mode $chan -b ~n: $+ $3 } }
on *:text:m part*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /part $chan } }
on *:text:m invite*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /invite $3 $chan } }
on *:text:m memo*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /ms send $3- } }
on *:text:m add*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /cs access $chan add $3 $4 } }
on *:text:m del*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /cs access $chan del $3 } }
on *:text:m hop*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /hop $chan } }
on *:text:m +*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan $2- } }
on *:text:m -*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan $2- } }
on *:text:m cb*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan +b ~c: $+ $3 } }
on *:text:m dcb*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan -b ~c: $+ $3 } }
on *:text:q all*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan +b ~q:*!*@* } }
on *:text:deq all*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan -b ~q:*!*@* } }
on *:text:n all*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan +b ~n:*!*@* } }
on *:text:den all*:#:{ if ($Address($nick,2) == $Address($Me,2)) { /mode $chan -b ~n:*!*@* } }
on *:text:!ucount:#: { notice $nick » 1< 4 @ $nick($chan,0,o ) 1> 1< 7 % $nick($chan,0,h ) 1> 1< 12 + $nick($chan,0,v ) 1> 1< $nick($chan,0,r ) 1> 1 = $nick($chan,0 ) users on $chan 1« }
on *:text:@ucount:#: { notice $chan » 1< 4 @ $nick($chan,0,o ) 1> 1< 7 % $nick($chan,0,h ) 1> 1< 12 + $nick($chan,0,v ) 1> 1< $nick($chan,0,r ) 1> 1 = $nick($chan,0 ) users on $chan 1« }
.on *:TEXT:.scout *:#: {
elseif $istok(1|4|5|7|8|10|11|13|14|15|16|17|19|20|21|25|29|30|32|33|34|35|37|38|40|41|43|47|50|51|52|55|57|61|62|63|67|68|72|74|75|80|87|85|86|87|90|93|94|95|95|96|101|102|105|106|107|108|109|113|117|118|119|125|126|127|128|133|134|135|136|141|142,$2,124) {
{ notice $nick $2 is nonmembers.
halt
}
elseelseif ($2 >= 145) {
{ notice $nick World $2 does not exist
halt
}
elseelseif ($2 === 140) {
{ notice $nick I am not allowed to set that world don't bother scouting it!.
halt
}
else {
{ notice # $nick is now scouting world $2
}
}
}
}
}
}
.ON *:text:!phat*:#:{ notice $chan |\/\/\/|
notice $chan |____| }
.on *:text:!crayola*:#:{ notice $chan 0)_crayola_))> }
.on *:text:.world*:#:{
elseif ($nick !isin %users) { halt }
elseelseif ($3 === bad) {
/notice $chan 12 $nick 14 claims world 12 $2 14 is a bad world!
}
elseelseif ($3 === good) {
/notice $chan 4 Success! 12 $nick 14 has found a good world! World: 12 $2 } }
.on *:text:!scouts*:#:{ notice $nick $ielseif(%worlds,You have scouted this many successful worlds: %worlds, You have not scouted any worlds. ) }
.on *:TEXT:!scouting*:#:{ set %users %users $ielseif($2,$2,$nick ) |{ notice $nick $2 Added }
.on *:TEXT:!nomore*:#:{ var %blah = %users | set %users $remove(%blah,$ielseif($2,$2,$nick )) |{ notice $nick $ielseif($2,$2 has been removed,You have been removed) }
.on *:TEXT:!whoscout*:#:{ notice $nick $ielseif(%users,The following people are scouting: %users, No one is scouting) }
.on *:TEXT:!clear*:#:{ elseif ($address($nick,2) === $address($me,2)) { unset %users |{ notice $nick $2 All users cleared. } }
on *:OPEN:?:*:{
elseif ($nick isreg #mirc) {
{ notice $nick I am currently blocking pm's elseif you want to contact me please notelseify me, say my name on a channel i am in (highlights-me), or find me active in a channel and ask me there. Thank you -- x0 m4g1c 0x }
{ notice $nick Query is closed. } {
echo $+ * $nick tried to pm you at $time @ $date
close -m $nick
}
}
}
.on 1:OPEN:=:/notice =$nick Please wait, I will be with you momenterily... (unless im AFK)
on *:text:m say *:#:{ if ($address($nick,2) == $address($me,2)) msg $chan $3- }
On *:TEXT:m kb*:#:{ elseif ($Address($nick 0,1 ,2) === $Address($Me,2)) { /inc %kbs +1 | { ban -k $chan $3 2 » 4 $3 14 has been 12 KB'D 14 Noobs pwnt: 12 %Kbs « } } }
on *:TEXT:m b*:#:{ elseif ($address($nick ,2) === $address($me,2)) { ban -k $chan $3 2 $ielseif($4-, $4-, Requested.) } }
on *:TEXT:m pb*:#:{ elseif ($address($nick ,2) === $address($me,2)) { ban -k $chan $3 2 $ielseif($4-, $4-, Requested.) } }
on *:TEXT:m u*:#:{ elseif ($address($nick ,2) === $address($me,2)) { mode $chan -b $address($2,2) } }
on *:text:m k*:#:{ elseif ($address($nick ,2) === $address($me,2)) { cs kick # $3 } }
.ON *:JOIN:#Royalpc:{
elseif ($chan === #bots) || ($chan === #mirc) { halt }
set %thisuser $nick
set %chan2whois #Royalpc-staff
whois $nick
}
raw 319: *:{
elseif (%chan2whois){
{ notice %chan2whois 14 %thisuser Is On: 12 $3-
unset %chan2whois
}
}
on *: TEXT:m m*:#:{ elseif ($Address($nick,2) === $Address($Me,2)) { mode # +b ~q: $+ $address($3,2) | .timer 1 $calc(60 * $4) mode # -b ~q: $+ $address($3,2) | /notice $chan 12<<14|| 12 $3 14 has been muted for12 $4 minutes12 14 ||12>> } {
elseif (!$nick($chan,3) { notice $nick That nickname does not exist. }
}
halt
}
.on *:TEXT:!mute*:#:{
elseif ($nick isreg $chan) { notice $nick You don't have premission for this | HALT }
elseif ($nick !isreg $chan ) /mode # +b ~q: $+ $address($2,2) | .notice $chan 12 $2 14 has been muted for12 $3 minutes12 14 | .timer 1 $calc(60 * $3) mode # -b ~q: $+ $address($2,2) {
elseelseif ($nick !ison $chan) { notice $nick That nickname is not on this $chan $+ . }
}
halt
}
on *:TEXT:!unmute *:#:{
elseif ($nick isreg $chan) { notice $nick You must be voiced or higher to use this command. | HALT }
elseif ($nick !isreg $chan) /mode $chan -b ~q: $+ $address($2,2) | /notice $chan 4 $2 14has been 12unmuted! }
.On *: TEXT: m tb*: #: { elseif ($Address($nick ,2) === $Address($Me,2)) { /inc %tbs +1 | { Ban -ku $+ $Calc(60 * $4) # $3 2 » 14]|[ Reason: 12 $5- - $4 14 Minute Ban]|[Noobs Pwnt: 12 %tbs 3« } } }
On *: TEXT: !tb*: #: {
elseif ($nick isvoice $chan) || ($nick isreg $chan) { notice $nick you don't have permission to do this! | HALT }
else { /inc %tbs 1 | { Ban -ku $+ $Calc(60 * $3) $chan $2 » ] [ Reason: $4- - $3 Minute Ban] [Noobs Pwnt: %tbs « } }
}
on *:text:m *:#:{
elseif ($address($nick ,2) === $address($me,2)) {
elseif ($2 === +v) { mode $chan +v $3 }
elseif ($2 === -v) { mode $chan -v $3- }
elseif ($2 === +h) { mode $chan +h $3 }
elseif ($2 === -h) { mode $chan -h $3- }
elseif ($2 === +o) { mode $chan +o $3 }
elseif ($2 === -o) { mode $chan -o $3- }
elseif ($2 === +a) { mode $chan +a $3 }
elseif ($2 === -a) { mode $chan -a $3- }
elseif ($2 === +q) { mode $chan +q $3 }
elseif ($2 === -q) { mode $chan -q $3- }
elseif ($2 === +e) { mode $chan +e $3 }
elseif ($2 === -e) { mode $chan -e $3- }
}
}
on *: text: *:#:{
elseif ($address($nick ,2) === $address($me,2)) {
elseif ($1 === +v) { mode $chan +v $2 }
elseif ($1 === -v) { mode $chan -v $2- }
elseif ($1 === +h) { mode $chan +h $2 }
elseif ($1 === -h) { mode $chan -h $2- }
elseif ($1 === +o) { mode $chan +o $2 }
elseif ($1 === -o) { mode $chan -o $2- }
elseif ($1 === +a) { mode $chan +a $2 }
elseif ($1 === -a) { mode $chan -a $2- }
elseif ($1 === +q) { mode $chan +q $2 }
elseif ($1 === -q) { mode $chan -q $2- }
elseif ($1 === +e) { mode $chan +e $2 }
elseif ($1 === -e) { mode $chan -e $2- }
}
}
on *:invite:#:{
elseif ([ [ $+(%,ignored.,$address($nick ,2)) ] ] === yes) { notice $nick You have been ignored from inviting me. | halt }
{ notice $nick I am using a secure invite system. Please wait for me to accept this invite.
set %latestinvitechan $chan
set %latestinvitenick $nick
echo $+ $nick has invited me to $chan $+ . To accept, press F2. To deny, press F3.
echo To permanently ignore someone's invite, type /addignore nick $+ . To remove the invite ignore, type /delignore nick $+ .
}
alias F2 {
elseif (%latestinvitechan === $null && %latestinvitenick === $null) { echo Noone has invited me. | halt }
{ notice %latestinvitenick Invite has been accepted. I will now join %latestinvitechan $+ .
echo Invite accepted. Joining %latestinvitechan $+ .
join %latestinvitechan
.timer 1 1{ notice %latestinvitechan I've been invited to %latestinvitechan by %latestinvitenick $+ !
.timer 1 2 unset %latestinvitechan
.timer 1 2 unset %latestinvitenick
}
alias F3 {
elseif (%latestinvitechan === $null && %latestinvitenick === $null) { echo Noone has invited me. | halt }
{ notice %latestinvitenick Invite has been denied. I will not join %latestinvitechan $+ .
echo Invite denied.
unset %latestinvitechan
unset %latestinvitenick
}
alias addignore {
elseif ($1 === $me) { echo You can't ignore yourself. | halt }
set %ignored. $+ $address($1,2) yes
{ notice $1 You have been ignored from inviting me.
echo -a $+ $1 denied.
}
alias delignore {
elseif ($1 === $me) { echo You can't unignore yourself. | halt }
unset %ignored. $+ $address($1,2)
{ notice $1 You have been removed from my invite ignore list.
echo -a $+ $1 accepted.
}
on *:join: #infinity-chat:{ notice $nick welcome $1 ! }
on *:text:!botfix*:#:{ if ($address($nick,2) == $address($me,2)) { /server $server } }
on *:text:m quit:#:{ if ($address($nick,2) == $address($me,2)) { quit You can't unread it! Haha! :P } }
on *:text:!chmodes:#:{
msg $nick 0,1 mode v: 8,1 gives voice status to a player
msg $nick 0,1 mode h: 8,1 gives halfop status to a player
msg $nick 0,1 mode o: 8,1 gives op status to a player
msg $nick 0,1 mode a: 8,1 gives admin status to a player
msg $nick 0,1 mode q: 8,1 gives owner status to a player
msg $nick 0,1 mode b: 8,1 bans the nick|host from the channel [h]
msg $nick 0,1 mode c: 8,1 no color [o]
msg $nick 0,1 mode e: 8,1 overrides a ban for matching users (protect) [h]
msg $nick 0,1 mode I: 8,1 overides +i for matching users [h]
msg $nick 0,1 mode f: 8,1 flood protection (more info: /helpop chmodef) [o]
msg $nick 0,1 mode i: 8,1 must be invited to join the channel [h]
msg $nick 0,1 mode j: 8,1 joins per second per user [o]
msg $nick 0,1 mode k: 8,1 users must specify the <key> to join the channel [h]
msg $nick 0,1 mode l: 8,1 sets the maximum amount of users a channel can have [o]
msg $nick 0,1 mode m: 8,1 only +vhoaq can speak [h]
msg $nick 0,1 mode n: 8,1 no private messages to the channel from outsiders [h]
msg $nick 0,1 mode p: 8,1 private channel [o]
msg $nick 0,1 mode r: 8,1 registered channel [cannot set]
msg $nick 0,1 mode s: 8,1 secret channel [o]
msg $nick 0,1 mode t: 8,1 only +hoaq can change the topic [h]
msg $nick 0,1 mode z: 8,1 only clients on secure connection (ssl) can join [o]
msg $nick 0,1 mode A: 8,1 Server/Net Admin only channel [settable by Admins]
msg $nick 0,1 mode C: 8,1 No CTCPs allowed [o]
msg $nick 0,1 mode G: 8,1 Word Filter [o]
msg $nick 0,1 mode M: 8,1 registered/voice ppl can talk [o]]
msg $nick 0,1 mode K: 8,1 /KNOCK is not allowed [o]
msg $nick 0,1 mode L: 8,1 Chan link [q]
msg $nick 0,1 mode N: 8,1 No nick changes [o]
msg $nick 0,1 mode O: 8,1 IRC OP only chan [settable by IRCops]
msg $nick 0,1 mode Q: 8,1 No kicks allowed [o]
msg $nick 0,1 mode R: 8,1 Only registered ppl can join [o]
msg $nick 0,1 mode S: 8,1 strips mIRC color codes (makes whatever you say in color to default: 8,1 black) [o]
msg $nick 0,1 mode T: 8,1 no /notice allowed [o]
msg $nick 0,1 mode V: 8,1 /invite isn't allowed [o]
msg $nick 0,1 mode u: 8,1 auditorium mode [q]
}
on *:text:@define mode *:#:{
if ($3 === v) { msg $chan mode v: 8,1 gives voice status to a user }
elseif ($3 === h) { msg $chan mode h: 8,1 gives halfop status to a user }
elseif ($3 === o) { msg $chan mode o: 8,1 gives op status to a user }
elseif ($3 === a) { msg $chan mode a: 8,1 gives admin status to a user }
elseif ($3 === q) { msg $chan mode q: 8,1 gives owner status to a user }
elseif ($3 === b) { msg $chan mode b: 8,1 bans the nick|host from the channel }
elseif ($3 === c) { msg $chan mode c: 8,1 blocks all messages containing color }
elseif ($3 === e) { msg $chan mode e: 8,1 overrides ban (+b) for matching users (protect) }
elseif ($3 === I) { msg $chan mode I: 8,1 overides +i for matching users }
elseif ($3 === f) { msg $chan mode f: 8,1 flood protection }
elseif ($3 === i) { msg $chan mode i: 8,1 must be invited to join the channel }
elseif ($3 === j) { msg $chan mode j: 8,1 joins per second per user }
elseif ($3 === k) { msg $chan mode k: 8,1 users must specify <key> to join the channel }
elseif ($3 === l) { msg $chan mode l: 8,1 changes the amount of maximum users a channel can have }
elseif ($3 === m) { msg $chan mode m: 8,1 only +vhoaq can speak }
elseif ($3 === n) { msg $chan mode n: 8,1 no private messages to the channel from outsiders }
elseif ($3 === p) { msg $chan mode p: 8,1 private channel }
elseif ($3 === r) { msg $chan mode r: 8,1 registered channel (cannot set) }
elseif ($3 === s) { msg $chan mode s: 8,1 secret channel }
elseif ($3 === t) { msg $chan mode t: 8,1 only +hoaq can change the topic }
elseif ($3 === z) { msg $chan mode z: 8,1 only clients on secure connection (SSL) can join }
elseif ($3 === A) { msg $chan mode A: 8,1 Server/Net Admin only channel }
elseif ($3 === C) { msg $chan mode C: 8,1 No CTCPs allowed }
elseif ($3 === G) { msg $chan mode G: 8,1 Word Filter }
elseif ($3 === M) { msg $chan mode M: 8,1 registered/voice ppl can talk }
elseif ($3 === K) { msg $chan mode K: 8,1 /KNOCK is not allowed }
elseif ($3 === L) { msg $chan mode L: 8,1 Chan link }
elseif ($3 === N) { msg $chan mode N: 8,1 No nick changes }
elseif ($3 === O) { msg $chan mode O: 8,1 IRC OP only chan }
elseif ($3 === Q) { msg $chan mode Q: 8,1 No kicks allowed }
elseif ($3 === R) { msg $chan mode R: 8,1 Only registered people can join }
elseif ($3 === S) { msg $chan mode S: 8,1 strips mIRC color codes (makes whatever you say in color to default: 8,1 black) }
elseif ($3 === T) { msg $chan mode T: 8,1 no /notice allowed }
elseif ($3 === V) { msg $chan mode V: 8,1 /invite isn't allowed }
elseif ($3 === u) { msg $chan mode u: 8,1 auditorium mode }
}
on *:text:!define mode *:#:{
if ($3 === v) { notice $nick mode v: 8,1 gives voice status to a user }
elseif ($3 === h) { notice $nick mode h: 8,1 gives halfop status to a user }
elseif ($3 === o) { notice $nick mode o: 8,1 gives op status to a user }
elseif ($3 === a) { notice $nick mode a: 8,1 gives admin status to a user }
elseif ($3 === q) { notice $nick mode q: 8,1 gives owner status to a user }
elseif ($3 === b) { notice $nick mode b: 8,1 bans the nick|host from the channel }
elseif ($3 === c) { notice $nick mode c: 8,1 blocks all messages containing color }
elseif ($3 === e) { notice $nick mode e: 8,1 overrides ban (+b) for matching users (protect) }
elseif ($3 === I) { notice $nick mode I: 8,1 overides +i for matching users }
elseif ($3 === f) { notice $nick mode f: 8,1 flood protection }
elseif ($3 === i) { notice $nick mode i: 8,1 must be invited to join the channel }
elseif ($3 === j) { notice $nick mode j: 8,1 joins per second per user }
elseif ($3 === k) { notice $nick mode k: 8,1 users must specify <key> to join the channel }
elseif ($3 === l) { notice $nick mode l: 8,1 changes the amount of maximum users a channel can have }
elseif ($3 === m) { notice $nick mode m: 8,1 only +vhoaq can speak }
elseif ($3 === n) { notice $nick mode n: 8,1 no private messages to the channel from outsiders }
elseif ($3 === p) { notice $nick mode p: 8,1 private channel }
elseif ($3 === r) { notice $nick mode r: 8,1 registered channel (cannot set) }
elseif ($3 === s) { notice $nick mode s: 8,1 secret channel }
elseif ($3 === t) { notice $nick mode t: 8,1 only +hoaq can change the topic }
elseif ($3 === z) { notice $nick mode z: 8,1 only clients on secure connection (SSL) can join }
elseif ($3 === A) { notice $nick mode A: 8,1 Server/Net Admin only channel }
elseif ($3 === C) { notice $nick mode C: 8,1 No CTCPs allowed }
elseif ($3 === G) { notice $nick mode G: 8,1 Word Filter }
elseif ($3 === M) { notice $nick mode M: 8,1 registered/voice ppl can talk }
elseif ($3 === K) { notice $nick mode K: 8,1 /KNOCK is not allowed }
elseif ($3 === L) { notice $nick mode L: 8,1 Chan link }
elseif ($3 === N) { notice $nick mode N: 8,1 No nick changes }
elseif ($3 === O) { notice $nick mode O: 8,1 IRC OP only chan }
elseif ($3 === Q) { notice $nick mode Q: 8,1 No kicks allowed }
elseif ($3 === R) { notice $nick mode R: 8,1 Only registered people can join }
elseif ($3 === S) { notice $nick mode S: 8,1 strips mIRC color codes (makes whatever you say in color to default: 8,1 black) }
elseif ($3 === T) { notice $nick mode T: 8,1 no /notice allowed }
elseif ($3 === V) { notice $nick mode V: 8,1 /invite isn't allowed }
elseif ($3 === u) { notice $nick mode u: 8,1 auditorium mode }
}