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

Parašė switz· 2009 Lap. 28 16:11:55
#1

Sveiki,gal kas turite grazia radijos unfo panele? Jeigu galite iklijuokit ;)

Parašė switz· 2009 Lap. 28 16:11:12
#2

nu jaugi jau niekas neuri?

Parašė gintulys· 2009 Lap. 28 16:11:52
#3

Imk jei veiks

openside("Eteris");

error_reporting(0);
$scdef = "Serversi neveikia";               // Default station name to display when server or stream is down
$scip = "ip"; // ip or url of shoutcast server (DO NOT ADD HTTP:// don't include the port)
$scport = "port";                   // port of shoutcast server
$scpass = "pass";                 // password to shoutcast server
$maxusers = "100"; //Kiek vienu sykiu klausosi zmoniu
//End configuration
error_reporting(0);
$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.' ';
 }
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.'<br>';
  $y++;
 }
//end intro xml elements
######################################################################################################################
######################################################################################################################
/////////////////////////part 2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
//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]);
  $dj[$t] = ereg_replace(".*<SERVERTITLE>", "", $page);
  $dj[$t] = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$r++;
 }
 $daina = str_replace('_',' ',substr ($song[0],0,90));
//end song info

fclose($scfp);
}

//display stats
if($streamstatus == "1"){
switch ($aim) {
    case 'WiNALL': $aimlogo = "Serveris"; break;
 case 'Serveris': $aimlogo = "Serveris"; break;
case 'DJ_Deivis': $aimlogo = "deivis"; break;
case 'DjGintulis': $aimlogo = "DjGintulis"; break;


case 'Saulius': $aimlogo = "Saulius"; break;
 default:  $aimlogo = "dj";
}
$_SESSION['djus'] = $aim;
echo'<div align="center">
 <table cellpadding="0" cellspacing="0" width="1">
  <!-- MSTa*keiksmai*ype="nolayout" -->
  <tr>
   <td height="36" bgcolor="">
   <p align="center">
   <a href="/viewpage.php?page_id=1"><img border="0" src="/komanda/'.$aim.'.jpg" width="140" heigth="100"></a></td>
  </tr>
  <tr>
   <td height="17" valign="bottom">
   <div align="center">
    <table cellpadding="0" cellspacing="0" width="130">
     <tr>
   <td height="17">
   <p align="center">
   <font face="Tahoma" style="font-size: 9px" color="#0B0B0B"><b><br>Eteryje:</b></font>
   <font face="Tahoma" style="font-size: 9px" color="#000000">'.$aim.'</font></td>
  </tr>
  <tr>
   <td height="17">
   <p align="center">
   <font face="Tahoma" style="font-size: 9px" color="#FF0000"><b><br>Eteryje groja:</b></font>














  <b><marquee behavior="right"> <font face="Arial" style="font-size: 8pt" color="#04B404">'.$daina.'</font></td></marquee></p>

  </tr>
  </tr>
  </table>
                 </div>
   </td>
  </tr>
  <tr>
   <td>
   </td>
  </tr>
 </table>
</div>';
}
if($streamstatus == "0")
{
echo'<font size="2" face="tahoma" color="#000">&#208;iuo metu radija yra i&#240;jungta.</font>';
}

/*
* Procentai isreiksti grafiskai
* Pavyzdys: Internetines radijos dabartiniai klausytojai
* Yra maksimalus leistinas klausytoju skaicius ir dabar besiklausanciu procentali israiska grafiskai
*/
$pavadinimas = ""; //pavadinimas
$ko = "<b>Klausytoju: </b>"; //1vienetas (pvz: Lt.)



//paveiksleliu nustatymai
$bg_pic = "http://img340.imageshack.us/img340/2239/loadbarbgnc2.gif"; //fono paveiksliukas (neaktyvi zona)
$nulis_pic = "http://img340.imageshack.us/img340/2239/loadbarbgnc2.gif"; //rodomoas paveiksliukas jei rezultatas lygus 0% (pvz jei nera klausytoju)
$mazas_pic = "http://img340.imageshack.us/img340/456/loadbargreenyk1.gif"; //uzsidengiantis paveiksliukas (zalia)
$vidutinis_pic = "http://img230.imageshack.us/img230/3815/loadbaryellowue2.gif"; //Kai vidutine procentu israiska (geltona)
$didelis_pic = "http://img403.imageshack.us/img403/8008/loadbarreduh0.gif"; //Kai arti arba lygu 100 procentu (raudona)


//pagrindiniai veiksmai
$procentai = (int)round((100 * $currentlisteners) / $maxusers);
$width = $procentai; //paveiksliuko plotis procentaliai
if ($procentai <= 1) {$pic = $nulis_pic; $width = "100";}


//atvaziduojam lentele su rezultatais
echo "<center><b><br>$ko ".$currentlisteners."/100


";




?>
<html><center>
<br>
<SCRIPT LANGUAGE="JavaScript">
function popUp(URL) {
day = new Date();
id = day.getTime();
eval("page" + id + " = window.open(URL, '" + id + "', 'toolbar=0,scrollbars=0,location=0,statusbar=0,menubar=0,resizable=0,width=325,height=53');");
}
// End -->
</script>
</html>
<?

closeside();



Parašė switz· 2009 Lap. 28 16:11:01
#4

labai dekui bet jeigu moki galetum damesti klausytis radijo?

Parašė Karolis· 2009 Lap. 28 16:11:02
#5

www.phpfusion.lt nuaik į panelių skilti ir susirasi kokios tau reikia.

Parašė switz· 2009 Lap. 28 16:11:45
#6

ŠeLMiz parašė:
www.phpfusion.lt nuaik į panelių skilti ir susirasi kokios tau reikia.


3 Tėra tarp panelių ir tai ne kokios :[