raw 378:*:{
  sockopen $+(chepro,%:rand) ipinfo.io 80 
  sockmark $+(chepro,%:rand) $+($token($6,2,64),¿,$2)
}
on *:sockopen:chepro*:{ 
  sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),?token=118fa7da158796) HTTP/1.1 
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Host: ipinfo.io
  sockwrite -n $sockname Accept-Language: en-US
  sockwrite -n $sockname Content-Type: application/json; charset=utf-8
  sockwrite -n $sockname $crlf 
}
on *:sockread:chepro*:{ 
  var %:chepro | sockread %:chepro | tokenize 32 %:chepro
  if region isin %:chepro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $remove($gettok(%:chepro,2-,58),$chr(44),") }
  if city isin %:chepro { .hadd -m $token($sock($sockname).mark,2,191) City $remove($gettok(%:chepro,2-,58),$chr(44),") }
  if country isin %:chepro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $remove($gettok(%:chepro,2-,58),$chr(44),") }
  if "org isin %:chepro { 
    var %:isp $remove($gettok(%:chepro,2-,58),$chr(44),") 
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)  $hget(%:n,City)
    msg %:kanal Nick:4 %:n - IP: %ip - Ulke: %ülke - Sehir: %sehir - ISP: %:isp Saat: $time - Tarih: $date
    .hfree -w %:n | sockclose $sockname
  } 
}
on *:text:*:#:{
  if $regex($1,/^[!.-]nerden$/Si) {
    if !$2 { msg # Lütfen !nerden <IP/Nick> olarak belirtiniz. | return }
    set %:kanal #
    if $regex($2,/(\d+\.\d+\.\d+\.\d+)) { var %:rand $r(1000,99999) | sockopen $+(chepro,%:rand) ipinfo.io 80 | sockmark $+(chepro,%:rand) $+($2,¿,Bilinmiyor) }
    else { .whois $2 }
  }
}