mIRCForumlari.Net

mIRCForumlari.Net (https://www.mircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.mircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   @GBT Penceresinde Bir Nick Hakkında Detaylı bilği almak isterseniz (https://www.mircforumlari.net/mirc-scripting-hazir-kodlar/14162-gbt-penceresinde-bir-nick-hakkinda-detayli-bilgi-almak-isterseniz.html)

RahmetLi 31 Mart 2023 05:58

@GBT Penceresinde Bir Nick Hakkında Detaylı bilği almak isterseniz
 
PHP- Kodu:

alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } }

on *:INPUT:*: {
  if $1 == /gbt {
    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 $1 == /gbtip {
    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 | .timeralist 1 1 .ns alist %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-2 Arama 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
  }
}



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 15:11.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.


Navbar with Avatar by Motorradforum