EmRaH Administrator
Mesaj Sayısı : 1095 Nerden : FraNsa Kayıt tarihi : 14/11/08
| Konu: İstenmeyen kelimeleri yıldızlayın C.tesi Kas. 15, 2008 12:51 pm | |
| - Kod:
-
ON ^*:TEXT:*:*: { var %coco = 1 var %metin = $strip($1-) if (%kelime = http://www.,.net,.com,a.k,köpek,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,]) gibi temanıza göre ayarlayabilirsiniz.
haltdef } } | |
|