IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  vaybe sohbet

>
+
Etiketlenen Kullanıcılar

7Beğeni(ler)
  • 5 Post By Alper
  • 1 Post By Fredyyy
  • 1 Post By Alper

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 04 Haziran 2020, 15:53   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
mIRC Küfür Koruması (Hotlink)




Bir arkadaşın ricası üzerine yaptığım kodu sizinle paylaşıyorum...


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias kfrlr return (s[iİı]kt[iİı]r|p[iİı]ç(s[iİı]n)*|g[öÖo]t|amc[iİı]k) on *:text:*:#: { if $regex(x,$remove($1-,$chr(44),.,!,?,:,$chr(41),;),/(^|\s) $+ $kfrlr $+ (\s|$)/Si) { $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) echo -a $+($chr(3),07,$chan) $+($chr(3),01,Kanalında $chr(3),07,$nick $chr(3),01,Nicki Yasaklı:) $+($chr(3),04,$regml(x,2)) $+($chr(3),01,Kelimesini kullandı. Ceza:) [04 (Ban) 01] [10 (Ban+Kick) 01] [12 (Shun) 01] [06 (Zline) 01]) echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+($chr(3),07,$chan) $+($chr(3),01,Kanalında $chr(3),07,$nick $chr(3),01,Nicki Yasaklı:) $+($chr(3),04,$regml(x,2)) $+($chr(3),01,Kelimesini kullandı. Ceza:) [04 (Ban) 01] [10 (Ban+Kick) 01] [12 (Shun) 01] [06 (Zline) 01]) } } on ^$*:hotlink:*:*:{ if $regex($1,/\x28(Ban)\x29/Si) { return } elseif $regex($1,/\x28(Ban\+Kick)\x29/Si) { return } elseif $regex($1,/\x28(Shun)\x29/Si) { return } elseif $regex($1,/\x28(Zline)\x29/Si) { return } else { halt } } on *:hotlink:*:*:{ var %nck = $token($strip($hotline),3,32), %knl = $token($strip($hotline),1,32) if $regex($1,/\x28(Ban)\x29/Si) { if $regex(ops,$nick($chan,$me).pnick,[.~%&@]) || $regex(admns,$usermode,o) { mode %knl +b %nck } else { echo -a Yetkiniz Yok } } elseif $regex($1,/\x28(Ban\+Kick)\x29/Si) { if $regex(ops,$nick($chan,$me).pnick,[.~%&@]) || $regex(admns,$usermode,o) { mode %knl +b %nck $iif(%nck ison %knl,kick %knl %nck Küfür Yasak!) } else { echo -a Yetkiniz Yok } } elseif $regex($1,/\x28(Shun)\x29/Si) { if $regex(admns,$usermode,o) { shun %nck +0 Küfür Yasak! } else { echo -a Yetkiniz Yok } } elseif $regex($1,/\x28(Zline)\x29/Si) { if $regex(admns,$usermode,o) { zline %nck +0 Küfür Yasak! } else { echo -a Yetkiniz Yok } } }


Kırmızı işaretlediğim yere küfürleri aralarında | işaretini kullanarak eklemeniz gerekmekte.

Aktif pencere ve @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresinde bildirim ve yapabileceğiniz ceza seçenekleri gözükür.

Örnek:



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

__________________
Davut Alper BALCI - pC`kOpAt
 
Alıntı ile Cevapla

 

Etiketler
hotlink, küfür koruması, mirc


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Hotlink koruması class hAte PHP 0 15 Ocak 2015 06:46
Küfür Koruması AkReP mIRC Scripting Sorunları 6 09 Mayıs 2010 20:44
Küfür Koruması GuneL mIRC Scripting Sorunları 8 06 Mayıs 2009 13:57
Kendi yapacagım mirc'te küfür yazanı mirc ispiyonlasın? cashmare mIRC Scripting Sorunları 5 10 Temmuz 2008 00:14
BoT hakkında küfür koruması ekLeme !küfür Editor mIRC Scripting Sorunları 6 30 Kasım 2007 23:26