Panelių bazė
Sveiki, jūs panelių bazėje.
Neaktyvuotų panelių: 0
Viso panelių: 377
Ieškoti panelės
Neaktyvuotų panelių: 0
Viso panelių: 377
Ieškoti panelės
Panelės peržiūra
| Pavadinimas | Radio Panel |
| Įdėjo | livogro - Pateikta: 2008-01-08 - Peržiūrėta: 7199 |
| Aprašymas | Stai Radio Panele. Manau dauk kam prawers. seip ne pats kuriau bet kazkur radau iswerciu ir dar biski dadejau ;] kur bus xxx manaus suprasite kur ka rasyti jums butinai reiks Suggestion_box Infusion'o. Tai Wat Kas neaisku klauskite. ir dar wienas dalykas jai galite padekite pataisyt koda. kai isjungi radio serveri meta erora ;] Suggestion_box - http://rapidshare.com/files/82144306/suggestion_box.rar.html |
| Panelė | Code openside("Radijas");
$scip="xxx.xxx.xxx.xxx";
$scport="8002";
$scpass="xxxxxx";
//$ip="$s"; //localhost
$scfp = fsockopen($scip, $scport);
//$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
if(!$scfp) {
$scsuccs=1;
//echo''.$scdef.' is Offline';
}
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", "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)
$$scphp = urldecode($$scphp);
// $servert[$y] = ereg_replace(".*<SERVERTITLE>", "", $servert[$y]);
// $servert[$y] = ereg_replace("</SERVERTITLE>.*", "", $servert[$y]);
// 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);
$pageed = ereg_replace(".*<SERVERTITLE>", "", $page);
$pageed = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$servert = explode("<SERVERTITLE>", $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]);
$r++;
}
//end song info
// $obisk = explode("<POINTER>", $obisk);
fclose($scfp);
}
//display stats
if($streamstatus == "1"){
//you may edit the html below, make sure to keep variable intact
echo"
<table width=100% align=center border=0 cellpadding=0 cellspacing=0>
<tr><b>
<td><div align=center><font size=2 face=Tahoma><strong>
Daina: <br> <marquee><font color=#f0051>$song[0]</marquee></font></b>
Eteryje: <br><font color=#yudf55>$servert[0] <br><br></font>
Klausytoju: <br><font color=#fg551>$currentlisteners <br><br></font>
Bit Reitas <br><font color=#gh5465>$bitrate kbps
<p>>>><a href='http://xxx.xxx.xxx.xxx:xxxx/listen.psl' target='_blank'><b> Klausyk </b></a><<<</p>
<p>><a href='http://xxxxxxxxxxxxx/infusions/suggestion_box/suggestion_box.php' target='_blank'><b> Prasyk Dainos </b></a><</p>
<br><br></strong></div><br></td></font>
</tr>
</table>
";
}
closeside();
?>
|
Rašyti komentarą
Turite prisijungti, norėdami parašyti komentarą.
I?siemiau ta BITRATE ir pra?yk dainos ir daba kietai B)
;)
tai nesupratau LATGA baudzia jei as per shoutcast leidziu ar ne?
butu gerai suzinot :|
levas
Na zinot as zalias galiu paklaust kur ji imest i pati php-files?
atsidarai sistemos administracija>paneles>sukurti nauja ir sita idedi o ta prasymus i infusions folderi sumesk
Aciu
kodel man meta?
Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.
Please contact the server administrator, webmaster@csclubnew.gauja.lt and inform them of the time the error occurred, and anything you might have done that may have caused the error.
More information about this error may be available in the server error log.
Additionally, a 404 Not Found error was encountered while trying to use an ErrorDocument to handle the request.
--------------------------------------------------------------------------------
Apache Server at www.csclubnew.gauja.lt Port 80
:o nk nesuprantu
Edwyzzz - LATGA baud?ia u? nelicenzijuota radija kuri yra nelegali ir neturi licenzijos.