Tekil Mesaj gösterimi
Alt 11 Kasım 2009, 18:07   #1
Çevrimdışı
By-|Realist
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Join/part saldırılarına önlem Kodu




Join/part saldırılarına önlem Kodu
Kod:
alias ipkick {
var %c 1
var %chan $1
var %ip $2
var %sebep $3-
; degi?kenlerimizi atad?k
while %c <= $nick(%chan,0) {
; while dongusune soktum
if %ip == $remove($address($nick(%chan,%c),2),*!*@) {
; %ip degi?keni while dongusunun sonuçu olan nick ise
mode %chan +b *!*@ $+ $ifmatch
; sebebi banla
kick $chan $nick(%chan,%c) %sebep
; sebepli ki?iyi kanalda salla.
}
inc %c
; her seferinde %c yi 1 artt?r
}
}
on *:join:#: {
; kanal m? girdi?
if $me !isop $chan { goto devam2 } | if $nick isop $chan { goto devam2 }
; ben op degilsem veya o ki?i opsa kalda devam2 ye git
inc -u20 %joinip [ $+ [ $remove($address($nick,2),*!*@) ] ] [ $+ [ $chan ] ]
; degil ise 20 saniyeligine %joinip ipadresi olarak dei?kene al
if %joinip [ $+ [ $remove($address($nick,2),*!*@) ] ] [ $+ [ $chan ] ] < 4 goto devam2
; eger %joinip degeri 4 den küçükse devam et yani 4 ayn? ip girdi ise
unset %joinip [ $+ [ $remove($address($nick,2),*!*@) ] ] [ $+ [ $chan ] ]
; yukardaki olas?l?klar tutmad? ise %joinip i kald?r devam et
mode $chan +b $address($nick,2)
; banla...
kick $chan $nick Join Floodu Ha? Yerlermi ?
; kickle...
ipkick $chan $remove($address($nick,2),*!*@) Join Floodu Ha? Yerlermi ?
; ve kanaldaki o ipe ait herkezi kickle
}

Bu kod ile kanala giren 5 veya daha fazla botu kanaldan

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet