alias gbt {
  .enable #gbt
  .ns listlinks $1
  .ns ajoin list $1
  .ns alist $1
  .ns info $1 all
  .ns getauth $1
  .ns status $1
  .ns listchans $1
  .timer1 1 7 .disable #gbt
  if $regex($1,/(\d+\.\d+\.\d+\.\d+)) { _nerden $1 }
  else { .enable #nerdenbul | .who +I $1  }
  set %gbt @GBT
  echo -a 2Suan da bakılan4 $1 2nickinin sonucunu4 @GBT 2'den alabilirsiniz.
}

#nerdenbul off
raw 352:*:_nerden $4 
raw 315:*:.disable #nerdenbul
#nerdenbul end
alias _nerden { var %_rand $+($1,$r(1000,99999)) | sockopen $+(nerden,%_rand) cesuryurek.net 80 | sockmark $+(nerden,%_rand) $1 }
on *:sockopen:nerden*:{  
  if ($sockerr) { sockclose $sockname }
  else {
    sockwrite -nt $sockname GET $+(/bilgi5.php?ip=,$sock($sockname).mark) HTTP/1.1
    sockwrite -nt $sockname Host: $sock($sockname).addr
    sockwrite -nt $sockname Connection: keep-alive
    sockwrite -nt $sockname Cache-Control: max-age=0
    sockwrite -nt $sockname Upgrade-Insecure-Requests: 1
    sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/89.0.4389.114 Safari/537.36
    sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9
    sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7
    sockwrite -nt $sockname $crlf  
  } 
}
on *:sockread:nerden*:{
  var %:nerden | sockread -f %:nerden | tokenize 32 %:nerden
  if $regex($1-,/<span>(.+)</span> <span>(.+)</span>/i) { aline -h %gbt 2 $regml(1) $regml(2) }
}

#gbt off
on *:notice:*:?:{ 
  if $nick == NickServ {
    if ($window(@GBT) == $null) { window -ne @GBT }
    aline -h @GBT 2 $1- 
  }
}
#gbt end

menu @GBT {
  Gbtleri Temizle:clear
  .-
  Kapat:window -c @GBT
}