kullanmýþ olduðun bilgisayar/vds türkçe karakter problemi oluþmuþ sanýrým çözüm olarak ufak bir kod ile halledebiliriz.
Kod: Kodu kopyalamak için üzerine çift týklayýn!
alias _tr return $replace($1-,Ö,ö,Ç,ç,İ,i,ö,ö,ç,ç,ü,ü,ÅŸ,þ,ı,ý,Åž,þ,ÄŸ,ð,Ü,ü,Äž,ð,$chr(39),`)
on *:snotice:*Client connecting on port*:who +I $9
raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) ipinfo.io 80 | sockmark $+(pro,%:r) $+($4,¿,$6)
on *:sockopen:pro*:{
sockwrite -n $sockname GET $+(/,$token($sock($sockname).mark,1,191),/json?token=bdbdb82ae05b96) 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 $crlf
}
on *:sockread:pro*:{
var %:pro | sockread %:pro | tokenize 32 %:pro
if region isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Sehir $remove($gettok(%:pro,2-,58),$chr(44),") }
if city isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) City $remove($gettok(%:pro,2-,58),$chr(44),") }
if country isin %:pro { .hadd -m $token($sock($sockname).mark,2,191) Ülke $remove($gettok(%:pro,2-,58),$chr(44),") }
if "org isin %:pro {
var %:isp $remove($gettok(%:pro,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)
echo -a Nick:4 $_tr(%:n) - IP:4 %ip - Ulke:4 $_tr(%ülke) - Sehir:4 $_tr(%sehir) - ISP:4 $_tr(%:isp)
.hfree -w %:n | sockclose $sockname
}
}
gibi düzenleyebilirsin.