IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 3 Toplam 4 Sayfadan 12 3 4
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   Badnick koruması (users bölümüne eklenerek) (https://www.ircforumlari.net/mirc-scripting-sorunlari/162826-badnick-korumasi-users-bolumune-eklenerek.html)

Difuzyon 11 Mayıs 2011 21:35
Cevap: Badnick koruması (users bölümüne eklenerek)
 
Kod:
alias badnicktara {
  if ($server == irc.sunucu.org) {
    if $me isop $1 {
      set %kanal $chan
      set %:bulunan 0
      var %s 1
      while %s <= $nick($1,0) {
        %:gnick = $nick($1,%s)
        if %:gnick isreg $1 && $ulist(%:gnick,8,0) && !$ulist(%:gnick,koruma,0) {       
          inc %:bulunan 1
          echo -a  4#3› 4BADNICK :1,0 %:gnick 0,1>> Koruma Ekle
        }
        inc %s
      }
      echo -a 0,7Badnickler tarandi: $1 - %:bulunan badnick bulundu.
    }
    else { echo -a 0,2 $1 kanalinda OP olmaniz gerekmektedir. }
  }
}
on *:nick: {
  if ($server == irc.sunucu.org) && $ulist($newnick,8,0) && !$ulist($newnick,koruma,0) {
    var %2 = 1 | while $comchan($newnick,%2) {
      if $me isop $comchan($newnick,%2) { echo #Turkiye 10Badnick olarak algılandı :0,7 $newnick >> 10Koruma Ekle }
      inc %2
    }
  }
}
on *:op:#turkiye:$iif(($server == irc.sunucu.org && $opnick == $me),badnicktara #)
on ^$*:hotlink:/Ekle$/S:*:if ($strip($1) == Ekle) { return } | halt
on *:hotlink:*:*:auser koruma $token($hotline,5,32)
on @*:join:#Turkiye: {
  if ($server == irc.sunucu.org) {
    if ($ulist($nick,koruma,0) >= 1) { return }
    if $ulist($nick,8,0) { echo # 10Badnick girişi yapıldı :1,0 $nick 10Badnick değilse >> 10Koruma Ekle }
  }
}
NICK eventınızda birtakım eksik(ben değişecek kısımda "if" yazmayı unutmuşum) ve fazlalıklar(%1,return,$true,$false olayla alakasız) düzenlendi.

MerakLıuSer 21 Aralık 2012 03:00
Cevap: Codeme bir iki eklenti LÜTFEN.
 
Alıntı:
Difuzyon Nickli Üyeden Alıntı (Mesaj 599365)
Kod:
on @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]:JOIN:*:{
  if ($ulist($nick,koruma,0) >= 1) { return }
  elseif !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,$chan,32) {
    mode $chan +b $nick
    kick $chan $nick Badnick sebebiyle atıldın...
  }
}
on *:NICK:{
  if ($ulist($newnick,koruma,0) >= 1) { return }
  else {
    if ($level($newnick) == badnick) {
      var %Cnk = 1
      while $comchan($newnick,%Cnk) {
        var %e = $v1
        if $me isop %e && !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,%e,32) {
          mode %e +b $newnick
          kick %e $newnick Dışarı!
        }
        inc %Cnk
      }
    }
  }
}
Kodu (Alt + r) REMOTE'a ekliyorsunuz.

Badnick eklemek :
Örnek) /auser badnick *gay*
Örnek) /auser badnick *****
Örnek) /auser badnick lez*
Örnek) /auser badnick *top*
Örnek) /auser badnick travesti

Koruma(nick) eklemek :
Örnek) /auser koruma gaye
Örnek) /auser koruma *tugay*
Örnek) /auser koruma turgay*
Örnek) /auser koruma leziz_yemek
Örnek) /auser koruma topcu_piyade

Badnick veya Koruma Silmek :
Örnek) /ruser koruma gaye
Örnek) /ruser badnick lez*

