Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: radio panele
Parašė LeBro· 2007 Rugp. 13 16:08:02
#1
sveiki, gal kas turi ka nors panasaus i sia radijo panele :
[url]
http://img27.picoodle.com/img/im...cbccc9.png[/url]
modu saite buvau rades kazka panasaus, taciau ten nerode nei kiek zmoniu klauso radijo ir dainu informacija ln letai atsinaujindavo... laukiu jusu paisulymu ;)
Redagavo LeBro· 2007 Rugp. 13 16:08:52
Parašė erikiuxxss· 2007 Rugp. 13 16:08:08
#2
As turiu dj tvs :) wiska rodo ir servas off on ir t.p ;)
Parašė LeBro· 2007 Rugp. 13 16:08:59
#3
erikiuxxss parašė:
As turiu dj tvs :) wiska rodo ir servas off on ir t.p ;)
idek, jei gali - paziuresiu kas ten yra ;)
Parašė erikiuxxss· 2007 Rugp. 13 16:08:25
#4
:s ?|
not free
Redagavo erikiuxxss· 2007 Rugp. 13 16:08:47
Parašė Wanted· 2007 Rugp. 13 16:08:12
#5
(Nesižodžiuojam), paieška išmok naudotis..
Čia šitą scriptą įdėjo Manjack
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 "<font face='Verdana' size='2' color='black'><b>Serveris ISJUNGTAS!<b/></font><br>";
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];
//Foto nustatymai. Kas eteryje rodo foto
if($server2title == 'serveris') //ce rasyti kaip yra pasidares dj GENRE geriausia kad butu vienas zodis pvz serveris
echo "<center><img src='komanda/serveris.gif' border='2' width='128' height='95'></center><br>";
if ($stream2status == "1")
{
//Kas eteryje
echo "<font face='Verdana' size='2' color='black'><center><b> $server2title</font></b></center><br><br>";
//Ka serveris groja
if ($pl2 =="")
{
echo "";
}
else
{
echo "<a href=\"";
echo "$pl2";
echo "\" target=\"_blank\"></a>";
}
//Was wird gespielt?
echo "<font face='Verdana' size='2'
<MARQUEE scrolldelay='1' SCROLLAMOUNT='1' onmouseover='this.stop()' onmouseout='this.start()' direction='left' height='20' width='170'>
$song2title</font></MARQUEE>";
echo "<font face='Verdana' size='3' color='red'>
<center><b>Klausytis:</b><br><a href='http://$server2:$server2port/listen.pls'><img src='images/Winamp2.png' border='0' width='50' height='50'> <a href='http://$server2:$server2port/listen.pls'><img src='images/w_m_p.png' border='0' width='50' height='50'></center>";
}
//Jeigu niekas nera prisijunges i etery :)
else
{
echo "<font face='Verdana' size='3' color='red'><center>Netransliuojama</font></center>
";
}
closeside();
// Paimta iš mrcbug.com
Redagavo Toonis· 2007 Rugp. 13 16:08:52
Parašė LeBro· 2007 Rugp. 13 17:08:18
#6
WaNt3d parašė:
(Nesižodžiuojam), paieška išmok naudotis..
Čia šitą scriptą įdėjo Manjack
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 "<font face='Verdana' size='2' color='black'><b>Serveris ISJUNGTAS!<b/></font><br>";
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];
//Foto nustatymai. Kas eteryje rodo foto
if($server2title == 'serveris') //ce rasyti kaip yra pasidares dj GENRE geriausia kad butu vienas zodis pvz serveris
echo "<center><img src='komanda/serveris.gif' border='2' width='128' height='95'></center><br>";
if ($stream2status == "1")
{
//Kas eteryje
echo "<font face='Verdana' size='2' color='black'><center><b> $server2title</font></b></center><br><br>";
//Ka serveris groja
if ($pl2 =="")
{
echo "";
}
else
{
echo "<a href=\"";
echo "$pl2";
echo "\" target=\"_blank\"></a>";
}
//Was wird gespielt?
echo "<font face='Verdana' size='2'
<MARQUEE scrolldelay='1' SCROLLAMOUNT='1' onmouseover='this.stop()' onmouseout='this.start()' direction='left' height='20' width='170'>
$song2title</font></MARQUEE>";
echo "<font face='Verdana' size='3' color='red'>
<center><b>Klausytis:</b><br><a href='http://$server2:$server2port/listen.pls'><img src='images/Winamp2.png' border='0' width='50' height='50'> <a href='http://$server2:$server2port/listen.pls'><img src='images/w_m_p.png' border='0' width='50' height='50'></center>";
}
//Jeigu niekas nera prisijunges i etery :)
else
{
echo "<font face='Verdana' size='3' color='red'><center>Netransliuojama</font></center>
";
}
closeside();
// Paimta iš mrcbug.com
ka tavo manymu reiske sita eilute :
modu saite buvau rades kazka panasaus, taciau ten nerode nei kiek zmoniu klauso radijo ir dainu informacija ln letai atsinaujindavo..
genys...
Parašė Toonis· 2007 Rugp. 13 17:08:51
#7
O tu išvis moki sustvarkyti tą kodą, kad viską rodytu? Aš nevarau, tik paklausiu ar tu viską surašai. :)
Redagavo Toonis· 2007 Rugp. 13 17:08:03
Parašė LeBro· 2007 Rugp. 13 17:08:56
#8
Toonis parašė:
O tu išvis moki sustvarkyti tą kodą, kad viską rodytu? Aš nevarau, tik paklausiu ar tu viską surašai. :)
nu viska lygtai surashau... o tu nori pasakyt sitas kodas gali rodyti, kiek tuo metu yra klausytoju ?
Redagavo Toonis· 2007 Rugp. 13 18:08:43
Parašė DaFmeNas· 2007 Rugp. 26 00:08:40
#9
eik i scriptu biblioteka idejau veikence for free nereiks nei abelems moket ;)