openside("Eteryje");
$server2 = "222.222.222.222"; //Radijos serverio IP
$server2port = "8888"; //Radijos portas
$server2pass = "slaptazodis"; //Radijos slaptazodis
$dateix = fsockopen("$server2", $server2port, &$errno, &$errstr);
if( !$dateix )
{
echo "Serveris ISJUNGTAS!
";
fclose($dateix);
}
else
{
fputs($dateix,"GET /admin.cgi?pass=$server2pass&mode=viewxml HTTP/1.0\r\nUser-Agent: Mozilla/4.0 (compatible; MSIE 4.01; Windows NT;)\r\n\r\n");
while (!(feof($dateix)))
{
$zeilex .= fgets($dateix, 4096);
}
fclose($dateix);
}
$tmpx = explode("", $zeilex);
$tmpx = explode("", $tmpx[1]);
$server2lauscher = $tmpx[0];
$pl2 = " ";
$tmpx = explode("", $tmpx[1]);
$tmpx = explode("", $tmpx[1]);
$tmp2x = explode("+", $tmpx[0]);
$nick2 = $tmp2x[0];
if(count($tmp2x) == 2)
$pl2 = $tmp2x[1];
$tmpx = explode("", $tmpx[1]);
$tmpx = explode("", $tmpx[1]);
$server2title = $tmpx[0];
$tmpx = explode("", $tmpx[1]);
$tmpx = explode("", $tmpx[1]);
$song2title = $tmpx[0];
$tmpx = explode("", $tmpx[1]);
$tmpx = explode("", $tmpx[1]);
$stream2status = $tmpx[0];
//Foto nustatymai. Kas eteryje rodo foto
if($server2title == 'serveris') //ce rasyti kaip yra pasidares dj GENRE geriausia kad butu vienas zodis pvz serveris
echo "

";
if ($stream2status == "1")
{
//Kas eteryje
echo " $server2title
";
//Ka serveris groja
if ($pl2 =="")
{
echo "";
}
else
{
echo "";
}
//Was wird gespielt?
echo "
$song2title";
echo "
Klausytis:
";
}
//Jeigu niekas nera prisijunges i etery :)
else
{
echo "Netransliuojama
";
}
closeside();