rendered paste bodyon *:JOIN:#pest-hq,:{
set %whois. $chan
set %whois $nick
.whois $nick
}
raw 319:*:{
var %getchan 1
if ($nick ishop #pest-hq) || ($nick isvoice #pest-hq) || ($nick isop #pest-hq) || ($nick == $me) { halt }
while ( $numtok($3-,32) >= %getchan ) {
if ($len($read(bannedchans.txt, w, $remove($gettok($3-,%getchan,32),@,%,+) ))>3) && ($gettok($3-,%getchan,32) != %whois. [ $+ [ $2 ] ]) {
if (%whois. [ $+ [ $2 ] ] == $remove($gettok($3-,%getchan,32),@,%,+)) { inc %getchan }
else { ban -ku60 %whois. %whois 11,14You are on a banned channel. Please part it and come back!. 8,14 1 11Minute Ban. }
}
inc %getchan
}
unset %whois.
unset %whois
}