![]() |
![]() |
![]() |
#1 |
Bir umuttur yaşamak
![]() ![]()
Üyelik tarihi: 09 Eylül 1991
Bulunduğu yer: Konya Mesajlar: 323 WEB Sitesi: https://www.teklan.com.tr/ IRC Sunucusu: irc.teklan.com.tr İlgi Alanı: mIRC Scripting Alınan Beğeni: 211 |
![]()
Merhaba,
Bayadır hazır kod yazmıyordum sunucumuza lamer bir arkadaş saldırmaya başladı saldırı derken modem reset yapıp gelip kanala küfür edip atılıyor. Böyle bir kod yazma gereyi duydumki giren kişinin şehir ve isp adresini bileyimki ona göre müdahale hızlı olsun dedim ve yazdım saldıran arkadaş sunucuya giriş yaptığında şehir ve isp olarak takip edip atıyorum adam bıraktı bir daha gelmedi ![]() Sizlerlede paylaşayım işinize yarayabilir.. Sunucuya giriş yapan kişilerin ülke/şehir/isp adreslerini @Giriş penceresinde gösterir. Kod:
on *:snotice:*Client connecting on port*:who +I $9 raw 315:*:halt raw 352:*:{ var %:r $r(1000,99999) | sockopen $+(pro,%:r) www.ipaddresslocation.org 80 | sockmark $+(pro,%:r) $+($4,¿,$6) halt } alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:pro*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 | sockwrite -nt $sockname Host: www.ipaddresslocation.org | sockwrite -nt $sockname $crlf } on *:sockread:pro*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) $iif(!$window(@Giriş),window -e @Giriş) .echo @Giriş Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp .hfree -sw %:n sockclose $sockname } } ![]() Ölmek için doğmuştur ya insan; O yüzden her yağmur sonrası Toprak kokusunu sever.
|
![]() |
Alıntı
|
Etiketler |
girişte, gösterme, nickin, ülke or şehir or isp |
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
Seçenekler | |
Stil | |
|
|
![]() |
||||
Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
Girişte Bilgi Modülü | Entrance | Unreal - Hazır Kodlar | 12 | 22 Aralık 2016 21:28 |
UnrealIRCd Girişte Kod Versiyon(Sürümleri.) | Entrance | Unreal - Hazır Kodlar | 0 | 28 Ağustos 2016 19:42 |
UnrealIRCd3.2.10.2(Girişte Kod - Versiyon Uygulaması). | Entrance | Unreal - Hazır Kodlar | 1 | 06 Eylül 2015 14:19 |
Tempshun uygulanan nickin whoisine.. | Entrance | Unreal - Parça Kodlar | 1 | 30 Ağustos 2015 12:35 |
oto sajoin #şehir .Tcl | No_FeaR | TCL Scriptler | 0 | 17 Mart 2015 21:42 |