Girişte Ülke/Şehir/İSP Gösterme - Sayfa 11 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

YouMyCure · 31 Mayıs 2021, 07:02

Gazeffer Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] merhaba kodda türkçe karakter hatası var bilgin olsun yoksa işleyişinde sorun yok
şu sekilde örnek
GİRİS Nick
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Misafir1756 ) [»] IP: [»] Ulke: "TR", [»] Sehir: "Ä°zmir", [»] Firma: "AS207429 Kapteyan Bilisim Teknolojileri"

Gazeffer Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] mIRC v6.35 kullanıyorum

kullanmış olduğun bilgisayar/vds türkçe karakter problemi oluşmuş sanırım çözüm olarak ufak bir kod ile halledebiliriz.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias _tr return $replace($1-,Ã–,ö,Ã‡,ç,Ä°,i,Ã¶,ö,Ã§,ç,Ã¼,ü,ÅŸ,ş,Ä±,ı,Å,ş,ÄŸ,ğ,Ãœ,ü,Ä,ğ,$chr(39),`)
on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) ipinfo.io 80 | sockmark $+(pro,%:r) $+($4,¿,$6)
on *:sockopen:pro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/json?token=bdbdb82ae05b96) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname  $crlf 
}
on *:sockread:pro*:{ 
  var %:pro | sockread %:pro | tokenize 32 %:pro
  if region isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $remove($gettok(%:pro,2-,58),$chr(44),") }
  if city isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) City $remove($gettok(%:pro,2-,58),$chr(44),") }
  if country isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $remove($gettok(%:pro,2-,58),$chr(44),") }
  if "org isin %:pro { 
    var %:isp $remove($gettok(%:pro,2-,58),$chr(44),") 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    echo -a Nick:4 $_tr(%:n) - IP:4 %ip - Ulke:4 $_tr(%ülke) - Sehir:4 $_tr(%sehir) - ISP:4 $_tr(%:isp) 
    .hfree -w %:n | sockclose $sockname
  } 
}

gibi düzenleyebilirsin.

Gazeffer · 31 Mayıs 2021, 15:03

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Ellerine saglik şimdi Sorun düzeldi tşkler

Zanay · 05 Temmuz 2021, 17:37

Bro bunu #logs kanalına nasıl yansıtacağız.

#Nick ogz - IP: 88.***.252.*** - Ulke: TR - Sehir: Zonguldak Ere** - ISP: AS47331 TTNet A.S.

olarak herhangi bir yere yazıyor ve sadece bot üzerinden görülüyor.

YouMyCure Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Çok Haklısın !
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ssl gerektirmez siteyi değiştirdim.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) ipinfo.io 80 | sockmark $+(pro,%:r) $+($4,¿,$6)
on *:sockopen:pro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/json?token=bdbdb82ae05b96) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname  $crlf 
}
on *:sockread:pro*:{ 
  var %:pro | sockread %:pro | tokenize 32 %:pro
  if region isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $remove($gettok(%:pro,2-,58),$chr(44),") }
  if city isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) City $remove($gettok(%:pro,2-,58),$chr(44),") }
  if country isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $remove($gettok(%:pro,2-,58),$chr(44),") }
  if "org isin %:pro { 
    var %:isp $remove($gettok(%:pro,2-,58),$chr(44),") 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    echo -a Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp 
    .hfree -w %:n | sockclose $sockname
  } 
}

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Subzero · 05 Temmuz 2021, 18:10

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) ipinfo.io 80 | sockmark $+(pro,%:r) $+($4,¿,$6)
on *:sockopen:pro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/json?token=bdbdb82ae05b96) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname  $crlf 
}
on *:sockread:pro*:{ 
  var %:pro | sockread %:pro | tokenize 32 %:pro
  if region isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $remove($gettok(%:pro,2-,58),$chr(44),") }
  if city isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) City $remove($gettok(%:pro,2-,58),$chr(44),") }
  if country isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $remove($gettok(%:pro,2-,58),$chr(44),") }
  if "org isin %:pro { 
    var %:isp $remove($gettok(%:pro,2-,58),$chr(44),") 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    msg #logs Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp 
    .hfree -w %:n | sockclose $sockname
  } 
}

bunu denermisin. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Toprak · 05 Temmuz 2021, 18:19

Kod güncellendi, ek olarak Mobile IP ve VPN sorgusu eklendi..

coolboy · 05 Temmuz 2021, 19:55

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sorgu sınırsızmı.

vioLeta · 05 Temmuz 2021, 20:22

Toprak Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod güncellendi, ek olarak Mobile IP ve VPN sorgusu eklendi..

Eline sağlık
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

NurSima · 05 Temmuz 2021, 20:43

Emeğinize sağLık...

Toprak · 05 Temmuz 2021, 21:37

coolboy Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sorgu sınırsızmı.

Sorgu sınırı yok yalnız, aşırı bir trafik fark edersek kısıtlama getirebiliriz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Zanay · 06 Temmuz 2021, 10:24

Subzero çok teşekkür ederim. Süpersin çalışıyor. Buna Web Giriş - Mobil Giriş olarak ayrı bir kod eklenir mi ?

Subzero Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) ipinfo.io 80 | sockmark $+(pro,%:r) $+($4,¿,$6)
on *:sockopen:pro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/json?token=bdbdb82ae05b96) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname  $crlf 
}
on *:sockread:pro*:{ 
  var %:pro | sockread %:pro | tokenize 32 %:pro
  if region isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $remove($gettok(%:pro,2-,58),$chr(44),") }
  if city isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) City $remove($gettok(%:pro,2-,58),$chr(44),") }
  if country isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $remove($gettok(%:pro,2-,58),$chr(44),") }
  if "org isin %:pro { 
    var %:isp $remove($gettok(%:pro,2-,58),$chr(44),") 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    msg #logs Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp 
    .hfree -w %:n | sockclose $sockname
  } 
}

bunu denermisin. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
ülke Şehir Yeni	Z-Lined	mIRC Scripting Hazır Kodlar	6	09 Aralık 2011 15:56
Ülke-Şehir Bulucu.	h4pp3n	mIRC Scripting Hazır Kodlar	24	01 Nisan 2011 11:36
28 ülke, 67 fotoğrafçı, tek şehir	pyracantha	Sinema Dünyası	0	30 Aralık 2010 18:59
Whois'de ülke gösterme Yardim Pls...	GamSe	Unreal IRCd	4	05 Şubat 2008 22:24

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.