on @*:join:#: { whois $nick }
raw 319:*: { 
  if ($regex($3-,/badchan1|badchan2|badchan3/g)) { 
    var %x = 1
    while ($comchan($2,%x)) { 
      if ($comchan($2,%x).op) { 
      ban -k $comchan($2,%x) $2 2 Bad channel detected. }
      inc %x 
    }
  }
}