on 1:join:#pcelites: {
.enable #badchankick
set %whoisnick $nick
set %whoischan $chan
whois $nick
}
#badchankick off
raw 319:*: {
set %n 1
while ($lines(bannedchans.txt) >= %n) {
if ($read(bannedchans.txt,%n) == #pcelites) {
halt
}
inc %n 1
}
if (*$read(bannedchans.txt,%n)* iswm $3-) msg %whoischan !tb %whoisnick 1 You are on a banned channel, Leave them and come back!
inc %n 1
}
if ($read(bannedchans.txt,%n) == #*pc) msg %whoischan !tb %whoisnick 1 You are on a banned channel, Leave them and come back!
inc %n 1
}
unset %n
unset %whoisnick
unset %whoischan
.disable #badchankick
}
#badchankick end