Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: Radio

Parašė Haschas· 2007 Sau. 12 10:01:31
#1
Gal kas žino arba turi infusioną radijos, kad jame būtų, tiksliau rodytų eteryje esančio DJ foto (ar avatarą).

Parašė ozzWANTED· 2007 Sau. 12 10:01:12
#2
nu nu nu, jau nusisvaigai, ar tu matei nors vieną radio kanalą kuris išvestų tokią informacija. Geriausiu atveju eina išvesti tik tai ką tuo metu groja.

Parašė Haschas· 2007 Sau. 12 11:01:29
#3
Taip mačiau. Pats paprasčiausias shoutcast modas išveda: kas groja, ką groja, kokybę, bet tą modą paredagavus galima padaryt, kad rodytų ir foto dj`aus, kuris dabar groja. Ir tą foto ima ne iš radijos, o greičiausiai iš to web.
Redagavo Haschas· 2007 Sau. 12 11:01:55

Parašė ozzWANTED· 2007 Sau. 12 11:01:51
#4
Čia galimas dar toks variantas - saite padaryti per:
if($DJ_name="lolaz") {
echo "dydžėjaus fotkė tada tokia";
} elseif($DJ_name="...") {
echo "...":
}
ir t.t.




Tada būtų toks variantas - shoutcastas tavo saite nuskaito kas groja(to didžėjaus vardą), ir jeigu jam yra priskirtas foto tame mode, tai paima ta foto iš tavo saito. Bet tokį modą kodintis reiks jau pačiam, kad besimėtytų nete - tokio modo neesu matęs.
Redagavo ozzWANTED· 2007 Bir. 5 23:06:57

Parašė Haschas· 2007 Sau. 12 11:01:06
#5
Tai va ten kažkas tokio ir yra. Taip, teisingai nete tokio nėra, čia jau patys gaminasi

Parašė wydmys· 2007 Bir. 4 19:06:55
#6
sweiki stai noreciau jusu pagalbos su scoutcast rasdio info panele as ja turiu bet tik terodo mano viea foto kai as esu eteryje o kai kitas prisijungia eteryje tai jo nuika raso o foto rodo mano kaip padaryt kad rodytu visu DJ foto kai i eteri ieina ,
openside("LiuxFM eterio info");
//konfiguravimas
$scdef = "LiuxFM"; // serverio paw.
$scip = "84.32.149.125"; // ip arba URL (tik be jokiu html://)
$scport = "8002"; // Portas serverio
$scpass = "xxxxxxxx"; // Paswordas
$maxusers = "32"; //Kiek vienu sykiu klausosi zmoniu
//Konfiguracijos pabaiga


$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
if(!$scfp) {
$scsuccs=1;
echo''.$scdef.' Neveikia';
}
if($scsuccs!=1){
fputs($scfp,"GET /admin.cgi?pass=$scpass&mode=viewxml HTTP/1.0\r\nUser-Agent: SHOUTcast Song Status (Mozilla Compatible)\r\n\r\n");
while(!feof($scfp)) {
$page .= fgets($scfp, 1000);
}

//tvarkome xml

$loop = array("STREAMSTATUS", "BITRATE", "SERVERTITLE", "CURRENTLISTENERS");
$y=0;
while($loop[$y]!=''){
$pageed = ereg_replace(".*<$loop[$y]>", "", $page);
$scphp = strtolower($loop[$y]);
$$scphp = ereg_replace("</$loop[$y]>.*", "", $pageed);
if($loop[$y]==SERVERGENRE || $loop[$y]==SERVERTITLE || $loop[$y]==SONGTITLE || $loop[$y]==SERVERTITLE)
$$scphp = urldecode($$scphp);

$y++;
}
//pabaiga xml sudarymas


$pageed = ereg_replace(".*<SONGHISTORY>", "", $page);
$pageed = ereg_replace("<SONGHISTORY>.*", "", $pageed);
$songatime = explode("<SONG>", $pageed);
$r=1;
while($songatime[$r]!=""){
$t=$r-1;
$playedat[$t] = ereg_replace(".*<PLAYEDAT>", "", $songatime[$r]);
$playedat[$t] = ereg_replace("</PLAYEDAT>.*", "", $playedat[$t]);
$song[$t] = ereg_replace(".*<TITLE>", "", $songatime[$r]);
$song[$t] = ereg_replace("</TITLE>.*", "", $song[$t]);
$song[$t] = urldecode($song[$t]);
$dj[$t] = ereg_replace(".*<SERVERTITLE>", "", $page);
$dj[$t] = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$r++;
}


fclose($scfp);
}

//ishvedam i ekrana
if($streamstatus == "1"){
echo'
<html>
<p align="center"><center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="50">
<tr>
<center><img src='.BASEDIR.'images/avatars/'.$userdata['user_avatar'].'></td></tr></center>

<td width="150" align="right">
Eteryje:</td>
<td width="13" align="right">
</td>
<td width="50" nowrap>
'.$servertitle.'</td>
</tr>
<tr>
<td width="50" align="center">
Klauso:</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
'.$currentlisteners.' / '.$maxusers.'</td>
</tr><tr>
<td width="50" align="center">
</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
</td><i><marquee behavior="right">
'.$song[0].'</td></marquee></p></i>
</tr>
<tr>

</tr>
</table>
</body>

</html>
';
} else {
echo'Serveris neveikia';
}
?>
<html>
<br><br>
<center><a href="http://84.32.149.125:8002/listen.pls"><img src="http://liuxfm.xz.lt/images/winampas.gif" border="0" alt="Winamp" /></a> <a href="http://84.32.149.125:8002/listen.m3u"><img src="http://liuxfm.xz.lt/images/media.gif" border="0" alt="Windows Media Player" /></a></center>

<center><img src="http://img444.imageshack.us/img444/7596/aacplussmallct1.gif" border="0" alt="aacPlus" /></a></center>
</html>
<?
closeside();

ir kas toks cia perdalykas sitas scriptas
if($DJ_name="lolaz") {
echo "dydžėjaus fotkė tada tokia";
} elseif($DJ_name="...") {
echo "...":
}
ir t.t.



laukiu jusu pagalbos aciu

Parašė wydmys· 2007 Bir. 4 20:06:49
#7
padekit

Parašė Rytis· 2007 Bir. 5 12:06:44
#8
ne, nu aš apakęs...

kodėl darot tai, ko nemokat?
ozzWANTED davė paprastą (truputį klaidingą scriptą)..
Sakykim jei DJ`ų shoutcaste nustatysi kaip server title, tai galima daryti šitaip:
if($servertitle=="DJ Petras") {
$djphoto='djpetras.jpg';
global $djphoto;
} elseif($servertitle=="DJ Antanas") {
$djphoto='djantanas.jpg';
global $djphoto;
}
echo "<img src='imges/".$djphoto."' alt='".$servertitle."'><br/>Eteryje: ".$servertitle."<br/>";




