on @*:TEXT:*:#:$cuss($1-)
on @*:ACTION:*:#:$cuss($1-)
on @*:NOTICE:*:#:$cuss($1-)
alias -l cuss {
 tokenize 32 $strip($1-)
 var %cuss = 1, %swear = $me @#$ black * negro niggah n1gger kike !@#$ !@#$ !@#$ SyracuseChat
 while ($gettok(%swear,%cuss,32)) {
   if ($findtok($1-,$v1,1,32)) {
     kick $chan $nick Please don't use that kind of language here.
   }
   inc %cuss
 }
}