on *:TEXT:*:#: {
set %badwords bad, words, seperated, by, commas
set %si 0
:loopin
inc %si 1
if ($gettok(%badwords,%si,44) == $null) { goto loopout }
if ($gettok(%badwords,%si,44) isin $1-) { //kick $chan $nick No Bad Words!!! }
goto loopin
:loopout
}