Hazır Kod !gbt Nick/!gbtip IP

[IF] Konu Bilgileri

Konu Hakkında Merhaba, tarihinde mIRC Parça Kodlar kategorisinde X tarafından oluşturulan !gbt Nick\/!gbtip IP başlıklı konuyu okuyorsunuz. Bu konu şimdiye dek 95 kez görüntülenmiş, 0 yorum ve 0 tepki puanı almıştır...
Kategori Adı mIRC Parça Kodlar
Konu Başlığı !gbt Nick\/!gbtip IP
Konbuyu başlatan X
Başlangıç tarihi
Cevaplar
Görüntüleme
İlk mesaj tepki puanı
Son Mesaj Yazan X

X

IF Teknik Sorumlu
IF - TeknikAdmin
Katılım
24 May 2020
Mesajlar
1,952
Tepkime puanı
91
Puanları
45

İtibar:

Kod Sahibi: Alper

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...

Eksiklik olabilir varsa düzenleme yaparım.

Kullanımı:
!gbt nick
!gbtip IP

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) }
  }
  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
  }
}
 
Üst Alt