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

10Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 01 Ocak 2020, 18:50   #21
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Badnick Koruması Hakkında.




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start:{ $iif(!$isfile(badnick.tprk),.write badnick.tprk) | .hmake badnick 100 | .hload badnick badnick.tprk } on @*:join:#:{ if $hfind(badnick,$gettok($address($nick,2),2,64),1,W).data || $hfind(badnick,$nick,1,W).data { $iif($address($newnick,2),mode $token(%:c,%c,32) +b ~q:*!*@*. $+ $gettok($address($newnick,2),3-,46)) mode $chan +b $nick kick # $nick İzinsiz erişim. echo -a [ $iif($hfind(badnick,$gettok($address($nick,2),2,64),1,W).data,BAD-IP,BAD-NICK) ] $nick $+ , $chan kanalına $iif($hfind(badnick,$gettok($address($nick,2),2,64),1,W).data,$gettok($address($nick,2),2,64) IP'si ile) giriş yapmaya çalıştı. } } on *:nick:{ if $hfind(badnick,$newnick,1,W).data || $hfind(badnick,$gettok($address($newnick,2),2,64),1,W).data { echo -a [ $iif($hfind(badnick,$gettok($address($newnick,2),2,64),1,W).data,BAD-IP,BAD-NICK) ] $newnick izinsiz olarak kanallara erişim sağlamaya çalıştı. $iif($hfind(badnick,$gettok($address($newnick,2),2,64),1,W).data,$+([,$chr(32),$hget(badnick,$hfind(badnick,$gettok($address($newnick,2),2,64),1,W).data),$chr(32),]),$+([,$chr(32),$hget(badnick,$hfind(badnick,$newnick,1,W).data),$chr(32),])) var %:c $regsubex($str(-,$comchan($newnick,0)),/./g, $iif($regex($nick($comchan($newnick,\n),$me).pnick,/(%|@|&|~\.)/i),$comchan($newnick,\n) $chr(32))) var %c = 1 | while %c <= $token(%:c,0,32) { mode $token(%:c,%c,32) +b $newnick | $iif($address($newnick,2),mode $token(%:c,%c,32) +b ~q:*!*@*. $+ $gettok($address($newnick,2),3-,46)) | kick $token(%:c,%c,32) $newnick İzinsiz erişim. inc %c } } }

Ekleme-silme islemlerini de 1. sayfadaki remoteden yapabilirsin.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*:{ if $regex($1,/^[!\.]badnick$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { echo -a Lütfen nick belirtiniz | return } if $hfind(badnick,$strip($3),0,W).data { echo -a Eklemeye çalıştığınız badnick zaten $+([,$chr(32),$hget(badnick,$hfind(badnick,$strip($3),1,W).data),$chr(32),]) maskesi ile uyuşmakta. | return } var %n = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m badnick %n $strip($3) .hsave -o badnick badnick.tprk echo -a $strip($3) Badnick listesine eklendi. } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { msg # Lütfen nick belirtiniz | return } if !$hfind(badnick,$strip($3),0,W).data { echo -a Bad nick listesinde bulunmamaktadir. | return } .hdel -m badnick $hfind(badnick,$strip($3),1,W).data .hsave -o badnick badnick.tprk echo -a $strip($3) Badnick listesinden silindi. } if $regex($2,/^tara$/Si) { if (!$3) { msg # Lütfen nick belirtiniz | return } if !$hfind(badnick,$strip($3),0,W).data { echo -a Badnick listem'de $strip($3) ait bir mask yok. | return } echo -a Nick: $strip($3) - 4Mask: $+([,$chr(32),$hget(badnick,$hfind(badnick,$strip($3),1,W).data),$chr(32),]) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(badnick,0).data == 0) { echo -a Badnick listesi boş. | return } echo -a Badnick listesi echo -a - var %i = 1 | while (%i <= $hget(badnick,0).data) { echo -a %i $+ .4) [ $hget(badnick,%i).data ] | inc %i } echo -a - echo -a Badnick listesi sonu } } if $regex($1,/^[!\.]tara$/Si) { if !$regex($2,/^#/Si) { echo -a Lütfen #kanal belirtiniz | return } if !$chan($2) { echo -a $2 kanal'ında yokuz. | return } var %:tara = 1 | while %:tara <= $nick($2,0) { if $hfind(badnick,$nick($2,%:tara),1,W).data { msg #Opers [ TARAMA ] $nick($2,%:tara) nicki badnick olarak tespit edildi. $+([,$chr(32),$hget(badnick,$hfind(badnick,$nick($2,%:tara),1,W).data),$chr(32),]) mode $2 +b $nick($2,%:tara) | kick $2 $nick($2,%:tara) 1Nick değiştirip(/nick yeninick) tekrar kanala giriş yapabilirsiniz.. } inc %:tara } } }


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Cevapla

Etiketler
badnick, hakkında, koruması


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
badnick koruması Selim01 mIRC Scripting Sorunları 5 08 Ekim 2009 01:25
BadNick Koruması LAzm AnarchYBrotherS mIRC Scripting Sorunları 1 19 Şubat 2009 19:44
Badnick koruması. morveotesii mIRC Scripting Sorunları 3 28 Temmuz 2008 01:37
Badnick Koruması Hakkında NatioNaL mIRC Scripting Sorunları 6 10 Haziran 2008 00:15