Bu işlemlerin nerde olup bittiğini görüntülemek için (Alt + r) ile açılan panelde "KULLANICI" başlığını tıklayınız.
Muaf kanal konusuna gelince hem JOIN hemde NICK event'larında " !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,$chan,32) " gereken yerlere kanal isimlerini yazarsanız.Ben 5 kanal yazdım, kanalları çoğaltma imkanınız var.

Kod Mantığı; kanala giren "badnick" listesinden biri önce "koruma" listeden olup olmayacağı sorgulanacaktır.Değilse ve muaf kanallar bulunmuyorsa işlem yapacaktır.Nick değiştirme konusunda da işlem benzerini takip eder.
Üstteki txt'ye göre daha seri işlem yapacaktır ve en önemlisi gereksiz yere while döngüsüne sokmaktan(mIRC'i kasmak) kurtulmuş olduk.
Yeterince anlaşılır olduğunu düşünüyorum.

İyi paylaşımlar...
ens nick'i, Kara_Murat tarafından kanaldan atıldı. Sebep; (Uygunsuz Nick Lütfen Degisiniz. mask(s): ens*)
böyle birşey ekleme şansimiz var mi?

MerakLıuSer 21 Aralık 2012 23:27
Cevap: Badnick koruması (users bölümüne eklenerek)
 
yani olaydan kastim attigi nick uselistteki hangi mask'dan etkilenmis onu göstersin;
delikanli nicki *delik* maskesinden etkilenmis gibi

TİGeR 22 Aralık 2012 01:51
Cevap: Badnick koruması (users bölümüne eklenerek)
 
Alıntı:
MerakLıuSer Nickli Üyeden Alıntı (Mesaj 1041260055)
yani olaydan kastim attigi nick uselistteki hangi mask'dan etkilenmis onu göstersin;
delikanli nicki *delik* maskesinden etkilenmis gibi
Kod:
on @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]:JOIN:*:{
  if ($ulist($fulladdress,koruma,0) >= 1) { return }
  elseif !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,$chan,32) {
    mode $chan +b $ulist($address($nick,5),$ulevel,1)
    kick $chan $nick Badnick sebebiyle atıldın...
  }
}
on *:NICK:{
  if ($ulist($newnick,koruma,0) >= 1) { return }
  else {
    if ($level($newnick) == badnick) {
      var %Cnk = 1
      while $comchan($newnick,%Cnk) {
        var %e = $v1
        if $me isop %e && !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,%e,32) {
          mode %e +b $newnick
          kick %e $newnick Dışarı!
        }
        inc %Cnk
      }
    }
  }
}
Bu sekilde düzelltim sanırm istediğin gibi oldu

Med Cezir 22 Aralık 2012 04:23
Cevap: Badnick koruması (users bölümüne eklenerek)
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Burada yapılmış olduğu gibi koyu şekilde belirtilen yerleri aynı şekilde koduna ekleyeceksin.

MerakLıuSer 22 Aralık 2012 15:49
Cevap: Badnick koruması (users bölümüne eklenerek)
 
sizin verdiginiz code ile benim kullandigim farkli ama tutmuyor ki :S bozdum codeyi komple

Med Cezir 22 Aralık 2012 22:34
Cevap: Badnick koruması (users bölümüne eklenerek)
 
Kod:
on @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]:JOIN:*:{
  if ($ulist($nick,koruma,0) >= 1) { return }
  elseif !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,$chan,32) {
    mode $chan +b $nick
    kick $chan $nick Badnick sebebiyle atıldın...Bulunan mask: $ulist($nick,badnick,1)
  }
}
on *:NICK:{
  if ($ulist($newnick,koruma,0) >= 1) { return }
  else {
    if ($level($newnick) == badnick) {
      var %Cnk = 1
      while $comchan($newnick,%Cnk) {
        var %e = $v1
        if $me isop %e && !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,%e,32) {
          mode %e +b $newnick
          kick %e $newnick Dışarı! Bulunan mask: $ulist($newnick,badnick,1)
        }
        inc %Cnk
      }
    }
  }
}

AttackZone 19 Mart 2014 13:54
Cevap: Codeme bir iki eklenti LÜTFEN.
 
Alıntı:
Difuzyon Nickli Üyeden Alıntı (Mesaj 606770)
Kod:
on @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]:JOIN:*:{
  if ($ulist($fulladdress,koruma,0) >= 1) { return }
  elseif !$istok(#kanal1 #kanal2 #kanal3 #kanal4 #kanal5,$chan,32) {
    mode $chan +b $nick
    kick $chan $nick Badnick sebebiyle atıldın...
  }
}
on *:NICK:{
  if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
  else {
    if $ulist($+($newnick,!*@*),badnick,0) {
      var %Cnk = 1
      while $comchan($newnick,%Cnk) {
        var %e = $v1
        if $me isop %e && !$istok(#kanal1 #kanal2 #kanal3 #kanal4 #kanal5,%e,32) {
          mode %e +b $newnick
          kick %e $newnick Dışarı!
        }
        inc %Cnk
      }
    }
  }
}
alias badnickekle {
  auser badnick $1 $+ !*@*
}
alias badnicksil {
  ruser badnick $1 $+ !*@*
}
alias nickkoruma {
  auser koruma $1 $+ !*@*
}
alias badidentekle {
  auser badnick *! $+ $1 $+ @*
}
alias badidentsil {
  ruser badnick *! $+ $1 $+ @*
}
alias identkoruma {
  auser koruma *! $+ $1 $+ @*
}

Badnick eklemek için:
/badnickekle *****
/badnickekle gay*

Badnick silmek için:
/badnicksil ***y
/badnicksil *lez*

Nick Koruma eklemek için:
/nickkoruma gaye*
/nickkoruma *tugay*

Badident eklemek için:
/badidentekle *msn*
/badidentekle gay

Badident silmek için:
/badidentsil *msn*
/badidentsil gay

İdent Koruma eklemek için:
/identkoruma msn
/identkoruma gaye*

İşlemleri takip için (ALT + r) "Kullanıcı" başlığından takip edebilirsiniz.Yeni kodlamayla Nick!Ident@Hostsisteminde çalışacaktır(Daha önce sadece *maske* olarak çalışıyordu).Kanala giren kullanıcının fulladdress bilgisi "badnick:" kullanıcı maskesiyle örtüşüyorsa; evvela "koruma:" maskesinde sorgulanacaktır, tutmuyorsa kanaldan atacaktır.
Nick değiştirme işleminde de sistem aynısı takip eder.Fakat nick değiştirme aşamasında ident kısmını sorgulamaz,sadece değişen nickin Nick kısmından sorgulama yapar.Bunu dikkate alırsınız...

İyi forumlar...
Bir önceki Kod da muaf nick ekleme vardı ama bu kod da göremedim. Muaf nick ekleye bilir miyiz?

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 13:54 -->-> Daha önceki mesaj 13:38 --

Bilgisi olan yardımcı olabilir mi? Difuzyon, hocamızın yazdığı güzel bi remote bu remoteye badnick Tarama ve Muaf nick eklemek mümkün mü?

IRC-Dancer 19 Mart 2014 19:17
Cevap: Badnick koruması (users bölümüne eklenerek)
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] burdan bakınız.

Feragat 19 Mart 2014 23:20
Cevap: Badnick koruması (users bölümüne eklenerek)
 
Muaf nick ve ident var zaten kodda.

Kod:
Nick Koruma eklemek için:
/nickkoruma gaye*
/nickkoruma *tugay*

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

İdent Koruma eklemek için:
/identkoruma msn
/identkoruma gaye*


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 20:55.
Sayfa 3 Toplam 4 Sayfadan 12 3 4
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk