istenmeyen yazıları **** olarak göstermek

ON ^*:TEXT:*:*: {
var %coco = 1
var %metin = $strip($1-)
if (%kelime = http://www.,.net,.com,a.k,köpek,piç,deneme/) {
    ;kelimeler örnek olarak eklendi bunları while yada hget ile de faklı biçimlerde kullanbilirsiniz.
    while $gettok(%kelime,%coco,44) {
      if ($v1 isin %metin) {
        var %metin = $replace(%metin,$v1,14*****)
        ;**** lı olan kısma alt+160 boş TAB karekterini kullanarak hiç bir yazı da görüntületmeyebilirsiniz. Tavsiye etmem. kişinin ne yazdıgı merak edilebilir
        inc %coco
      }
    }
}
if (***** isin %metin) {
    ;eger karakteri alt+160 ile ayarlarsanı yukarıdaki **** ları da aynı yapmalısınız.
    echo -tbf $iif($chan,$v1,$nick) $+(<,$nick,>) %metin
    ;$+(<,$nick,>) kısmını $+([,$nick,]) yukardaki örnekdeki gibi yapabilirsiniz.
    haltdef
}
}