IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  odeaweb
>
+
Etiketlenen Kullanıcılar

16Beğeni(ler)
  • 3 Post By Bozkurt-
  • 1 Post By CtrL
  • 1 Post By SLyther
  • 1 Post By Dedecan61
  • 2 Post By ZindaN
  • 1 Post By SNOOPY
  • 2 Post By Sarya
  • 3 Post By Feragat
  • 2 Post By Bozkurt-

 
 
LinkBack Seçenekler Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 19 Mayıs 2022, 19:56   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Whois Çeken Nereden?




MasteR06 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Merhabalar;
Kod kısaca size whois çekenleri txt dosyasına kaydediyor. Kişiye notice ile bilgi veriyor ve whois çeken kişinin ip adresini sorgulayarak @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresinde sonuçları gösteriyor. Proxy/Vpn ve Tür bilgisini api key olmadığı için çekmiyor sanırım. Başka bir sorun varsa da konuyu gören üstadlar sorunu düzeltme konusunda yol gösterebilirler. Kod amatörce benim tarafımdan yapılmıştır.
Keyifli Forumlar.

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


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:sockopen:kimkio:{ sockwrite -tn $sockname GET $+(/v2/,%sip,?vpn=1&asn=1) HTTP/1.1 sockwrite -tn $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8 sockwrite -tn $sockname Connection: keep-alive sockwrite -tn $sockname Host: proxycheck.io sockwrite -tn $sockname $crlf } on *:sockread:kimkio:{ var %d_kimkio | sockread %d_kimkio | tokenize 32 %d_kimkio if *"status":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Durum:4 $gettok(%d_kimkio,2-,58) } if *"asn":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Asn:4 $gettok(%d_kimkio,2-,58) } if *"provider":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Sağlayıcı:4 $gettok(%d_kimkio,2-,58) } if *"continent":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Kıta:4 $gettok(%d_kimkio,2-,58) } if *"country":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Ülke:4 $gettok(%d_kimkio,2-,58) } if *"isocode":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Ülke Kodu:4 $gettok(%d_kimkio,2-,58) } if *"region":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Bölge:4 $gettok(%d_kimkio,2-,58) } if *"regioncode":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Bölge Kodu:4 $gettok(%d_kimkio,2-,58) if *"city":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Şehir:4 $gettok(%d_kimkio,2-,58) } if *"latitude":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Enlem:4 $gettok(%d_kimkio,2-,58) } if *"longitude":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Boylam:4 $gettok(%d_kimkio,2-,58) } if *"proxy":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Proxy-Vpn:4 $gettok(%d_kimkio,2-,58) } if *"type":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Tür:4 $gettok(%d_kimkio,2-,58) } if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] --------------- 4Whoisci Sorgusu Bitişi --------------- | sockclose kimkio } } alias kimo { if $regex($1,/(\d+\.\d+.\d+\.\d+)/) { sockclose d_kimkio | %sip = $replace($1,-,.) | sockopen kimkio proxycheck.io 80 | return } set -e %d_nick $1 | enable #kimkio | userip $1 } #kimkio off raw 340:*:{ if $2 { %sip = $gettok($2,2,64) | sockopen kimkio proxycheck.io 80 | disable #kimkio | return } if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] %d_nick nickinin ip adresine ulasılamadı. | disable #kimkio } #kimkio end



1 -
Şu satırın sonunda Kapalı Ayraç } unutulmuş
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if *"regioncode":* iswm %d_kimkio { if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 2Bölge Kodu:4 $gettok(%d_kimkio,2-,58)

2- Sockread Eventındaki son satırda da Ayraç Hatası mevcut
Bu satır;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] --------------- 4Whoisci Sorgusu Bitişi --------------- | sockclose kimkio } }

Böyle değişmeli;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] --------------- 4Whoisci Sorgusu Bitişi --------------- | sockclose kimkio } }

3- kimo aliasındaki (d_kimkio isimli socket ismi yok)
Şu satır;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
sockclose d_kimkio | %sip = $replace($1,-,.) | sockopen kimkio proxycheck.io 80 | return }

Şöyle değişmeli;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
sockclose kimkio | %sip = $replace($1,-,.) | sockopen kimkio proxycheck.io 80 }



Bu söylediğim değişiklikler yapıldığında kimo aliasından alınan sonuç
Komut: /kimo 78.186.99.87

Sonuç:
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[19:52] 78.186.99.87 nickinin ip adresine ulasılamadı. [19:52] Durum: "ok", [19:52] Asn: "AS9121", [19:52] Sağlayıcı: "Turk Telekomunikasyon Anonim Sirketi", [19:52] Kıta: "Asia", [19:52] Ülke: "Turkey", [19:52] Ülke Kodu: "TR", [19:52] Enlem: 41.0214, [19:52] Boylam: 28.9948, [19:52] Proxy-Vpn: "yes", [19:52] Tür: "SOCKS5"

Whois kısmını da bir gözden geçirmeni öneririm. Güncellediğinde kodu atarsan konuyu düzenleyebiliriz.
Emeğine sağlık. Kolaylıklar.

3
CtrL, SLyther, Bozkurt- bunu beğendi
__________________
The Ghost of Christmas Past...

mircscripting.net
 
Alıntı ile Cevapla

 

Etiketler
ceken, kişi, nereden, sorgulama, whois


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
Ağrı Adı Nereden Gelmiştir, Ağrı Adını Nereden Almıştır? Violent Doğu Anadolu Bölgesi 0 07 Aralık 2014 20:32
Iğdır Adı Nereden Gelmiştir, Iğdır Adını Nereden Almıştır? Violent Doğu Anadolu Bölgesi 0 07 Aralık 2014 20:08
Adana Adı Nereden Gelmiştir, Adana Adını Nereden Almıştır? Violent Akdeniz Bölgesi 0 07 Aralık 2014 20:06
Giriş Çıkış Yapana Whois ( @Whois Penceresinde ) LauReLL mIRC Scripting Hazır Kodlar 12 06 Temmuz 2009 09:30
whois çekene uyarı beraber Sajoin ve 2 kere whois kill olmasını istiyorum nasıldı ? Rekor37 mIRC Scripting Sorunları 1 06 Haziran 2009 15:34



Canlı Akış 0

+
Canlı akışı görmek için lütfen
Üye Girişi Yapın veya
Kayıt Olun.

Reaksiyonlar

×