Parašė WriteMaster· 2008 Bir. 13 23:06:46
#1
man radijas:
http://78.58.86.89:8002/listen.pls
bandziau pagal lafestos panele-neisejo
radau dar kazkokiu pora persirasiau viska i savo duomenis-neisejo (nerode ar on radijes ar ne ...)
gal kas galetu sukonfiguruot?
Parašė suomis· 2008 Bir. 14 00:06:31
#3
jo atsimenu man ir buvo viena kart kad neisejo is pirmo kart duomenis sumaisiau ,tikrink ar duomenis gerai suvesti ;)
Parašė WriteMaster· 2008 Bir. 14 11:06:15
#4
openside("Radijas");
echo "
$station_name = "Selgiaus radijela xD";
$refresh = "30";
$timeout = "5";
$ip[1] = "78.58.86.89";
$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 "<center><a href='http://triumas.xz.lt/profile.php?lookup=1'><img src='http://www.csi.xz.lt/images/avatars/2535_Ecard-sml-JDI%5B1%5D.gif' style='margin:5px;' alt='DJ '></a></center>";
echo "</div>\n";
echo "Eteryje: <b>DJ</b>";
}
$msg[$i] .= "Stotis transliuoja $bitrate[$i] kbps,44.100kHs.Stereo <br>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://lafesta.lt/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();
nu va ka as cia pasidares ar gerai ar ne nzn bet man nerodo ar radijas on ar off ir kiek zmoniu klauso :(
Redagavo WriteMaster· 2008 Bir. 14 11:06:36