Loading:


skrypt radiowy

skrypt statystyk shoutcast



Napisz Artyku³

Listing

<?
   $sc[czas]       =   180;
   $sc[host]       =   "http:\\10.10.3.46";
   $sc[port]       =   8551;

$sc[template1]   =  "<b>[radio]</b>";
$sc[template2]   =  "<b>[aim]</b>";

if($fp = fsockopen($sc[10.10.3.46], $sc[8551]))
{
fputs($fp,"GET /index.html HTTP/1.0\r\nUser-Agent: XML Getter (Mozilla Compatible)\r\n\r\n");
fgets($fp);fgets($fp);fgets($fp);
       while(!feof($fp)) $in.=strip_tags(fgets($fp));
fclose($fp);


//  [status]
   $m[0]="Server is currently";
   $m[1]="";
   $mp[0]=strpos($in,$m[0]);
   $mp[1]=@strpos($in,$m[1]);
   $ml[0]=strlen($m[0]);
   $ml[1]=strlen($m[1]);

   $tmp[1]=explode( " " , trim( substr( $in , $mp[0] + $ml[0] , 5 ) ) );

   if( $tmp[1][0] == "up" )
       $dat[status] = "On";
   elseif( $tmp[1][0] == "down" )
       $dat[status] = "Off";
   else
       $dat[status] = "err";

   if($dat[status]=="On")
   {
   //  [radio]
       $m[0]="Stream Title:";
       $m[1]="Content Type:";
       $mp[0]=strpos($in,$m[0]);
       $mp[1]=strpos($in,$m[1]);
       $ml[0]=strlen($m[0]);
       $ml[1]=strlen($m[1]);

       $tmp[1]=trim( substr( $in , $mp[0] + $ml[0] , $mp[1]-$mp[0]-$ml[1] ) );

       if( $tmp[1] ) $dat[radio] = $tmp[1];
       else $dat[radio] = "err";

   //  [aim]
       $m[0]="Stream AIM:";
       $m[1]="Stream IRC:";
       $mp[0]=strpos($in,$m[0]);
       $mp[1]=strpos($in,$m[1]);
       $ml[0]=strlen($m[0]);
       $ml[1]=strlen($m[1]);

       $tmp[1]=trim( substr( $in , $mp[0] + $ml[0] , $mp[1]-$mp[0]-$ml[1] ) );

       if( $tmp[1] ) $dat[aim] = $tmp[1];
       else $dat[aim] = "err";

   //  [genre]
       $m[0]="Stream Genre:";
       $m[1]="Stream URL:";
       $mp[0]=strpos($in,$m[0]);
       $mp[1]=strpos($in,$m[1]);
       $ml[0]=strlen($m[0]);
       $ml[1]=strlen($m[1]);

       $tmp[1]=trim( substr( $in , $mp[0] + $ml[0] , $mp[1]-$mp[0]-$ml[1]-2 ) );

       if( $tmp[1] ) $dat[genre] = $tmp[1];
       else $dat[genre] = "err";

   //  [ile]
       $m[0]="kbps with";
       $m[1]="listeners";
       $mp[0]=strpos($in,$m[0]);
       $mp[1]=strpos($in,$m[1]);
       $ml[0]=strlen($m[0]);
       $ml[1]=strlen($m[1]);

       $tmp[1]=explode( " " , trim( substr( $in , $mp[0] + $ml[0] , $mp[1]-$mp[0]-$ml[1]-2 ) ) );

       if( $tmp[1] ) $dat[ile] = $tmp[1][0];
       else $dat[ile] = "err";

   //  [max]
       $m[0]="kbps with";
       $m[1]="listeners";
       $mp[0]=strpos($in,$m[0]);
       $mp[1]=strpos($in,$m[1]);
       $ml[0]=strlen($m[0]);
       $ml[1]=strlen($m[1]);

       $tmp[1]=explode( " " , trim( substr( $in , $mp[0] + $ml[0] , $mp[1]-$mp[0]-$ml[1]-2 ) ) );

       if( $tmp[1] ) $dat[max] = $tmp[1][2];
       else $dat[max] = "err";

   //  [peak]
       $m[0]="Listener Peak:";
       $m[1]="Average";
       $mp[0]=strpos($in,$m[0]);
       $mp[1]=strpos($in,$m[1]);
       $ml[0]=strlen($m[0]);
       $ml[1]=strlen($m[1]);

       $tmp[1]=trim( substr( $in , $mp[0] + $ml[0] , $mp[1]-$mp[0]-$ml[1]-7) );

       if( $tmp[1] ) $dat[peak] = $tmp[1];
       else $dat[peak] = "err";


   }
}
else
{
   $dat=array();
   $dat[status]="err";
}

