alias -l match_text { var %i = 1,%a = $readini($keke,swear,words) while ($gettok(%a,%i,44)) { var %swear = $+(/\b,$replace($v1,$chr(160),$chr(32)),\b/i) if $regex($1-,%swear) { return $true } inc %i } }