mIRC Spam Checker

on *:JOIN:#: {
  .timer 1 10 /part $chan | .timer 1 40 /join $chan | return
}
on *:TEXT:*:?:{ 
  if ( (*http* iswm $strip($1-)) || (*www* iswm $strip($1-)) || (*#* iswm $strip($1-)) || (*join* iswm $strip($1-)) || (*chan* iswm $strip($1-)) ) {
    var %c $comchan($nick,0)
    while (%c) {
      if ($me isop $comchan($nick,%c)) { ban $comchan($nick,%c) $nick 2 | kick $comchan($nick,%c) $nick }
      dec %c
    }
    haltdef
  }
}