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/)
-   -   agresif giriş koruması hk bi soru (https://www.ircforumlari.net/mirc-scripting-sorunlari/364276-agresif-giris-korumasi-hk-bi-soru.html)

cashmare 08 Kasım 2010 19:34

Cevap: agresif giriş koruması hk bi soru
 
Alıntı:

FenomeNs Nickli Üyeden Alıntı (Mesaj 1040571700)
on *:snotice:*Client conn*: {
var %dx = $gettok($right($left($10,-1),-1),2,64)
if !$hget(ok) { hmake ok 100 }
else { hadd -mu5 ok $+(*@,$left($gettok($10,2,64),-1))
if $hget(ok,0).item >= 2 {
var %1 = 1,%2 = $hget(ok,0).item
while %1 <= %2 {
set %who on | who +I $6
inc %1
}
}
}
}
}
raw 352:*: {
if %who == on {
zline *!*@ $+ $4 agresif giriş.
unset %who
}
}

O zaman şöyle yapalım.

tam istedigim şey fenomens fakat statüste şöyle cıkıyo sürekli
her nick için
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
denemewx End of /WHO list.
-
nicki attıktan sonra who cekiyo sanırım sürekli
bunun olmaması için ne yapmamız lazım yine laga düşüyor
ve her giren nicke
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-
#Sohbet denemexd H [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :0 deneme
denemexd End of /WHO list.
-bu şekilde who cekiyor 15-20 defa

uFuK 08 Kasım 2010 19:44

Cevap: agresif giriş koruması hk bi soru
 
on *:snotice:*Client conn*: {
var %dx = $gettok($right($left($10,-1),-1),2,64)
if !$hget(ok) { hmake ok 100 }
else { hadd -mu5 ok $+(*@,$left($gettok($10,2,64),-1))
if $hget(ok,0).item >= 2 {
var %1 = 1,%2 = $hget(ok,0).item
set %who on | who +I $6
}
}
}
}
}
raw 352:*: {
if %who == on {
zline *!*@ $+ $4 agresif giriş.
unset %who
}
}

Böyle dene

cashmare 08 Kasım 2010 20:13

Cevap: agresif giriş koruması hk bi soru
 
Alıntı:

FenomeNs Nickli Üyeden Alıntı (Mesaj 1040571736)
on *:snotice:*Client conn*: {
var %dx = $gettok($right($left($10,-1),-1),2,64)
if !$hget(ok) { hmake ok 100 }
else { hadd -mu5 ok $+(*@,$left($gettok($10,2,64),-1))
if $hget(ok,0).item >= 2 {
var %1 = 1,%2 = $hget(ok,0).item
set %who on | who +I $6
}
}
}
}
}
raw 352:*: {
if %who == on {
zline *!*@ $+ $4 agresif giriş.
unset %who
}
}

Böyle dene

teşekkür ederim fenomens sayende aradıgımı buldum :)

ayaz01 15 Mart 2015 17:04

Cevap: agresif giriş koruması hk bi soru
 
Kod:

menu status,menubar,channel {
-
  » AqResif Koruması
  .Acik:.enable #agresif | echo -a 4,1 ..::0,1 AqResif Koruma :4,1 Açık
  .KapaLi:.disable #agresif | echo -a 4,1 ..::0,1 AqResif Koruma :4,1 Kapatıldı
}
#agresif off
on *:snotice:*client connecting*:{
  if ($level($9) == muafnlist) { halt }
  var %µ = $+(%,flood.,$left($gettok($10,2,64),-1))
  inc $(%µ,1)
  if (!$timer($gettok(%µ,1,37))) { $+(.timer,$gettok(%µ,1,37)) 1 3 unset $(%µ,1) }
  if ($(%µ,2) >= 3) { unset $(%µ,1) | .gzline $+(*@,$gettok($gettok($10,2,64),1,41)) +3600 agresif baglanti.
    kline $9  +600 [14Agresif baglanma- $me ] 5 10 dakika Ban. 12 $date $time  $+([,$me,]) | unset $+(%,agr,.,$gettok($gettok($10,2,64),1,41))
  }
}
#agresif end

Mükemmel bir koruma tavsiye ederim =)


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

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