$songtitle

$artist

$title

$s = explode("-", $songtitle);

$artist = $s[0];

$title = $s[1];

<?php

error_reporting(0);

$scdef = "Grojarascio nera";               // Kai serveris isjungtas rodo

$scip = "Serverio IP"; // shoutcast serverio IP be porto

$scport = "Serverio Port";                   // shoutcast serverio portas

$scpass = "Serverio Pass";                 // shoutcast serverio pasvordas

$maxusers = "50"; //Kiek vienu sykiu klausosi zmoniu

//End configuration

error_reporting(0);

$scsuccs = NULL;

$page = NULL;

$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 01);

 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);

 }

#############Pagamino Dj_Dede, <a href='http://www.upofm.wu.lt############' target='_blank'><span style='color:005C5B'>http://www.upofm.wu.lt############</span></a>

#####################konfiguracija 01#####################

 $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);

 

// echo'$'.$scphp.' = '.$$scphp.'<br>';

  $y++;

 }

#####################///konfiguracija 02#####################

 $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++;

 }

 $Grojo = str_replace('_',' ',substr ($song[1],0,200));

 $Grojo2 = str_replace('_',' ',substr ($song[2],0,200));

 $Grojo3 = str_replace('_',' ',substr ($song[3],0,200));

 $Grojo4 = str_replace('_',' ',substr ($song[4],0,200));

 $Grojo5 = str_replace('_',' ',substr ($song[5],0,200));

//end song info

 

fclose($scfp);

}

#####################//Muzikos rikevimas#####################

if($streamstatus == "1"){

$_SESSION['songtitle'] = $song;

echo'<div align="left">

 <table cellpadding="0" cellspacing="0" width="1">

  <!-- MSTableType="nolayout" -->

<font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>1.</b></font>

   <font face="Tahoma" style="font-size: 8pt" color="#000000">'.$Grojo.'</font></td>

<br>

<font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>2.</b></font>

   <font face="Tahoma" style="font-size: 8pt" color="#000000">'.$Grojo2.'</font></td>

<br>

<font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>3.</b></font>

   <font face="Tahoma" style="font-size: 8pt" color="#000000">'.$Grojo3.'</font></td>

<br>

<font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>4.</b></font>

   <font face="Tahoma" style="font-size: 8pt" color="#000000">'.$Grojo4.'</font></td>

<br>

<font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>5.</b></font>

   <font face="Tahoma" style="font-size: 8pt" color="#000000">'.$Grojo5.'</font></td>

 </table>';

}

?>