on ^*:text:*:*: {
  if $chan || $nick {
    ;buraya sansür koymak istediğin kelimelri yazabilirsin ama regex bilmek zorundasın bilgin olssun örnekler aşağıda
    var %[COLOR="Red"]kelimele[/COLOR]r = (amc(ı|i)k)|(**(ı|i)na)|(yav(ş|s)a)|((i|ı)bne)|(g(ö|o)t)|(pe(z|s)even(k|g))|((k|g)odu(ğ|g)umun)|(yalar(ı|i)m)|(f*ar(ı|i)yorum)|(s(ı|i)k(e|i))|(yar{1,}a(k|g))


    %[COLOR="red"]kelimeler[/COLOR] = $+(/,$chr(40),%[COLOR="red"]kelimeler[/COLOR],$chr(41),/gi)
    echo -mt $iif($chan,$chan,$nick) $+(<,$nick,>) $regsubex($1-,%[COLOR="red"]kelimeler[/COLOR],$+(4,$chr(44),4,\1,))
    halt
  }
}