Tekil Mesaj gösterimi
Alt 17 Kasım 2009, 19:56   #5
Çevrimdışı
neobre
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: regex yardım




[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]İşine Yarar Umarım Örnekli Anlatımı Var
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Written: Cihan SAVSAR
-----------------------------------------------------------------------------
(*) Spamfilter haricinde " mirc " 'imi kullanarak nasıl reklamları engellerim ?

block(yasaklama)'nın bir çok önlemi olabilir , en çok kullanılan ve nadiren kullanılıp daha fazla başarı olan kodları sizlere vereceğim ;

öncelik olarak " isin ve iswm " 'i vereceğim

yasaklanacak olan kelimeler => http:// ,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
cjb.net , .org , .us , .biz



Kod:
on *:text:*:#: { if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers { if *[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *.net* iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *.com* iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *.gen.tr* iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *.cjb.net* iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *.org* iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *.us* iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } if *.biz* iswm $1- { gline $nick Reklam sebebi ile uzaklaştırıldınız } }}

iswm 'li reklam engelleme kodunu üst bölümde gördünüz , * 'ları kaldırdığınızda bütün cümlede arayacaktır , * 'lari kaldırmazsanız kelime sonlarında , eğer kaldırırsanız *'ları iswm yerine isin kullanmanız gerekmektedir.

Örnek ; if .org isin $1- {

--------------------------------------------------------------
--------------------------------------------------------------

Regex kullanarak nasıl engellenir ?



Kod:
on *:text:*:#: { if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers { if($regex($1-,/.*?([hH]{1,20}\W*[tT]{1,20}\W*[tT]{1,20}\W*[pP]{1,20}\W*[:.]{1,20}\W*[/\]{1,20}\W*[/\]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([wW]{1,20}\W*(v|V|[wW]){1,20}\W*[wW]{1,20}\W*[.]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*[cC]{1,20}\W*[oO]{1,20}\W*[mM]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*[nN]{1,20}\W*(é|€|[eE]){1,20}\W*[tT]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*(0|[oO]){1,20}\W*[rR]{1,20}\W*[gG]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*[gG]{1,20}\W*(é|€|[eE]){1,20}\W*[nN]{1,20}\W*[.:]{1,20}\W*[tT]{1,20}\W*[rR]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } }}
() * Sunucu genelinde reklam kontrol nasıl yapabilirim ? * ()
bunun için bir addon'a gerek yok aslında , direkt olarak describe kullanabilirsin ;

/describe $*serverin.com Reklam kontrol

bunun haricinde alt bölümde verdiğim kod , bütün server userlarina mesaj atar ve özelinize gelen reklamları gline ile cezalandırır


Kod:
raw 352:*: { if serv !isin $6 { msg $6 Reklam kontrol halt }}on *:text:*:?: { closemsg $nick if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers { if($regex($1-,/.*?([hH]{1,20}\W*[tT]{1,20}\W*[tT]{1,20}\W*[pP]{1,20}\W*[:.]{1,20}\W*[/\]{1,20}\W*[/\]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([wW]{1,20}\W*(v|V|[wW]){1,20}\W*[wW]{1,20}\W*[.]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*[cC]{1,20}\W*[oO]{1,20}\W*[mM]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*[nN]{1,20}\W*(é|€|[eE]){1,20}\W*[tT]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*(0|[oO]){1,20}\W*[rR]{1,20}\W*[gG]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } if ($regex($1-,/.*?([..]{1,20}\W*[gG]{1,20}\W*(é|€|[eE]){1,20}\W*[nN]{1,20}\W*[.:]{1,20}\W*[tT]{1,20}\W*[rR]{1,20})/)) { gline $nick Reklam sebebi ile uzaklaştırıldınız } }}
/who yazmanız yeterli olacaktır

Not : kullanabilmeniz için ircop(+o) usermodu taşımanız gerekmektedir. Değilseniz kullanamazsınız

************************************************** ******
************************************************** ******

üst bölümdeki reklam korumaları klasik işlerinizi görecek kodlarla dizilidir , bunları sağlıklı bir şekilde kullanabilirsiniz;

(*) Spamfilter haricinde " mirc " 'imi kullanarak nasıl küfürleri engellerim ?

reklamlarda olduğu gibi buradada event'imiz on *:text:*:#: { 'dir
lütfen event derslerini dikkatli bir şekilde inceleyiniz , aksi taktirde anlatımlarda zorlanabilirsiniz.

küfürlerde isin ve iswm genel olarak tercih edilendir , basit'tir , regex kullanımı pek sağlıklı değildir çok hassas olabilir

bütün küfürleri bir arada toplamak mümkün olmadığından ötürü , bir kaç örnek vererek nasıl yapacağınız açıklayacağım ;

yasaklanacak kelimeler => köpek , salak , mal , gerizekalı


Kod:
on *:text:*:#: { if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers { if köpek isin $1- { gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız } if salak isin $1- { gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız } if mal* iswm $1- { gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız } if ger?zekal?* iswm $1- { gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız } }}
üst bölümdede gördüğünüz gibi , dikkat ettiğinizde ne kadar basit olduğunu göreceksiniz ve bir kez daha sormak zorunda kalmayacaksınız ;

on *:text:*:#: { => başlangıc event'imiz
if yasaklanacakkelime isin $1- { => burası ayıklama yapacağınız bölüm
gline $nick Küfür => burası kullanıcı işlemi
} => burası ayıklama bölümünü sonlandırır
} => burası event bölümünü sonlandırır
----------------------------------------------------------------------
----------------------------------------------------------------------

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver