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

Feragat 20 Mart 2014 03:02

Cevap: Badnick koruması (users bölümüne eklenerek)
 
Ayrıca tarama yaptırmak için üstte difuzyon da paylaşmış; vereceğim alias ı kodun en altına ekle, /tara yaptığında, komutu hangi kanalda kullanırsan o kanalı tarar ve eklediğin badnick tanımına uygun nicklere Nick+Ban-Kick uygular.

Kod:

alias tara {
  set %:bulunan 0
  var %s 1
  while %s <= $nick(#,0) {
    %:gnick = $nick(#,%s)
    if %:gnick isreg # && $level(%:gnick $+ !*@*) == badnick {
      inc %:bulunan 1
      mode # +b %:gnick | kick # %:gnick 1 Badnick
    }
    inc %s
  }
  echo -a 2 Badnickler tarandi: # - %:bulunan badnick bulundu.
}


AttackZone 27 Mart 2014 09:13

Cevap: Codeme bir iki eklenti LÜTFEN.
 
Kod çok güzel çalışıyo ama korumaya eklenen nickler /tara yazdığımda atılıyor kanaldan:S

Feragat 27 Mart 2014 13:42

Cevap: Codeme bir iki eklenti LÜTFEN.
 
Alıntı:

AttackZone Nickli Üyeden Alıntı (Mesaj 1041412293)
Kod çok güzel çalışıyo ama korumaya eklenen nickler /tara yazdığımda atılıyor kanaldan:S

/tara yazdığında, kişinin identi ya da nicki koruma listesinde varsa atmaz.

Kod:

alias tara {
  set %:bulunan 0
  var %s 1
  while %s <= $nick(#,0) {
    %:gnick = $nick(#,%s)
    if ($ulist($+($nick(#,%s), !*@*),koruma,0) >= 1) || ($ulist($+(*!, $regsubex($address($nick(#,%s),1),/^\*[!]\*(\S+)[@].+/S,\1), @*), koruma,0) >= 1) { return }
    if %:gnick isreg # && $level(%:gnick $+ !*@*) == badnick {
      inc %:bulunan 1
      mode # +b %:gnick | kick # %:gnick 1 Badnick
    }
    inc %s
  }
  echo -a 2 Badnickler tarandi: # - %:bulunan badnick bulundu.
}


AttackZone 03 Nisan 2014 12:02

Cevap: Badnick koruması (users bölümüne eklenerek)
 
Feragat, hocam kanaldaki bi nick badnick'e geçtiğinde atmıyor KOD bi bakar mısın?
[11:59:45] *** Turgay_06 Nick değişerek OlgunBey_ Oldu

AttackZone 05 Nisan 2014 10:09

Cevap: Badnick koruması (users bölümüne eklenerek)
 
on BadNick:JOIN:*:{
if ($ulist($fulladdress,koruma,0) >= 1) { return }
elseif !$istok(#Help #Operhelp #kanal3 #kanal4 #kanal5,$chan,32) {
mode $chan +b $nick
kick $chan $nick 4Banned : 14Nickiniz kanal seviyesi ile bağdaşmıyor. Lütfen "4 /nick yeninickiniz 14" komutu ile nickinizi değiştiriniz. 
}
}
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(#Help #Operhelp #kanal3 #kanal4 #kanal5,%e,32) {
mode %e +b $newnick
kick %e $newnick 4Banned : 14Nickiniz kanal seviyesi ile bağdaşmıyor. Lütfen "4 /nick yeninickiniz 14" komutu ile nickinizi değiştiriniz. 
}
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 $+ @*
}
alias tara {
set %:bulunan 0
var %s 1
while %s <= $nick(#,0) {
%:gnick = $nick(#,%s)
if ($ulist($+($nick(#,%s), !*@*),koruma,0) >= 1) || ($ulist($+(*!, $regsubex($address($nick(#,%s),1),/^\*[!]\*(\S+)[@].+/S,\1), @*), koruma,0) >= 1) { return }
if %:gnick isreg # && $level(%:gnick $+ !*@*) == badnick {
inc %:bulunan 1
mode # +b %:gnick | kick # %:gnick 4Banned : 14Nickiniz kanal seviyesi ile bağdaşmıyor. Lütfen "4 /nick yeninickiniz 14" komutu ile nickinizi değiştiriniz. 
}
inc %s
}
echo -a 2 Badnickler tarandi: # - %:bulunan badnick bulundu.
}
-------------------
/tara
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*


Eklediğim kodun son hali. Şuan gördüğüm kadarıyla tek sıkıntı kanal içerisinde nick değişiminde aktif olup kullanıcıyı kanaldan atmaması.
Örnek ; [11:59:45] *** Turgay_06 Nick değişerek OlgunBey_ Oldu


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

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