GBT nick kodu

Bozkurt

Misafir Editör
Katılım
23 Aralık 2020
Mesajlar
108
Tepkime puanı
0
Kod:
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } }

on *:input:#:{
  if $regex($1,/^[.!]gbt$/Si) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4-2 ****** $2 için Bilgiler Sıralanıyor ******
    if (!$2) { .timer -h 1 500 echo 2 -t @GBT Nick belirtmedin ;) }
    else { .set -u5 %nck1 $2 | .ns info $2 all | .enable #gbt }
  }
  if $regex($1,/^[.!]gbtip$/Si) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4-2 ****** $2 için Bilgiler Sıralanıyor ******
    if (*.*.* !iswm $2) { .timer -h 1 500 echo 2 -at IP belirtmedin ;) }
    else { .ns list $+(*@,$2) | .enable #gbt | var %:r = $r(1000,99999) | .sockopen $+(gbt,%:r) www.ipaddresslocation.org 80 | sockmark $+(gbt,%:r) $2 }
  }
}
#gbt off
on ^*:NOTiCE:*:*:{
  if ($nick == NickServ) {
    if (*Son gorulen adres* iswm $1-) || (*Online oldugu adres* iswm $1-) { .timerlinks 1 1 .ns listlinks %nck1 | .timerlist 1 2 .ns list $+(*@,$token($4,2,64)) | .timerajoin 1 3 .ns ajoin list %nck1 | var %:r = $r(1000,99999) | .sockopen $+(gbt,%:r) www.ipaddresslocation.org 80 | sockmark $+(gbt,%:r) $token($4,2,64) | .timerlist 1 4 .ns alist %nck1 }
  }
  if ($nick == NickServ) && (*kayitli*nick*degil* iswm $1-) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4- 2Arama yapmak istediğiniz nick kayıtlı değil. | .timerdis 1 1 .disable #gbt
    halt
  }
  if ($nick == NickServ) && (*kayitli*nick*degil* !iswm $1-) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4-2 $1-
    halt
  }
}
#gbt End

on *:sockopen:gbt*:{
  sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$sock($sockname).mark) HTTP/1.1
  sockwrite -nt $sockname Host: www.ipaddresslocation.org
  sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
  sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36
  sockwrite -nt $sockname $crlf
}

on *:sockread:gbt*:{ 
  if ($sockerr) { .sockclose $sockname | return }
  var %:gbt | sockread -f %:gbt
  if (IP Country: isin %:gbt) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4- 2Ülke:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
  }
  if (IP Region: isin %:gbt) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4- 2Bölge:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
  }
  if (IP City: isin %:gbt) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4- 2Sehir:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
  }
  if (ISP Provider: isin %:gbt) {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4- 2ISP:4 $iif($token($htmlfree(%:gbt),2,58) == $null,Belirsiz,$token($htmlfree(%:gbt),2,58))
    sockclose $sockname
    .timerdis 1 5 .disable #gbt
  }
}

Kullanımı
[.!]gbt nick ve ya gbtip ipadresi

Yazılan nick ve ya ip adresine ait bilgileri görmenize yarayacak bir kod..
 

Benzer konular

HarbiMekân

Kurucu Admin
Harbi Üye
Katılım
13 Mart 2019
Mesajlar
8,239
Tepkime puanı
229
İRC bölümünün açlığını giderdiğin için çok teşekkür ederim.
 
İçerik sağlayıcı "paylaşım" sitelerinden biri olan Harbimekan.Com Forum, Eğlence ve Güncel Paylaşım Platformu Adresimizde 5651 Sayılı Kanun’un 8. Maddesine ve T.C.K’nın 125. Maddesine göre TÜM ÜYELERİMİZ yaptıkları paylaşımlardan sorumludur. Harbimekan.Com sitesindeki konular yada mesajlar hakkında yapılacak tüm hukuksal Şikayetler için info@harbimekan.com yada iletişim sayfası üzerinden iletişime geçilmesi halinde ilgili kanunlar ve yönetmelikler çerçevesinde en geç 3 Gün (72 Saat) içerisinde Forum yönetimi olarak tarafımızdan gereken işlemler yapılacaktır.

Bu Site, Bilim ve Sağlık Haber Ajansı Üyesidir.

Yığıntı - 8kez - kaynak mağazam - Uğur Ağdaş