Çevrimiçi

[MTX Script kötü yazı koruması ]

ON ^*:TEXT:*:*: {
var %coco = 1
var %metin = $strip($1-)
if (%kelime = [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) {
;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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


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
}
}


kolay gelsin...

__________________
2b|!2b=?

 

Çevrimdışı

©º©º®î©º Nickli Üyeden Alıntı

[MTX Script kötü tazı koruması ]

tazı diiL yazı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimiçi

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)) Saol be iyiki uyardın yoksa script de öle kalacaktı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
code yazmakdan normal yazı yazmayı unuttuk
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
olur böle seyler. yanlışlıkla adam ölüyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
2b|!2b=?

 

Çevrimdışı

regex ile yazılmışını veriyim bende * yerine <cencored> kullandım
&#214;zellikleri: i&#231;inde aranan kelime ge&#231;iyorsa aktif olur /S nin anlamı
/S strip codes yani $strip ile aynı işi g&#246;r&#252;r control kodlarını iptal eder
regex hakkında daha fazla bilgi i&#231;in [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].


ON ^$*:TEXT:/\/
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
var %x , %i = $regsub($1-,$matchkey, <cencored> ,%x)
echo -tbf $iif($chan,$v1,$nick) $+(<,$nick,>) %x
haltdef
}