on *:INPUT:*: {
if ($left($1, 1) !isin $+(/,$readini($mircini,text,commandchar))) {
var %replacer = [color:Red]this,is,a,list,of,words,to,be,replaced[/color]
var %replace = [color:blue]this,is,what,they,should,be,replaced,with[/color]
var %r = 1, %msg = $1-
while ($gettok(%replacer, %r, 44) != $null) {
var %from = $ifmatch, %to = $iif($gettok(%replace, %r, 44), $ifmatch, %from)
var %msg = $replace(%msg, %from, %to)
/inc %r
}
/msg $active %msg
/halt
}
}