@ falcon
you can add the word to the var or make a new code

just add the word to this line

var %swears = fark,shoot,mittens

so it looks like

var %swears = fark,shoot,mittens,farksss

or you could use somthing like this

on $@*:text:/(fuck(.+)?|shit(.+)?)/iS:#:{
  if ($nick(#,$nick,vr)) { 
    inc $+(%,warn,.,$nick,.,$chan)
    $iif($($+(%,warn,.,$nick,.,$chan),2) == 1,.notice $nick $nick $+ $chr(44) this is your $ord($($+(%,warn,.,$nick,.,$chan),2)) and only warning for using forbidden language,ban -ku300 # $nick 2 Using forbidden language) 
    $iif($($+(%,warn,.,$nick,.,$chan),2) == 2,unset $+(%,warn,.,$nick,.,$chan))
  }
}