Tekil Mesaj gösterimi
Alt 13 Ağustos 2022, 15:22   #1
Çevrimdışı
Bozkurt-
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Girişte Ülke/Şehir/İSP Gösterme - Güncel




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*:{ if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) { var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5) ;- Muaf port ekleme. if $istok(6661,%_port,32) { return } ;- Muaf nick ekleme elseif $istok(Lilith,%_nick,32) { return } ;- Muaf ident ekleme elseif $istok(ident ident1 ident2,%_ident,32) { return } ;- Muaf IP ekleme elseif $istok(85.104.93.153,%_ip,32 ) { return } who +I $9 } } raw 352:*:{ sockopen $+(nerdenpro,%:rand) ipinfo.io 80 sockmark $+(nerdenpro,%:rand) $+($4,¿,$6) } on *:sockopen:nerdenpro*:{ sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/geo) 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 Accept-Language: en-US sockwrite -n $sockname Content-Type: application/json; charset=utf-8 sockwrite -n $sockname $crlf } on *:sockread:nerdenpro*:{ var %:nerdenpro | sockread %:nerdenpro | tokenize 32 %:nerdenpro if region isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) } if city isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) City $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) } if country isin %:nerdenpro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $_tr($remove($gettok(%:nerdenpro,2-,58),$chr(44),")) } if "org isin %:nerdenpro { var %:isp $_tr($remove($gettok(%:nerdenpro,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 #Giriş 0,1[Giriş Bilgi] 0,4Nick:  0,1 %:n  0,4IP:  0,1 %ip  0,4Ulke Kodu:  0,1 %ülke  0,4Şehir:  0,1 %sehir  0,4 ISP:  0,1 %:isp .hfree -w %:n | sockclose $sockname } } alias _tr return $replace($1-,Ãœ,Ü,ÅŸ,ş,Ä,Ğ,Ä°,İ,Ö,Ö,ü,ü,ÅŸ,Ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,б,ı,Ğ°,İ,Ç,Ç,Å,Ş,ĞŸ,ğ,â,,Â,)


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

Merhabalar;
Kod ile sunucuza giren kişilerin bilgilerini kanala yansıtabilirsiniz. Türkçe karakter hatasının çözümü için alias eklenmiştir. Site üzerinden bilgileri çekmek için api almanıza gerek yoktur. Güncel çalışan kod olmadığı için yaptım. Son günlerde sekershelle ait gbotun veri çekmesinde sıkıntı olduğu için paylaşıyorum
.

__________________
Kahpeliğin bahanesi, İhanetin telafisi olmaz.

Konu Che tarafından (14 Ağustos 2022 Saat 10:55 ) değiştirilmiştir. Sebep: Code düzeltildi.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver