IFGT Hazır kod Nick GBT/Sorgulama

  • Konbuyu başlatan Zadrich
  • Başlangıç tarihi
  • Cevaplar : 0
  • Görüntüleme : 112

IFGENTR Konu Bilgileri

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

Zadrich

Haylaz.NET - Help Sorumlusu
IFGT Coder
Katılım
15 Şub 2025
Mesajlar
40
Tepkime puanı
3
IFGT Puan
8
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 $1 == /gbt {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4-2 ****** $2 için Bilgiler listeleniyor ******
    if (!$2) { .timer -h 1 500 echo 2 -t @GBT Nick belirtmediniz. Lütfen bir nick belirtiniz. }
    else { .set -u5 %nck1 $2 | .ns info $2 all | .enable #gbt | .timer1 1 7 .disable #gbt | timer3 1 5 kimo1 $2 }
  }
  if $1 == /gbtip {
    if ($window(@GBT) == $null) { window -ne @GBT }
    echo 2 -t @GBT 4-2 ****** $2 için Bilgiler listeleniyor ******
    if (*.*.* !iswm $2) { .timer -h 1 500 echo 2 -at IP adresi belirtmediniz. Lütfen ip adresi belirtiniz. }
    else { .ns list $+(*@,$2) | .enable #gbt | .timer2 1 7 .disable #gbt | timer3 1 3 kimo1 $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 }
  }
  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 7 .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:kimkio1:{
  sockwrite -tn $sockname GET $+(/v2/,%sip,?vpn=1&asn=1) HTTP/1.1
  sockwrite -tn $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -tn $sockname Connection: keep-alive
  sockwrite -tn $sockname Host: proxycheck.io
  sockwrite -tn $sockname $crlf
}
on *:sockread:kimkio1:{ var %d_kimkio1 | sockread %d_kimkio1 | tokenize 32 %d_kimkio1
  if *"status":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- }
  if *"status":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4-2  %sip  2Nerden kontrolu başladı. }
  if *"status":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- }
  if *"status":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Kullanıcı/DURUMU:2 $_fl($_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),"))) }
  if *"asn":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Asn/BİLGİSİ:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"provider":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Sağlayıcı/FİRMA:2 $_fl($_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),"))) }
  if *"organisation":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Ornagizasyon/ŞİRKET:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"continent":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Dünya/KITA KONUMU:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"country":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Ülke:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"isocode":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Ülke/KODU:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"region":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Bölge/ŞEHİR:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"regioncode":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Bölge/KODU:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"city":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Bölge/İLÇE:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"latitude":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Enlem:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"longitude":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Boylam:2 $_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),")) }
  if *"proxy":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Proxy/BAĞLANTISI:2 $_fl($_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),"))) }
  if *"type":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Şirket/TÜRÜ:2 $_fl($_tr($remove($gettok(%d_kimkio1,2-,58),$chr(44),"))) }
  if *"type":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- }
  if *"type":* iswm %d_kimkio1 { echo @GBT 2 $timestamp 4- 2Nerden kontrolu bitti. | sockclose kimkio1 }
}
alias kimo1 { if $regex($1,/(\d+\.\d+.\d+\.\d+)/) {
  sockclose kimkio1 | %sip = $replace($1,-,.) | sockopen kimkio1 proxycheck.io 80 | return }
set -e %d_nick1 $1 | enable #kimkio1 | userip $1 }
#kimkio1 off
raw 340:*:{ if $2 { %sip = $gettok($2,2,64) | sockopen kimkio1 proxycheck.io 80 | disable #kimkio1 | return }
echo -a %d_nick1 nickinin ip adresine ulasılamadı. | disable #kimkio1 }
#kimkio1 end
alias _tr return $replace($1-,Ü,Ü,ÅŸ,ş,Ä,Ğ,İ,İ,Ö,Ö,ü,ü,ÅŸ,Ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,б,ı,а,İ,Ç,Ç,Å,Ş,ĞŸ,ğ,â,,Â,)
-
Amacı bir kullanıcının bir çok bilgisine bakmak için kullanılır.
-
Kurulum:
Scriptinizi açın klavyenizden ALT+R Tuşlarına basın acılan Editörünüz'den Remote kısmına bastıktan sonra Dosya kısmından Yeni buttonunu tıklıyarak yeni sayfa açın ve kodu içine atıp TAMAM deyin.
Keyifli kullanımlar.