| Feragat | 19 Mayıs 2022 19:56 | Cevap: Whois Çeken Nereden? Alıntı: MasteR06 Nickli Üyeden Alıntı
(Mesaj 1042678670)
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. Kod:
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ş 2- Sockread Eventındaki son satırda da Ayraç Hatası mevcut
Bu satır; Böyle değişmeli; 3- kimo aliasındaki (d_kimkio isimli socket ismi yok)
Şu satır; Kod:
sockclose d_kimkio | %sip = $replace($1,-,.) | sockopen kimkio proxycheck.io 80 | return } Şöyle değişmeli; Kod:
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:
[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. |