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

>
+
Etiketlenen Kullanıcılar
Feragat, Toprak

5Beğeni(ler)
  • 1 Post By OperServ
  • 2 Post By Cry
  • 2 Post By

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 26 Ekim 2024, 18:45   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket iSP veri sorunu




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*: { if ($regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si)) { .who +I $9 .timerver 01 01 ctcp $9 VERSION var %_port = $regml(2), %_nick = $regml(3), %_ident = $regml(4), %_ip = $regml(5) set -l %girisipsi %_ip set -l %girisidenti %_ident if ($istok(6661,%_port,32)) { return } elseif ($istok(Lilith,%_nick,32)) { return } elseif ($istok(ident ident1 ident2,%_ident,32)) { return } elseif ($istok(85.104.93.153,%_ip,32)) { return } msg #Pusat 15,1 Giriş Nick: 9,1 $9 7,1 Giriş iP: 15,1 %_ip 7,1 PORT: 15,1 %_port 7,1 iDENT: 15,1 %_ident if (%_port == 6667 || %_port == 6668 || %_port == 6669 || %_port == 7000 || %_port == 7003) { ; msg #Opers 4 $regml(3) Nicki : 4 %_port Üzerinden Andro-Mirc Girişi yapmıştır. } sockopen $+(nrdn,%:rand) ipinfo.io 80 sockmark $+(nrdn,%:rand) $+(%_ip,¿,%_nick) } } on *:sockopen:nrdn*: { 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: close sockwrite -n $sockname Host: ipinfo.io sockwrite -n $sockname Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 sockwrite -n $sockname Content-Type: application/json; charset=utf-8 sockwrite -n $sockname $crlf } on *:sockread:nrdn*: { var %:nrdn sockread -f %:nrdn tokenize 32 %:nrdn if (region isin %:nrdn) { .hadd -m $token($sock($sockname).mark,2,191) Sehir $_tr($remove($gettok(%:nrdn,2-,58),$chr(44),")) } if (city isin %:nrdn) { .hadd -m $token($sock($sockname).mark,2,191) City $_tr($remove($gettok(%:nrdn,2-,58),$chr(44),")) } if (country isin %:nrdn) { .hadd -m $token($sock($sockname).mark,2,191) Ülke $_tr($remove($gettok(%:nrdn,2-,58),$chr(44),")) } if ("org isin %:nrdn) { var %:isp $_tr($remove($gettok(%:nrdn,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) write girisler.txt GiRiŞ: 10 $date 6 $time 4 $token($sock($sockname).mark,2,191) iP: 4 %girisipsi PORT: 4 %_port iDENT: 4 %girisidenti ŞEHİR: 4 %sehir msg #Pusat 9,1 $token($sock($sockname).mark,2,191) 7,1 ÜLKE: 15,1 %ülke 7,1 ŞEHİR: 15,1 %sehir 7,1 ISP: 15,1 %:isp if (vpn isin %:nrdn && $gettok(%:nrdn,2-,58) == true) { msg #Pusat Nick %nick bir VPN kullanıyor! Bağlantıyı kesme işlemi yapılıyor. ; Uyarı veya cezayı burada ekleyebilirsin ; örneğin: .mode $chan -o $nick } .hfree -sw %:n .hfree -sw %:nrdn sockclose $sockname unset %girisipsi halt } } alias _dzlt return $replace($1-,TR,TURKIYE,DE,ALMANYA,mins,dakika,min,dakika,hrs,saat,hr,saat,days,gün,day,gün,wks,hafta,wk,hafta) alias _tr return $replace($1-,Ü,Ü,ÅŸ,ş,Ä,Ğ,İ,İ,Ö,Ö,ü,ü,ÅŸ,Ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,б,ı,а,İ,Ç,Ç,Å,Ş,ĞŸ,ğ,â,,Â,)

Bu Kod IP adresinin VPN olup olmadığını kontrol eder ve eğer VPN kullanıyorsa #Pusat kanalına mesaj gönderir. Ayrıca, VPN kullanan nicke bir uyarı veya ceza ekleyebilirsin. Kodun sonundaki kısmı kendi ceza/uyarı işlemlerine göre düzenleyebilirsin.

__________________
Herkes bir, İş için yaratılmıştır.
 
Alıntı ile Cevapla

Alt 26 Ekim 2024, 19:11   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket iSP veri sorunu




OperServ üstad bende araştırma yaparken şunu fark ettim
kod ipinfo.io/geo uzantısından veri çekiyor.
uzantıya browserda gidince
{
"ip": "xx.xxx.57.179",
"hostname": "179.57.223.31.srv.turk.net",
"city": "Istanbul",
"region": "Istanbul",
"country": "TR",
"loc": "41.0138,28.9497",
"org": "AS12735 TurkNet Iletisim Hizmetleri A.S.",
"postal": "34096",
"timezone": "Europe/Istanbul",
"readme": "https://ipinfo.io/missingauth"
}
sadece bu kısım var ve kod bilgileri burdan aldığı için false yada true kısımlarını tabiki göremiyor. Ama sitede normal kullanıcı olarak girdiğimizde pencere içinde aşağıya indiğimizde bahsettiğim kısımlar var.
saffada kaynağı görüntüle yapıncada bahsettiğim kısımları ctrl+f ile göremiyorum maalesef.
bu sorunu nasıl çözebiliriz ?
Yardımlarınız için şimdiden teşekkürler.

 
Alıntı ile Cevapla

Alt 27 Ekim 2024, 19:38   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket iSP veri sorunu




Konu Güncel arkadaşlar. Lakin biraz zor bir problem gibi duruyor.

 
Alıntı ile Cevapla

Alt 27 Ekim 2024, 21:01   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Socket iSP veri sorunu




_KaRiNCa_ Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Konu Güncel arkadaşlar. Lakin biraz zor bir problem gibi duruyor.

Kodla ilgili bir problem değil. Proxy/vpn vs. göremediğiniz bilgiler, firma tarafından ücretsiz sağlanmıyor. O bilgilere erişim için satın alım yapmanız gerekiyor.

 
Alıntı ile Cevapla

Cevapla


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

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
Çözüldü socket web veri almıyor fav mIRC Scripting Sorunları 5 13 Nisan 2023 08:54
socket bot girisi sorunu alphae mIRC Scripting Sorunları 2 28 Haziran 2019 20:16
mIRC Socket Web Sitesinden Veri Çekme (Basit Mantık) uFuK mIRC Scripting Dersleri 14 23 Eylül 2018 00:27
Socket Bot sorunu moonman mIRC Scripting Sorunları 5 04 Ocak 2012 17:36
Socket Sorunu Set mIRC Scripting Sorunları 8 08 Kasım 2009 20:33