Heres one I saw somewhere, that i thought was quite nice, I have remade it and havent tested it but i think its correct.
alt-r/file/new paste code below.
on ^*:text:*:#:{
tokenize 32 $strip($1-)
if ($1- != $replacex($1-, swearword1 , golly , swearword2 , gosh , swearword3 , drat, swearword4 , oh dear, swearword5 , whaaaat )) {
echo -itlbfmr $chan < $+ $Nick $+ > $v2
halt
}
}
* Note : this well pick out words inside other words however. Also you loose colors if anythings replaced.
You replace swearword1 with a swear word and golly you could replace with a phrase that would match in non potty mouth language.
You can have more than 5 as well.