Tekil Mesaj gösterimi
Alt 28.Ocak.2021   #1
Çevrimdışı
Bozkurt Konuyu Baslatan
Mirc gbt sorgulama kodu


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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 } }

!gbt nick !gbt ipadresi şeklinde kullanabilirsiniz.İp adresi ve nick'e ait bilgileri görmenizi sağlar
  Alıntı ile Cevapla

IRCForumda.Net Reklamlar
sohbet isami sohbet