IRCForumlarý - IRC ve mIRC Kullanýcýlarýnýn Buluþma Noktasý
Sayfa 11 Toplam 13 Sayfadan « ÝlkSayfa 45678910 11 1213
Konuya ait 40 Mesajý baþka Sayfada göster

IRCForumlarý - IRC ve mIRC Kullanýcýlarýnýn Buluþma Noktasý (https://www.ircforumlari.net/)
-   mIRC Scripting Hazýr Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Giriþte Ülke/Þehir/ÝSP Gösterme (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/682252-giriste-ulke-sehir-isp-gosterme.html)

YouMyCure 31 Mayýs 2021 07:02
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
Alýntý:
Gazeffer Nickli Üyeden Alýntý (Mesaj 1042493660)
@[Ü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:( Misafir1756 ) [»] IP: [»] Ulke: "TR", [»] Sehir: "Ä°zmir", [»] Firma: "AS207429 Kapteyan Bilisim Teknolojileri"
Alýntý:
Gazeffer Nickli Üyeden Alýntý (Mesaj 1042493681)
@[Ü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:
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
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Ellerine saglik þimdi Sorun düzeldi tþkler

Zanay 05 Temmuz 2021 17:37
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
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.




Alýntý:
YouMyCure Nickli Üyeden Alýntý (Mesaj 1042481986)
Çok Haklýsýn ! :)
ssl gerektirmez siteyi deðiþtirdim.

Kod:
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
  }
}
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Subzero 05 Temmuz 2021 18:10
Re: Giriþte Ülke/Þehir/ÝSP Gösterme
 
Kod:
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
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
Kod güncellendi, ek olarak Mobile IP ve VPN sorgusu eklendi..

coolboy 05 Temmuz 2021 19:55
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sorgu sýnýrsýzmý.

vioLeta 05 Temmuz 2021 20:22
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
Alýntý:
Toprak Nickli Üyeden Alýntý (Mesaj 1042507335)
Kod güncellendi, ek olarak Mobile IP ve VPN sorgusu eklendi..
Eline saðlýk:cokcool::seytani:;blush

NurSima 05 Temmuz 2021 20:43
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
Emeðinize saðLýk...

Toprak 05 Temmuz 2021 21:37
Cevap: Giriþte Ülke/Þehir/ÝSP Gösterme
 
Alýntý:
coolboy Nickli Üyeden Alýntý (Mesaj 1042507359)
@[Ü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 :)

Zanay 06 Temmuz 2021 10:24
Cevap: Re: Giriþte Ülke/Þehir/ÝSP Gösterme
 
Subzero çok teþekkür ederim. Süpersin çalýþýyor. Buna Web Giriþ - Mobil Giriþ olarak ayrý bir kod eklenir mi ?



Alýntý:
Subzero Nickli Üyeden Alýntý (Mesaj 1042507333)
Kod:
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...]


Tüm Zamanlar GMT +3 Olarak Ayarlanmýþ. Þuanki Zaman: 19:01.
Sayfa 11 Toplam 13 Sayfadan « ÝlkSayfa 45678910 11 1213
Konuya ait 40 Mesajý baþka Sayfada göster

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk