[immortaL]

Adminler için kayıtlı nickleri sorgulamaya yarayan bir kod. İsteğe göre geliştirilebilir. Belirlediğiniz nickin kaç tane link nicki var girdiği ip'e kayıtlı kaç tane nick var ajoin listesindeki kanallar Ülke Şehir ISP bilgisi vs...


Kullanımı:
!gbt nick
!gbtip IP

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

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) }
  }
  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
  }
}