this is the code that prevent the non-words

on *:input:*:{
  if ($left($1,1) == /) || ($ctrlenter) || ($inpaste) { return }
  elseif $regex($1-,/(^| )(lol|fuck|assbag|hollywood undead|ay caramba|homies|mirc|light irc|trippy)(?:(?![[:punct:]]))\b/iS) {
    var %x = 11,1£12àµghîñg 11Ø12µt 11£12øµÐ
    var %x2 = 4,1FÙÇK
    var %x3 = 7,1A$$båg
    var %x4 = 11,1HÒ££YWÒÒÐ 4ÙÑÐÈÀÐ
    var %x5 = 4,1A11Y12-6C4A11R12A6M4B11A12!
    var %x6 = 11,1H4Ò11M4Ì11È4Z
    var %x7 = 12,1m4IR8C
    var %x8 = 11,1//12LîghtIRC11\\
    var %x9 = 12,1T13r4i7p11p3y
    msg $target $replace($1-,lol,%x,fuck,%x2,assbag,%x3,hollywood undead,%x4,ay caramba,%x5,homies,%x6,mirc,%x7,light irc,%x8,trippy,%x9)
    haltdef
  }
}

Dean_, if you already use regex to check the acronyms, you don't need this line at all:
[quote]
if ($left($1,1) == /) || ($ctrlenter) || ($inpaste) { return }

[/quote]

that line is really necessary on code, if you dont want it to be replaced using the $ctrlenter or the $inpaste
SunnyD if you check above, who starts all this, you will see that was not me, why you always comment my name? next time come here to comment about code, not about my post