Mine

on *:JOIN:#pcplace:{
  if ($nick ison #pc || $nick ison #rspc || $nick ison #pcelites || $nick ison #thehq || $nick ison #thepc || $nick ison #pcw || $nick ison #wildpc || $nick ison #p.c.w || $nick ison #mainpc || $nick ison #rips || $nick ison #nucs) {
    mode #pcplace +b ~q: $+ $address($nick,2)
    notice $nick You are on another pc channel. Please part the other pc channel then rejoin this one.
    set %multi. [ $+ [ $nick ] ] on
  }
}
on *:PART:#pcplace:{
  if (%multi. [ $+ [ $nick ] ] == on) {
    if ($nick !ison #pc || $nick !ison #rspc || $nick !ison #pcelites || $nick !ison #thehq || $nick !ison #thepc || $nick !ison #pcw || $nick !ison #wildpc || $nick !ison #p.c.w || $nick !ison #mainpc || $nick !ison #rips || $nick !ison #nucs) {
      mode #pcplace -b ~q: $+ $address($nick,2)
      set %multi. [ $+ [ $nick ] ] off
    }
  }
}