$co             =   array('[status]','[radio]','[aim]','[genre]','[ile]','[max]','[peak]');
$naco           =   array($dat[status],$dat[radio],$dat[aim],$dat[genre],$dat[ile],$dat[max],$dat[peak]);
$sc[template1]   =   str_replace($co,$naco,$sc[template1]);
$sc[template2]   =   str_replace($co,$naco,$sc[template2]);

  $fp1 = @fsockopen($sc[http:\\10.10.3.46], $sc[8551], &$errno, &$errstr, 10);

  if (!$fp1) {
   $text = "Aktualnie nie nadajemy";
  } else {

   fputs($fp1, "GET /7 HTTP/1.1\nUser-Agent:Mozilla\n\n");

   for($i = 0; $i < 1; $i++) {
    if (feof($fp1)) break;
    $fp_data1 = fread($fp1, 31337);
    usleep(500000);
   }

   $fp_data1 = ereg_replace("^.*<body>", "", $fp_data1);
   $fp_data1 = ereg_replace("</body>.*", "", $fp_data1);

   list($current1, $status1, $peak1, $max1, $reported1, $bit1, $song1) = explode(",", $fp_data1, 7);

   if ($status1 == "1")
    $text = "$song1";
 else
    $text = "Aktualnie nie nadajemy";
  }

// TU WSTAW ADRESY DO ZDJEC DJ'OW - WEDLUG WZORU

if ($dat[aim] == "AutoPilot") $fotka = "pilot.jpg"; else


$fotka = "brak.gif";

?>

<table cellspacing="0" cellpadding="0" height="216" width="140" border="0" background ="tlo.gif">
<tr><td width ="100%" height ="19" colspan ="2">
<center><font size ="2" face ="Verdana" color ="black"><b>
Radio
</b><br></font></center>
</td></tr>
<tr><td width ="80%" height ="15" valign ="top" colspan ="2">
<center><font size ="1" face ="Arial"><b>
<A href ="http://www.omega.ovh.org" target ="_blank"><font color ="brown">www.omega.ovh.org</font></A>
</b><br></font></center>
</td></tr>
<tr><td width ="100%" height ="15" colspan ="2">
</td></tr>
<tr><td width ="100%" height ="17" valign ="top" colspan ="2">
<center><font size ="2" face ="Courier" color ="black"><b>
<MARQUEE width="80%" SCROLLAMOUNT="4" behavior ="scroll" onMouseOver='this.stop()' onMouseOut='this.start()'>
<? echo $sc[template1]; ?>
</MARQUEE>
</font></center>
</td></tr>
<tr><td width ="100%" height ="15" colspan ="2">
</td></tr>
<tr><td width ="100%" height ="17" valign ="top" colspan ="2">
<center><font size ="2" face ="Courier" color ="black"><b>
<MARQUEE width="80%" SCROLLAMOUNT="4" behavior ="scroll" onMouseOver='this.stop()' onMouseOut='this.start()'>
<? echo $text; ?>
</MARQUEE>
</font></center>
</td></tr>
<tr><td width ="100%" height ="15" colspan ="2">
</td></tr>
<tr><td width ="100%" height ="17" valign ="top" colspan ="2">
<center><font size ="2" face ="Courier" color ="black"><b>
<MARQUEE width="80%" SCROLLAMOUNT="4" behavior ="alternate" onMouseOver='this.stop()' onMouseOut='this.start()'>
<? echo $sc[template2]; ?>
</MARQUEE>
</font></center>
</td></tr>
<tr><td width ="100%" height ="6" colspan ="2">
</td></tr>
<tr><td width ="65" height ="80" valign ="top">
<a href ="http://10.10.3.46:8551/listen.pls"><img src ="separ.gif" width ="65" height ="70" border ="0"></a><br clear ="all">
<td width ="75" height ="80" valign ="top">
<? print "<img src ='$fotka' width ='62' height ='70'>"; ?>
<br clear ="all">
</td></tr>
</table>




Dodano przez: gieros Ranga: Poziom 10 Punktów: 493
Komentarze użytkowników
przyda sie bo malo jest takich skryptow
autor: alvania | 12643 | 2011-11-08 00:59:32


    • Tre¶æ komentarza
      Kod do komentarza (opcjonalnie)
      PHP JavaScript MySQL Smarty SQL HTML CSS ActionScript
      Autor
      Token
      token

       

       








funkcje.net
Wszelkie prawa zastrzeżone©. | Funkcje.net 2008-2024 v.1.5 | design: diviXdesign & rainbowcolors