PHP-Fusion Mods - Diskusijų forumas: v6 ShoutCast paskutin�s grotos dainos

Peržiūrėti temą

PHP-Fusion Mods :: PHP-Fusion modifikacijų forumas :: Pageidaujami infusionai, panelės, modifikacijos.

v6 ShoutCast paskutin�s grotos dainos

parašyta 2010-12-11 13:57

Pradinukas

Reputacija: 0

Pranešimai: 42
Įstojo: 2007-06-24 Taigi, ie?kojau visur ?ios panel�s,�skiepio ,bet nerandu. Gal galit J�s man pad�ti. Ten turi rodyti paskutines dainas grotas. 10 dain� ar 5. Nesvarbu, svarbu ,kad rodytu. :)

Wasiulis

parašyta 2010-12-11 14:29

Apšylantis

Reputacija: 0

Pranešimai: 61
Įstojo: 2009-07-04

Code


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, www.upofm.wu.lt##...

#####################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(\".*\", \"\", $pageed);

  if (($loop[$y] == \"SERVERGENRE\") || ($loop[$y] == \"SERVERTITLE\") || ($loop[$y] == \"SONGTITLE\") || ($loop[$y] == \"SERVERTITLE\") || ($loop[$y] == \"AIM\"))

   $$scphp = urldecode($$scphp);



// echo'$'.$scphp.' = '.$$scphp.'
';

  $y++;

 }

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

 $pageed = ereg_replace(\".*\", \"\", $page);

 $pageed = ereg_replace(\".*\", \"\", $pageed);

 $songatime = explode(\"\", $pageed);

 $r=1;

 while (isset($songatime[$r])) {

  $t=$r-1;

  $playedat[$t] = ereg_replace(\".*\", \"\", $songatime[$r]);

  $playedat[$t] = ereg_replace(\".*\", \"\", $playedat[$t]);

  $song[$t] = ereg_replace(\".*\", \"\", $songatime[$r]);<br />
  $song[$t] = ereg_replace(\".*\", \"\", $song[$t]);

  $song[$t] = urldecode($song[$t]);

  $dj[$t] = ereg_replace(\".*\", \"\", $page);

  $dj[$t] = ereg_replace(\".*\", \"\", $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'



 

  
1.

   '.$Grojo.'


2.

   '.$Grojo2.'


3.

   '.$Grojo3.'


4.

   '.$Grojo4.'


5.

   '.$Grojo5.'

 








';

}

?>

Redagavo Wasiulis 2010-12-11 14:29

www.mp3on.lt // www.e-center.lt // www.code-lt.eu

SonicMaster

parašyta 2010-12-11 14:44

Pradinukas

Reputacija: 0

Pranešimai: 42
Įstojo: 2007-06-24 O dabar gal yra sukurta, kurios ateinan�ios 5 dainos gros?

Wasiulis

parašyta 2010-12-11 19:55

Apšylantis

Reputacija: 0

Pranešimai: 61
Įstojo: 2009-07-04

:D prajuokinai. Gali man papasakoti i? kur programa turi ?inoti k� gros rdj? ;D �ia geras buvo

www.mp3on.lt // www.e-center.lt // www.code-lt.eu

Wyciokazz

parašyta 2010-12-11 20:00

Administratorius

Reputacija: 1

Pranešimai: 2108
Įstojo: 2008-02-27

Cia vos ne laiko masina padaryti.

Kam kurti tai kas jau sukurta.

Nesu ekstrasensas ar dar koks čigonas tad iš nieko negaliu suprast kur bėda.

[img]http://27.media.tumblr.com/tumblr_m3hdwudgjG1rteofuo1_500.gif[/img]

Bamas

parašyta 2010-12-11 20:25

Draugas

Reputacija: 0

Pranešimai: 492
Įstojo: 2009-06-18

reik pradet regint i pms'a daug auksiniu minciu cia :))))

www.topfilmai.lt

SonicMaster

parašyta 2010-12-12 19:26

Pradinukas

Reputacija: 0

Pranešimai: 42
Įstojo: 2007-06-24 Na juk playlistas yra, ir ten viska surasyta is eiles. Tai ir sakau, gal yra sukurta, kad shoutcast skaito kokios jau grojo, ir kurios dar tik gros. Na aisku, pasisaipet neblogai. Paprasciausiai nesuprasdami mano minties. :@

Wasiulis

parašyta 2010-12-12 19:36

Apšylantis

Reputacija: 0

Pranešimai: 61
Įstojo: 2009-07-04

Ne durni esam, ai?ku supratom. Servas tavo rodo grotas dainas. o i? kur jem ?inoti kokios ten dainos tam tavo playliste. Nemastai, n�ra tokio dalyko ir nebus.

www.mp3on.lt // www.e-center.lt // www.code-lt.eu

ire

parašyta 2010-12-13 09:56

Savekas

Reputacija: 0

Pranešimai: 102
Įstojo: 2009-06-10

imanoma su tuo nebent kai auto dj online.

All you need is love

sOt

#10

parašyta 2010-12-13 10:03

Naujokas

Reputacija: 0

Pranešimai: 21
Įstojo: 2007-11-02 Tai surenkam talka, ir kuriam laiko masina, kad jam rodytu busimas 5dainas.

ire

#11

parašyta 2010-12-13 10:09

Savekas

Reputacija: 0

Pranešimai: 102
Įstojo: 2009-06-10

supranti kad autodj playlista sudarant gali parasyt i prieki kurios gros. Priklauso nuo playlisto. Ir as pasakiau imanoma. Tad jei nori tokio dalyko tektu daug isleist pinigu bei nervu. O jei tu manes nesupratai,tai isvadas laikas daryt.

All you need is love

Peršokti į forumą:

tabux	4 Dienos
sanper	nepamenu
Zbigniew@	nepamenu
CepelinasX	nepamenu
VV91DD	nepamenu
Minus	nepamenu
priezilviciu	nepamenu
EdvinasG1337	nepamenu
rolandas94	nepamenu
Edis2	nepamenu
klubogerbejas	nepamenu
Miskinis	nepamenu

	Neleista registracija: 39026
	Šiandien: 32