Code:
 on ^*:open:?: {
  var %a = 0
  while (%a < $numtok(%spamwords,32)) {
    inc %a
    var %spamcheck = $gettok(%spamwords,%a,32)
    if ($istok($strip($1-),%spamcheck,32) == $true) {
      var %hai = 0
      while (%hai <= $comchan($nick,0)).op { 
        inc %hai
        ban -ku $comchan($nick,%hai) $nick 2 Private message spammer
      }
    }
  }
}
menu channel {
  Add SpamWords
  .Add:/set %spamwords $addtok(%spamwords,$$?,32) | echo -a 4SpamWord Added.
  .Remove:/set %spamwords $remtok(%spamwords,$$?,32) | echo -a 4SpamWord Removed.
}  


Remember its an on OPEN event so if you have a query window with that user already open it wont work