Panelių bazė
Sveiki, jūs panelių bazėje.
Neaktyvuotų panelių: 0
Viso panelių: 377
Ieškoti panelės
Neaktyvuotų panelių: 0
Viso panelių: 377
Ieškoti panelės
Panelės peržiūra
| Pavadinimas | Klausytoju scriptas. |
| Įdėjo | bakkaz - Pateikta: 2008-11-18 - Peržiūrėta: 4260 |
| Aprašymas | Sia panele dedu vien del to kad buna zmoniu kurie viska atskirai daro. Ten reikia tiesiog surasyti savo serverio duomenis ir ideti nuotrauka kuria norite kad rodytu kad pamygus galimetu klausytis jusu radijo stoties. |
| Panelė | Code openside("Klausytis");
$server2 = "IP"; //IP des Shoutcast Servers
$server2port = "PORT"; //Port des Shoutcast Server - Bsp.: 8000
$server2pass = "PSW"; //Passwort des Shoutcast Servers
$dateix = fsockopen("$server2", $server2port, &$errno, &$errstr);
if( !$dateix )
{
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("<CURRENTLISTENERS>", $zeilex);
$tmpx = explode("</CURRENTLISTENERS>", $tmpx[1]);
$server2lauscher = $tmpx[0];
$pl2 = " ";
$tmpx = explode("<SERVERGENRE>", $tmpx[1]);
$tmpx = explode("</SERVERGENRE>", $tmpx[1]);
$tmp2x = explode("+", $tmpx[0]);
$nick2 = $tmp2x[0];
if(count($tmp2x) == 2)
$pl2 = $tmp2x[1];
$tmpx = explode("<SERVERTITLE>", $tmpx[1]);
$tmpx = explode("</SERVERTITLE>", $tmpx[1]);
$server2title = $tmpx[0];
$tmpx = explode("<SONGTITLE>", $tmpx[1]);
$tmpx = explode("</SONGTITLE>", $tmpx[1]);
$song2title = $tmpx[0];
$tmpx = explode("<STREAMSTATUS>", $tmpx[1]);
$tmpx = explode("</STREAMSTATUS>", $tmpx[1]);
$stream2status = $tmpx[0];
if ($stream2status == "1")
{
//OnAir? Dann das hier:
echo "<center><a href=\"http://$server2:$server2port/listen.pls\"><img src='http://ritmas.xz.lt/images/listen.png' style='margin:5px;'></a><br><font face='Verdana' size='1' ><center>Klausytoju: $server2lauscher</font></center>";
}
closeside(); |
Rašyti komentarą
Turite prisijungti, norėdami parašyti komentarą.

Buvo planuose pereiti ant v9, bet ....