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