[Kimimben]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

 on *:sockopen:city*: { 
  sockwrite -n $sockname GET /ip/ $+ %halat HTTP/1.1
  sockwrite -n $sockname Accept: text/html, application/xhtml+xml, */*
  sockwrite -n $sockname Accept-Language: tr-TR
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)
  sockwrite -n $sockname Host: whatismyipaddress.com
  sockwrite -n $sockname DNT: 1
  sockwrite -n $sockname Connection: Keep-Alive
  sockwrite -n $sockname $crlf
}
on *:sockread:city*: {
  var %/ | sockread %/
  if <meta name="description" content="Location: isin %/ {
    echo -a Bilgi: 13IP:2 %halat 13Sehir:2 $gettok($gettok(%/,2,58),1,32) 13Yer:2 $gettok($gettok(%/,2,58),2,32) 13Baglanti turu:2 $gettok($gettok(%/,2,58),15-,32)
    sockclose $sockname
  }
}
alias cit {
  sockopen city whatismyipaddress.com 80
}
raw 378:*: { echo -a  4» 1&Yacute;p Adresi 4: $remove($3,@,*) | set %halat $remove($3,@,*) | cit $remove($3,@,*) | haltdef } 
alias city { 
  if ($1 == on) { set %city on | echo -ea Giris-City Sistem Open! }
  if ($1 == off) { set %city off | echo -ea Giris-City Sistem Deopen! }
}

bu kodun sahibi kim hatırlamıyorum ama 2-3 gündür sorun veriyor whoes çektiğim kişi hakkında bilgi vermiyor ve şu sorunu veriyor
* /sockopen: 'city' Soket Kullaniliyor (Satir 30, script13.ini)
ve 30cu satir ise Şurası
sockopen city whatismyipaddress.com 80
Yardımcı olacak arkadaşa tşk ederim