this script kicks out people who join with too many channels in their whois (default set to 15). It is generally useful in finding spammers who join many channels.Have fun!

on @*:join:#channel:{ whois $nick }
raw 319:*:{
  set %nochannels $3-
  if ($numtok(%nochannels,32) > 15) {
    var %i = $chan(0)
    while (%i) {
      if ($2 ison $chan(%i)) {
        kick $chan(%i) $2 Kick message here
        ban $chan(%i) $2 3
      }
    dec %i
    }
    unset %nochannels
  }
}