http://evermore.ru/who/
<?php
if (!IsSet($ip)) die('IP required');
if (!IsSet($port)) $port=7777;
$fs=@fsockopen($ip,$port) or die('Sock ERROR');
$pck=pack("vCi",6,0,-3);
fwrite($fs,$pck);
$r=fread($fs,73);
fclose($fs);
$a=unpack("vsize/Cid/iworld/imax/icurrent/iplaying/istore",$r);
echo "SYS: current({$a[current]}), playing({$a[playing]}), private store({$a[store]}), max({$a[max]})\n";
?>