ir kišk visą šitą tarp
<td width="50" nowrap>čia</td>



kur
<td width="50" nowrap>
'.$servertitle.'</td>



Parašė wydmys· 2007 Bir. 5 16:06:32
#9
ali visa parasyt su tuo idetu skrioptu kai as idedu tai man klaida ismeta o kur DJ nuotraukas kelti

Parašė Rytis· 2007 Bir. 5 17:06:26
#10
wydmys parašė:
ali visa parasyt su tuo idetu skrioptu kai as idedu tai man klaida ismeta o kur DJ nuotraukas kelti


kokią klaidą?
imges/

bet ten pačiam if`us nusistatyti reikia, jei ką..

Parašė wydmys· 2007 Bir. 5 17:06:51
#11
openside("LiuxFM eterio info");
//konfiguravimas
$scdef = "LiuxFM"; // serverio paw.
$scip = "liuxfm.servemp3.com"; // ip arba URL (tik be jokiu html://)
$scport = "8002"; // Portas serverio
$scpass = "xxxxxxx"; // Paswordas
$maxusers = "32"; //Kiek vienu sykiu klausosi zmoniu
//Konfiguracijos pabaiga


$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
if(!$scfp) {
$scsuccs=1;
echo''.$scdef.' Neveikia';
}
if($scsuccs!=1){
fputs($scfp,"GET /admin.cgi?pass=$scpass&mode=viewxml HTTP/1.0\r\nUser-Agent: SHOUTcast Song Status (Mozilla Compatible)\r\n\r\n");
while(!feof($scfp)) {
$page .= fgets($scfp, 1000);
}

//tvarkome xml

$loop = array("STREAMSTATUS", "BITRATE", "SERVERTITLE", "CURRENTLISTENERS");
$y=0;
while($loop[$y]!=''){
$pageed = ereg_replace(".*<$loop[$y]>", "", $page);
$scphp = strtolower($loop[$y]);
$$scphp = ereg_replace("</$loop[$y]>.*", "", $pageed);
if($loop[$y]==SERVERGENRE || $loop[$y]==SERVERTITLE || $loop[$y]==SONGTITLE || $loop[$y]==SERVERTITLE)
$$scphp = urldecode($$scphp);

$y++;
}
//pabaiga xml sudarymas


$pageed = ereg_replace(".*<SONGHISTORY>", "", $page);
$pageed = ereg_replace("<SONGHISTORY>.*", "", $pageed);
$songatime = explode("<SONG>", $pageed);
$r=1;
while($songatime[$r]!=""){
$t=$r-1;
$playedat[$t] = ereg_replace(".*<PLAYEDAT>", "", $songatime[$r]);
$playedat[$t] = ereg_replace("</PLAYEDAT>.*", "", $playedat[$t]);
$song[$t] = ereg_replace(".*<TITLE>", "", $songatime[$r]);
$song[$t] = ereg_replace("</TITLE>.*", "", $song[$t]);
$song[$t] = urldecode($song[$t]);
$dj[$t] = ereg_replace(".*<SERVERTITLE>", "", $page);
$dj[$t] = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$r++;
}


fclose($scfp);
}

//ishvedam i ekrana
if($streamstatus == "1"){
echo'
<html>
<p align="center"><center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100">
<tr>
<td width="100" align="center">
Eteryje:</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>if($servertitle=="DJ AKER") {
$djphoto='djaker.jpg';
global $djphoto;
} elseif($servertitle=="DJ_wydmys") {
$djphoto='DJwydmys.jpg';
global $djphoto;
}
echo "<img src='imges/".$djphoto."' alt='".$servertitle."'><br/>Eteryje: ".$servertitle."<br/>";
</td>
</tr>
<tr>
<td width="50" align="center">
Klauso:</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
'.$currentlisteners.' / '.$maxusers.'</td>
</tr><tr>
<td width="50" align="center">
</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
</td><i><marquee behavior="center">
'.$song[0].'</td>
</tr>
<tr>

</tr>
</table>
</body>

</html>
';
} else {
echo'Serveris neveikia';
}
?>
<html>
<center><a href="http://liuxfm.servemp3.com:8002/listen.pls"><img src="http://liuxfm.xz.lt/images/winampas.gif" border="0" alt="Winamp" /></a> <a href="http://84.32.149.125:8002/listen.m3u"><img src="http://liuxfm.xz.lt/images/media.gif" border="0" alt="Windows Media Player" /></a></center>

<center><img src="http://img444.imageshack.us/img444/7596/aacplussmallct1.gif" border="0" alt="aacPlus" /></a></center>
</html>
<?
closeside();

vai ta koda idejau irm an tokia klaida meta
arse error: syntax error, unexpected T_STRING, expecting ',' or ';' in /home/liuxfm/liuxfm.xz.lt/administration/panel_editor.php(111) : eval()'d code on line 70

ir dar parasyk kaip reikia paaryt kad dar galeciau DJ nikus surasyt
Redagavo wydmys· 2007 Bir. 5 18:06:59

Parašė Rytis· 2007 Bir. 5 18:06:00
#12
openside("LiuxFM eterio info");
//konfiguravimas
$scdef = "LiuxFM"; // serverio paw.
$scip = "liuxfm.servemp3.com"; // ip arba URL (tik be jokiu html://)
$scport = "8002"; // Portas serverio
$scpass = "xxxxxxx"; // Paswordas
$maxusers = "32"; //Kiek vienu sykiu klausosi zmoniu
//Konfiguracijos pabaiga


$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
if(!$scfp) {
$scsuccs=1;
echo''.$scdef.' Neveikia';
}
if($scsuccs!=1){
fputs($scfp,"GET /admin.cgi?pass=$scpass&mode=viewxml HTTP/1.0\r\nUser-Agent: SHOUTcast Song Status (Mozilla Compatible)\r\n\r\n");
while(!feof($scfp)) {
$page .= fgets($scfp, 1000);
}

//tvarkome xml

$loop = array("STREAMSTATUS", "BITRATE", "SERVERTITLE", "CURRENTLISTENERS");
$y=0;
while($loop[$y]!=''){
$pageed = ereg_replace(".*<$loop[$y]>", "", $page);
$scphp = strtolower($loop[$y]);
$$scphp = ereg_replace("</$loop[$y]>.*", "", $pageed);
if($loop[$y]==SERVERGENRE || $loop[$y]==SERVERTITLE || $loop[$y]==SONGTITLE || $loop[$y]==SERVERTITLE)
$$scphp = urldecode($$scphp);

$y++;
}
//pabaiga xml sudarymas


$pageed = ereg_replace(".*<SONGHISTORY>", "", $page);
$pageed = ereg_replace("<SONGHISTORY>.*", "", $pageed);
$songatime = explode("<SONG>", $pageed);
$r=1;
while($songatime[$r]!=""){
$t=$r-1;
$playedat[$t] = ereg_replace(".*<PLAYEDAT>", "", $songatime[$r]);
$playedat[$t] = ereg_replace("</PLAYEDAT>.*", "", $playedat[$t]);
$song[$t] = ereg_replace(".*<TITLE>", "", $songatime[$r]);
$song[$t] = ereg_replace("</TITLE>.*", "", $song[$t]);
$song[$t] = urldecode($song[$t]);
$dj[$t] = ereg_replace(".*<SERVERTITLE>", "", $page);
$dj[$t] = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$r++;
}


fclose($scfp);
}

//ishvedam i ekrana
if($streamstatus == "1"){
echo'
<html>
<p align="center"><center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100">
<tr>
<td width="100" align="center">
Eteryje:</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>';
if($servertitle=="DJ AKER") {
$djphoto='djaker.jpg';
global $djphoto;
} elseif($servertitle=="DJ_wydmys") {
$djphoto='DJwydmys.jpg';
global $djphoto;
}
echo "<img src='imges/".$djphoto."' alt='".$servertitle."'><br/>Eteryje: ".$servertitle."<br/>";echo'

</td>
</tr>
<tr>
<td width="50" align="center">
Klauso:</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
'.$currentlisteners.' / '.$maxusers.'</td>
</tr><tr>
<td width="50" align="center">
</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
</td><i><marquee behavior="center">
'.$song[0].'</td>
</tr>
<tr>

</tr>
</table>
</body>

</html>
';
} else {
echo'Serveris neveikia';
}
?>
<html>
<center><a href="http://liuxfm.servemp3.com:8002/listen.pls"><img src="http://liuxfm.xz.lt/images/winampas.gif" border="0" alt="Winamp" /></a> <a href="http://84.32.149.125:8002/listen.m3u"><img src="http://liuxfm.xz.lt/images/media.gif" border="0" alt="Windows Media Player" /></a></center>

<center><img src="http://img444.imageshack.us/img444/7596/aacplussmallct1.gif" border="0" alt="aacPlus" /></a></center>
</html>
<?
closeside();


protauti reikia....

Parašė wydmys· 2007 Bir. 5 21:06:23
#13
panele veikia bet db foto nerodo nnors ji yra ikelta

Parašė Rytis· 2007 Bir. 6 10:06:01
#14
openside("LiuxFM eterio info");
//konfiguravimas
$scdef = "LiuxFM"; // serverio paw.
$scip = "liuxfm.servemp3.com"; // ip arba URL (tik be jokiu html://)
$scport = "8002"; // Portas serverio
$scpass = "xxxxxxx"; // Paswordas
$maxusers = "32"; //Kiek vienu sykiu klausosi zmoniu
//Konfiguracijos pabaiga


$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
if(!$scfp) {
$scsuccs=1;
echo''.$scdef.' Neveikia';
}
if($scsuccs!=1){
fputs($scfp,"GET /admin.cgi?pass=$scpass&mode=viewxml HTTP/1.0\r\nUser-Agent: SHOUTcast Song Status (Mozilla Compatible)\r\n\r\n");
while(!feof($scfp)) {
$page .= fgets($scfp, 1000);
}

//tvarkome xml

$loop = array("STREAMSTATUS", "BITRATE", "SERVERTITLE", "CURRENTLISTENERS");
$y=0;
while($loop[$y]!=''){
$pageed = ereg_replace(".*<$loop[$y]>", "", $page);
$scphp = strtolower($loop[$y]);
$$scphp = ereg_replace("</$loop[$y]>.*", "", $pageed);
if($loop[$y]==SERVERGENRE || $loop[$y]==SERVERTITLE || $loop[$y]==SONGTITLE || $loop[$y]==SERVERTITLE)
$$scphp = urldecode($$scphp);

$y++;
}
//pabaiga xml sudarymas


$pageed = ereg_replace(".*<SONGHISTORY>", "", $page);
$pageed = ereg_replace("<SONGHISTORY>.*", "", $pageed);
$songatime = explode("<SONG>", $pageed);
$r=1;
while($songatime[$r]!=""){
$t=$r-1;
$playedat[$t] = ereg_replace(".*<PLAYEDAT>", "", $songatime[$r]);
$playedat[$t] = ereg_replace("</PLAYEDAT>.*", "", $playedat[$t]);
$song[$t] = ereg_replace(".*<TITLE>", "", $songatime[$r]);
$song[$t] = ereg_replace("</TITLE>.*", "", $song[$t]);
$song[$t] = urldecode($song[$t]);
$dj[$t] = ereg_replace(".*<SERVERTITLE>", "", $page);
$dj[$t] = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$r++;
}


fclose($scfp);
}

//ishvedam i ekrana
if($streamstatus == "1"){
echo'
<html>
<p align="center"><center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100">
<tr>
<td width="100" align="center">
Eteryje:</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>';
if($servertitle=="DJ AKER") {
$djphoto='djaker.jpg';
global $djphoto;
} elseif($servertitle=="DJ_wydmys") {
$djphoto='DJwydmys.jpg';
global $djphoto;
}
echo "<img src='".IMAGES.$djphoto."' alt='".$servertitle."'><br/>Eteryje: ".$servertitle."<br/>";echo'

</td>
</tr>
<tr>
<td width="50" align="center">
Klauso:</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
'.$currentlisteners.' / '.$maxusers.'</td>
</tr><tr>
<td width="50" align="center">
</td>
<td width="13" align="center">
</td>
<td width="50" nowrap>
</td><i><marquee behavior="center">
'.$song[0].'</td>
</tr>
<tr>

</tr>
</table>
</body>

</html>
';
} else {
echo'Serveris neveikia';
}
?>
<html>
<center><a href="http://liuxfm.servemp3.com:8002/listen.pls"><img src="http://liuxfm.xz.lt/images/winampas.gif" border="0" alt="Winamp" /></a> <a href="http://84.32.149.125:8002/listen.m3u"><img src="http://liuxfm.xz.lt/images/media.gif" border="0" alt="Windows Media Player" /></a></center>

<center><img src="http://img444.imageshack.us/img444/7596/aacplussmallct1.gif" border="0" alt="aacPlus" /></a></center>
</html>
<?
closeside();


nuotraukas į images dirą, ten turėtu būti pagal fusion defaultą ta direktorija
Redagavo Rytis· 2007 Bir. 6 10:06:09

Parašė prey· 2008 Bir. 11 09:06:08
#15
Sveiki, ar galite man padėti aš turiu panelė va tokia:
openside("SoundBar FM","on");



$station_name = "SoundBar FM";

$refresh = "10"; // Page refresh time in seconds. Put 0 for no refresh
$timeout = "5"; // Number of seconds before connecton times out - a higher value will slow the page down if any servers are offline



// Note: dont include http://
// Main server: The song title will be taken from this server

$ip[1] = "xx.xx.xxx.xx";
$port[1] = "xxxx";




$servers = count($ip);
?>

<?php
$i = "1";
while($i<=$servers)
{
$fp = @fsockopen($ip[$i],$port[$i],$errno,$errstr,$timeout);
if (!$fp)
{
$listeners[$i] = "0";
$msg[$i] = "<br><span class=\"red\">Serveris IŠJUNGTAS!</span>";
$error[$i] = "1";
}
else
{
fputs($fp, "GET /7.html HTTP/1.0\r\nUser-Agent: Mozilla\r\n\r\n");
while (!feof($fp))
{
$info = fgets($fp);
}
$info = str_replace('<HTML><meta http-equiv="Pragma" content="no-cache"></head><body>', "", $info);
$info = str_replace('</body></html>', "", $info);
$stats = explode(',', $info);
if (empty($stats[1]) )
{
$listeners[$i] = "0";
$msg[$i] = "<span class=\"red\">Netransliuojama!</span>";
$error[$i] = "1";
}
else
{
if ($stats[1] == "1")
{
$song[$i] = $stats[6];
$listeners[$i] = $stats[0];
$max[$i] = $stats[3];
$bitrate[$i] = $stats[5];
$peak[$i] = $stats[2];
if ($stats[0] == $max[$i])
{
$msg[$i] .= "<span class=\"red\">";
} else {







echo "<center><a href='http://soundbar.xz.lt/profile.php?lookup=1'><img src=http://soundbar.xz.lt/images/avatars/DJZone13736.gif style='margin:5px;' alt='DJ '></a></center>";
echo "</div>\n";
echo "Eteryje: <b>Auto DJ</b>";









}
$msg[$i] .= "Stotis transliuoja 64 Kbps  Stereo <br>Dabar klausosi $listeners[$i] iš $max[$i] ";
if ($stats[0] == $max[$i])
{
$msg[$i] .= "</span>";
}
$msg[$i] .= "\n <p><b>Daugiausia klausytojų-</b> $peak[$i]";
}
else
{
$listeners[$i] = "0";
$msg[$i] = " <span class=\"red\">Stotis IŠJUNGTA!</span>";
$error[$i] = "1";
}
}
}
$i++;
}
$total_listeners = array_sum($listeners) ;
print "<div id=\"blu\">\n <div style=\"text-align: left;\">\n <h8> Unikalių klausytojų - <b>$total_listeners </b></h8>\n </div>\n</div>\n<div>\n <div>\n <p><b>Dabar groja:</b><MARQUEE Scrollamount=2 width='50%'> $song[1]</p>\n </div>\n</div>\n<div>\n</MARQUEE>";
$i = "1";
while($i<=$servers)
{
print " <div>\n";
if ($max[$i] > 0)
{
$percentage = round(($listeners[$i] / $max[$i] * 100));
$timesby = (300 / $max[$i]);
$barlength = round(($listeners[$i] * "$timesby"));
}
if ($error[$i] != "1")
{
?>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<small>Serverio naudojimas- <?php print $percentage; ?>%</small><br><br>
<td width="100%" colspan="100%" bgcolor="#00D0E0"><img src="<?php if ($percentage == "100") { print "red-"; } ?>http://soundbar.xz.lt/infusions/Eterio_info_panel/bar.gif" width="<?php print $barlength ?>" height="15" alt=""></td>
</tr>
<tr>

<td width="0%">0%</td>

<td width="50%" align="right">100%</td>
</tr>
</table>
<?php
}
else
{
?>
<?php
}
print " <p><b>Statusas:</b> $msg[$i]</p>\n </div>\n <div class=\"line\"> </div>\n";
$i++;
}
print "</div>\n";

?>


<?
closeside();




Bet joje nesikeičia eterio užrašas ir paveikslėlis priklausomai nuo to kas yra eteryje. Gal galima kaipnors integruoti aukčiau esančio kodo ta dalį? arba pakeisti mano kodo dalį?

Parašė djmomo2· 2008 Spa. 3 17:10:48
#16
o gal ta koda butu galima iterpt i sita radios panele? jei kas mokat gal galit iterpt?

opensidex("Mūsų radija","on");

?>
<center></a><a href='http://www.vovafm.xz.lt/profile.php?lookup=1'><img src="http://tbn0.google.com/images?q=tbn:UkeUniXHoVhDRM:http://bp2.blogger.com/_D8sqlSesEDw/R1IAXeuxGJI/AAAAAAAAAAM/_rIYbsYktO4/S220/Homer_DJ.jpg" /><center>
<br>
<center><center><span style='color:black'Online radio</span><center>
<br>
<?

$station_name = "VovaFM";

$refresh = "0"; // Page refresh time in seconds. Put 0 for no refresh
$timeout = "5"; // Number of seconds before connecton times out - a higher value will slow the page down if any servers are offline



// Note: dont include http://
// Main server: The song title will be taken from this server

$ip[1] = "78.58.67.210";
$port[1] = "8002";




$servers = count($ip);
?>

<?php
$i = "1";
while($i<=$servers)
{
$fp = @fsockopen($ip[$i],$port[$i],$errno,$errstr,$timeout);
if (!$fp)
{
$listeners[$i] = "0";
$msg[$i] = "<br><span class=\"red\">Serveris IŠJUNGTAS!</span>";
$error[$i] = "1";
}
else
{
fputs($fp, "GET /7.html HTTP/1.0\r\nUser-Agent: Mozilla\r\n\r\n");
while (!feof($fp))
{
$info = fgets($fp);
}
$info = str_replace('<HTML><meta http-equiv="Pragma" content="no-cache"></head><body>', "", $info);
$info = str_replace('</body></html>', "", $info);
$stats = explode(',', $info);
if (empty($stats[1]) )
{
$listeners[$i] = "0";
$msg[$i] = "<span class=\"red\">Netransliuojama!</span>";
$error[$i] = "1";
}
else
{
if ($stats[1] == "1")
{
$song[$i] = $stats[6];
$listeners[$i] = $stats[0];
$max[$i] = $stats[3];
$bitrate[$i] = $stats[5];
$peak[$i] = $stats[2];
if ($stats[0] == $max[$i])
{
$msg[$i] .= "<span class=\"red\">";
} else {








echo "</div>\n";
echo "Eteryje: <b>DJmomo</b>";









}
$msg[$i] .= "Stotis translioja Stereo <br>Drauge klausosi $listeners[$i] iš $max[$i] ";
if ($stats[0] == $max[$i])
{
$msg[$i] .= "</span>";
}
$msg[$i] .= "\n <p><b>Daugiausia klausytojų-</b> $peak[$i]";
}
else
{
$listeners[$i] = "0";
$msg[$i] = " <span class=\"red\">Stotis IŠJUNGTA!</span>";
$error[$i] = "1";
}
}
}
$i++;
}
$total_listeners = array_sum($listeners) ;
print "<div id=\"blu\">\n <div style=\"text-align: left;\">\n <h8> Unikalių klausytojų - <b>$total_listeners </b></h8>\n </div>\n</div>\n<div>\n <div>\n <p><MARQUEE Scrollamount=2 width='50%'><b>Dabar groja:</b> $song[1]</p>\n </div>\n</div>\n<div>\n</MARQUEE>";
$i = "1";
while($i<=$servers)
{
print " <div>\n";
if ($max[$i] > 0)
{
$percentage = round(($listeners[$i] / $max[$i] * 100));
$timesby = (300 / $max[$i]);
$barlength = round(($listeners[$i] * "$timesby"));
}
if ($error[$i] != "1")
{
?>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<small>Serverio naudojimas- <?php print $percentage; ?>%</small><br><br>
<td width="100%" colspan="100%" bgcolor="#00D0E0"><img src="<?php if ($percentage == "100") { print "red-"; } ?>http://triumas.xz.lt/infusions/Eterio_info_panel/bar.gif" width="<?php print $barlength ?>" height="15" alt=""></td>
</tr>
<tr>

<td width="0%">0%</td>

<td width="50%" align="right">100%</td>
</tr>
</table>
<?php
}
else
{
?>
<?php
}
print " <p><b>Statusas:</b> $msg[$i]</p>\n </div>\n <div class=\"line\"> </div>\n";
$i++;
}
print "</div>\n";



?>
<center></a><a href='http://78.59.112.68:8002/listen.pls'><img src="http://www.legalus.net/arrow-right.gif" /><center>
<br>
<?
closesidex();

Parašė pR· 2008 Spa. 3 19:10:50
#17
ozzWANTED parašė:
nu nu nu, jau nusisvaigai, ar tu matei nors vieną radio kanalą kuris išvestų tokią informacija. Geriausiu atveju eina išvesti tik tai ką tuo metu groja.


www.playmusicfm.xz.lt