IRCDForum.COM - IRC ve mIRC dünyasının forumu!   Reklam Alanı


  IRCDForum.COM - IRC ve mIRC dünyasının forumu! IF - mIRC Scripting Hazır Kodlar


Yeni Konu   Cevap Yaz

 
LinkBack Seçenekler Stil
Alt 17 Eylül 2017, 16:31   #1
 
mIRC - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 25 Mart 2016
Mesajlar: 17
WEB Sitesi:
IRC Sunucusu:
İlgi Alanı:
Alınan Beğeni: 5
Standart IP Location

Amaç: Düz mIRC üzerinde ihtiyacım olduğu için oluşturduğum ve kullandığım parça kodun paylaşımı

Ekleme: ALT + R (Remote)

- Kullanımı -

1. Kullanım Şekli: Bu şekilde kullanabilmek için ;echo -a satırındaki ; işaretini kaldırın.

/find <IP>

Örnek: /find 103.206.225.98

Sonuç:

Kod:
IP Address: 103.206.225.98 Hostname: 103.206.225.98
IP Country: India
IP Country Code: IND
IP Continent: Asia
IP Region: Bihar
IP City: Darbhanga
IP Latitude: 26.1667
IP Longitude: 85.9
Organization: Acme Diginet Corporation Pvt.
ISP Provider: Acme Diginet Corporation Pvt.
2. Kullanım Şekli: @IP-103.206.225.98 gibi bir pencereye yansıtabilirsiniz. Çalıştırmak için ;window -en satırının başındaki ; işaretini kaldırın.

Örnek görüntü:

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

-

3. Kullanım Şekli Herhangi bir ekranda Sağ tık -> IP Location sekmesini seçip IP adresini girin ve Tamam ı tıklatın. Bilgiler baloncuk şeklinde yansıyacaktır.
Not: Bu şekilde kullanabilmek için mIRC versionunuz 6.3x ve üzeri olmalı.

Örnek görüntüler:

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

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

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

Kod:
menu * {
  .IP Location:noop $?="IP Location" | find $! 
}
alias find { 
  var %r = $r(1111,999999)
  sockopen find $+ %r www.ipaddresslocation.org 80 
  sockmark find $+ %r $1
}
alias cx return $sock($sockname).mark

on *:sockopen:find*:{
  var %sw = sockwrite -n $sockname
  %sw GET /ip-address-locator.php?lookup= $+ $cx HTTP/1.1
  %sw Host: www.ipaddresslocation.org
  %sw Connection: keep-alive
  %sw Upgrade-Insecure-Requests: 1
  %sw User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/60.0.3112.113 Safari/537.36
  %sw Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,image/apng,*/*;q=0.8
  %sw Referer: http://www.ipaddresslocation.org/
  ;%sw Accept-Encoding: gzip, deflate
  %sw Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
  ;%sw Cookie: __atuvc=0%7C33%2C0%7C34%2C0%7C35%2C0%7C36%2C2%7C37; __atuvs=59bd8b2ff4fa9887001; _ga=GA1.2.294156575.1498682408; _gid=GA1.2.565380201.1505594160; _gat=1
  %sw $crlf
  %sw $crlf
}

on *:sockread:find*:{
  var %sr
  sockread %sr
  if (*<i>IP *</i>* iswm %sr) || (*<b>*</b><br />* iswm $&
    %sr) || (*<i>Hostname:</i>* iswm %sr) || (*<i>Organization: $&
    </i>* iswm %sr) || (*<i>ISP *:</i>* iswm %sr) { 
    ;Bu satır aktif ekrana bilgileri yansıtır. 
    ;echo -a $regsubex(f,%sr,/<.*>/gU,) 
    ;Bu satır bilgileri baloncuk şeklinde gösterir
    noop $tip(IL,IP Location - $cx, $regsubex(f,%sr,/<.*>/gU,), 15)
    ;Bu satır pencere oluşturur ve bilgileri yansıtır.
    ;window -en @IP- $+ $cx | echo -t @IP- $+ $cx $regsubex(f,%sr,/<.*>/gU,) 
  }
}
Alternatif Link: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Yazar : Feragat
 mIRC isimli Üye şimdilik offline konumundadır   Alıntı

Yeni Konu   Cevap Yaz

Etiketler
location


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

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 Açık
Pingbacks are Açık
Refbacks are Açık





Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Chat - Sohbet