on *:start:{ $iif(!$isfile(badword.list),.write badword.list) | .hmake badword 100 | .hload badword badword.list }
#bwaddon off
on *:text:*:#:{
  if (!$nick(#,$nick,rv,oh%&~)) return
  if (($me isop $chan) || ($me ishelp $chan)) {
    if $hfind(badword,$strip($1-),1,W).data {
      ban -u600 # $mask($fulladdress,2)
    }
  }
}