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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   reklam-küfür;kelime yasaklama (https://www.ircforumlari.net/mirc-scripting-sorunlari/20392-reklam-kufurkelime-yasaklama.html)

LeadeR 06 Temmuz 2006 02:28
reklam-küfür;kelime yasaklama
 
forumda onlarca kez sorulup , cevap verilmesine rağmen defalarca sorulan soruları burada hazırlıyorum ve cevaplarını bir bir veriyorum ki , tekrar sormak zorunda kalmayın

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


- kelimeleri engellemek için gerekli olan bilgileri öncelikle event derslerini okuyarak öğrenebilirsiniz ; [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

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 *http://* iswm $1- {
      gline $nick Reklam sebebi ile uzaklaştırıldınız
    }
    if *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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


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

iyi çalışmalar , kolay gelsin


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 17:30.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net