Parašė lukyzas· 2011 Kov. 29 20:03:15
#1
trinti, jau susitvarkiau :D
Redagavo lukyzas· 2011 Kov. 31 19:03:21
Parašė Mantow· 2011 Kov. 30 19:03:59
#3
<?php
echo"<div id='radio'>";
error_reporting(0);
$scdef = "Šiuo metu radija yra."; // Default station name to display when server or stream is down
$scip = "ipas"; // ip or url of shoutcast server (DO NOT ADD <a href='HTTP://' target='_blank'><span style='color:005C5B'>HTTP://</span></a> don't include the port)
$scport = "portas"; // port of shoutcast server
$scpass = "pass"; // password to shoutcast server
//End configuration
$scsuccs = NULL;
$page = NULL;
include('config_radio.php'); //you may edit this path to fit your server environment otherwise leave it alone
$scfp = @fsockopen("$scip", $scport, $errno, $errstr, 30);
if(!$scfp) {
$scsuccs=1;
echo''.$scdef.'išjungta';
}
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);
}
######################################################################################################################
/////////////////////////part 1 \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
//define xml elements
$loop = array("STREAMSTATUS", "BITRATE", "SERVERTITLE", "CURRENTLISTENERS", "AIM");
$y=0;
while (isset($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") || ($loop[$y] == "AIM"))
$$scphp = urldecode($$scphp);
// uncomment the next line to see all variables
// echo'$'.$scphp.' = '.$$scphp.'';
$y++;
}
//end intro xml elements
//get song info and history
$pageed = ereg_replace(".*<SONGHISTORY>", "", $page);
$pageed = ereg_replace("<SONGHISTORY>.*", "", $pageed);
$songatime = explode("<SONG>", $pageed);
$r=1;
while (isset($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]);
$AIM[$t] = ereg_replace(".*<SERVERTITLE>", "", $page);
$AIM[$t] = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$r++;
}
$daina = str_replace('_',' ',substr ($song[0],0,90));
//end song info
fclose($scfp);
}
//Eterio Foto
if($streamstatus == "1"){
switch ($aim) {
case 'Grandis': $aimlogo = "Serveris"; break;
case 'Lydekis': $aimlogo = "lydekis"; break;
case 'Robertukas': $aimlogo = "Robis"; break;
case 'Serveris': $aimlogo = "Serveris.jpg"; break;
case 'Dzovis': $aimlogo = "Dovydas"; break;
case 'MaRiHuaNa': $aimlogo = "befoto"; break;
case 'Domantas': $aimlogo = "domantas"; break;
case 'Dj Pegasas': $aimlogo = "pegasas"; break;
case 'Domantas': $aimlogo = "domantas"; break;
default: $aimlogo = "dj";
}
$_SESSION['djus'] = $aim;
echo'<div class="aim"><img border="0" src="http://grandfm.ql.lt/komanda/'.$aimlogo.'.jpg" width="226" heigth="129" align="left"></div>';
echo'<div class="eteryje">'.$aim.'</div>';
echo'<div class="daina"><MARQUEE SCROLLDELAY="4" SCROLLAMOUNT="3" width="200">'.$daina.'</MARQUEE></div>';
//echo'<div class="laida">'.$laida.'</div>';
echo'<div class="pas"><table cellpadding="0" cellspacing="0" width="150"><tr>
<td width="40"><a href="http://manoipas(yra)listen.pls"><img src="'.THEME.'images/winamp.png" /></a></td>
<td width="40"><a href="http://manoipas(yra)/listen.pls"><img src="'.THEME.'images/wmp.png" /></a></td>
<td width="60"><a href="http://Grandfm.ql.lt/infusions/suggestion_box/suggestion_box.php"><img src="'.THEME.'images/zinute.png" /></a></td>
</tr></table></div>';
/*
echo'
<table width="350" border="0" cellpadding="0" cellspacing="0">
<tr>
<td rowspan="3"><img border="0" src="http://grandfm.ql.lt/komanda/'.$aim.'.jpg" width="226" heigth="129" align="left"></td>
<td style=" font-size:14px; padding-left:100px; padding-top:15px;"><b>'.$aim.'</b></td>
</tr>
<tr>
<td style=" font-size:14px; padding-left:100px; padding-top:13px;"><b><MARQUEE SCROLLDELAY="4" SCROLLAMOUNT="3" width="150">'.$daina.'</MARQUEE></b></td>
</tr>
<tr>
<font face="Tahoma" style="font-size: 9pt" color="#FF00FF"><b>Klauso:</b></font>
<font face="Tahoma" style="font-size: 9pt" color="#FF00FF">'.$currentlisteners.'</font><br>
</tr>
</table>
';
*/
/*
echo'<div align="center">
<table cellpadding="0" cellspacing="0" width="1">
<tr>
<td height="20" valign="bottom" bgcolor="">
<div align="left">
<table cellpadding="0" cellspacing="0" width="100">'.$aim.'
<br>
<font face="Tahoma" style="font-size: 9pt" color="#FF00FF"><b>Groja:</b></font>
<marquee behavior="right"> <font face="Arial" style="font-size: 9 pt" color="#FF00FF">'.$daina.'</font></marquee>
<br>
<font face="Tahoma" style="font-size: 9pt" color="#FF00FF"><b>Klauso:</b></font>
<font face="Tahoma" style="font-size: 9pt" color="#FF00FF">'.$currentlisteners.'</font><br>
</td>
</div>
</tr></table>
';
*/
}
if($streamstatus == "0")
{
echo'<font size="2" face="tahoma" color="">Šiuo metu radija yra išjungta.</font>';
}
echo"</div>";
?>
Redagavo Mantow· 2011 Kov. 30 19:03:19
Parašė Jointass· 2011 Kov. 30 20:03:06
#4
//Eterio Foto
if($streamstatus == "1"){
switch ($aim) {
case 'Grandis': $aimlogo = "Serveris"; break;
case 'Lydekis': $aimlogo = "lydekis"; break;
case 'Robertukas': $aimlogo = "Robis"; break;
case 'Serveris': $aimlogo = "Serveris.jpg"; break;
case 'Dzovis': $aimlogo = "Dovydas"; break;
case 'MaRiHuaNa': $aimlogo = "befoto"; break;
case 'Domantas': $aimlogo = "domantas"; break;
case 'Dj Pegasas': $aimlogo = "pegasas"; break;
case 'Domantas': $aimlogo = "domantas"; break;
default: $aimlogo = "dj";
}
$_SESSION['djus'] = $aim;
echo'<div class="aim"><img border="0" src="http://grandfm.ql.lt/komanda/'.$aimlogo.'.jpg" width="226" heigth="129" align="left"></div>'
Taigi va viskas pasiredaguok ir kai jungiasi RDJ kur aim pasirašo savo nika ir rodys...