PHP-Fusion Mods

Panelių bazė

Sveiki, jūs panelių bazėje.

Neaktyvuotų panelių: 0
Viso panelių: 377

Ieškoti panelės

Panelės peržiūra

Pavadinimas	Radio info + foto
Įdėjo	MAnjack - Pateikta: 2007-07-25 - Peržiūrėta: 7661
Aprašymas	Parodo radio informacij� ir DJ foto, pana?u � lafesta.lt
Panelė	PHP `<?php` `openside("Eteryje");` `$server2 = "222.222.222.222"; //Radijos serverio IP` `$server2port = "8888"; //Radijos portas` `$server2pass = "slaptazodis"; //Radijos slaptazodis` `$dateix = fsockopen("$server2", $server2port, &$errno, &$errstr);` `if( !$dateix )` `{` `echo "<font face='Verdana' size='2' color='black'><b>Serveris ISJUNGTAS!<b/></font>";` `fclose($dateix);` `}` `else` `{` `fputs($dateix,"GET /admin.cgi?pass=$server2pass&mode=viewxml HTTP/1.0\r\nUser-Agent: Mozilla/4.0 (compatible; MSIE 4.01; Windows NT;)\r\n\r\n");` `while (!(feof($dateix)))` `{` `$zeilex .= fgets($dateix, 4096);` `}` `fclose($dateix);` `}` `$tmpx = explode("<CURRENTLISTENERS>", $zeilex);` `$tmpx = explode("</CURRENTLISTENERS>", $tmpx[1]);` `$server2lauscher = $tmpx[0];` `$pl2 = " ";` `$tmpx = explode("<SERVERGENRE>", $tmpx[1]);` `$tmpx = explode("</SERVERGENRE>", $tmpx[1]);` `$tmp2x = explode("+", $tmpx[0]);` `$nick2 = $tmp2x[0];` `if(count($tmp2x) == 2)` `$pl2 = $tmp2x[1];` `$tmpx = explode("<SERVERTITLE>", $tmpx[1]);` `$tmpx = explode("</SERVERTITLE>", $tmpx[1]);` `$server2title = $tmpx[0];` `$tmpx = explode("<SONGTITLE>", $tmpx[1]);` `$tmpx = explode("</SONGTITLE>", $tmpx[1]);` `$song2title = $tmpx[0];` `$tmpx = explode("<STREAMSTATUS>", $tmpx[1]);` `$tmpx = explode("</STREAMSTATUS>", $tmpx[1]);` `$stream2status = $tmpx[0];` `//Foto nustatymai. Kas eteryje rodo foto` `if($server2title == 'serveris') //ce rasyti kaip yra pasidares dj GENRE geriausia kad butu vienas zodis pvz serveris` `echo "<center><img src='komanda/serveris.gif' border='2' width='128' height='95'></center>";` `if ($stream2status == "1")` `{` `//Kas eteryje` `echo "<font face='Verdana' size='2' color='black'><center><b> $server2title</font></b></center>";` `//Ka serveris groja` `if ($pl2 =="")` `{` `echo "";` `}` `else` `{` `echo "<a href=\"";` `echo "$pl2";` `echo "\" target=\"_blank\"></a>";` `}` `//Was wird gespielt?` `echo "<font face='Verdana' size='2'` `<MARQUEE scrolldelay='1' SCROLLAMOUNT='1' onmouseover='this.stop()' onmouseout='this.start()' direction='left' height='20' width='170'>` `$song2title</font></MARQUEE>";` `echo "<font face='Verdana' size='3' color='red'>` `<center><b>Klausytis:</b><a href='http://$server2:$server2port/listen.pls'><img src='images/Winamp2.png' border='0' width='50' height='50'> <a href='http://$server2:$server2port/listen.pls'><img src='images/w_m_p.png' border='0' width='50' height='50'></center>";` `}` `//Jeigu niekas nera prisijunges i etery :)` `else` `{` `echo "<font face='Verdana' size='3' color='red'><center>Netransliuojama</font></center>` `";` `}` `closeside();` `// paimta i? mrcbug.com` `?>`

Puslapis 1 iš 3: 12 3

rimvis · 2007-07-27 20:53

iCe · 2007-07-30 20:03

man meta error ;( ka daryti?

nixonas · 2007-07-31 11:04

labai prasau istaisykite sita radio panele!

MAnjack · 2007-07-31 18:20

?iaip jeigu jum neveikia, tai nerei?kia, kad reikia trint, juk gal kas ant kito hosto pasileis :)

mira · 2007-08-01 11:16

Neveikia.... Kokiam jis hoste tada dirba jej sakai kitam hoste veikia....?

bronka · 2007-08-13 12:40

seip leva yra, kad ji meto bugus, kai radijas isjungtas... galetumet pataisyt ;]

Reamis · 2007-08-17 00:20

Jei kas ja sutvarkysit parasykit man i skype reamigis, welniskai reikia man jos :| ;/

hAwK · 2007-08-19 09:07

Neveikia :( Ishtaisykit.

Pokeris · 2007-08-19 14:23

Code

openside(\"Eteryje\");

$server2 = \"222.222.222.222\"; //Radijos serverio IP

$server2port = \"8888\"; //Radijos portas

$server2pass = \"slaptazodis\"; //Radijos slaptazodis

 

$dateix = fsockopen(\"$server2\", $server2port, &$errno, &$errstr);

if( !$dateix )

{

echo \"Serveris ISJUNGTAS!
\";

fclose($dateix);

}

else

{

fputs($dateix,\"GET /admin.cgi?pass=$server2pass&mode=viewxml HTTP/1.0\r\nUser-Agent: Mozilla/4.0 (compatible; MSIE 4.01; Windows NT;)\r\n\r\n\");

while (!(feof($dateix)))

{

$zeilex .= fgets($dateix, 4096);

}

fclose($dateix);

}

$tmpx = explode(\"\", $zeilex);

$tmpx = explode(\"\", $tmpx[1]);

$server2lauscher = $tmpx[0];

$pl2 = \" \";

$tmpx = explode(\"\", $tmpx[1]);

$tmpx = explode(\"\", $tmpx[1]);

$tmp2x = explode(\"+\", $tmpx[0]);

$nick2 = $tmp2x[0];

 

if(count($tmp2x) == 2)

$pl2 = $tmp2x[1];

 

$tmpx = explode(\"\", $tmpx[1]);

$tmpx = explode(\"\", $tmpx[1]);

$server2title = $tmpx[0];

$tmpx = explode(\"\", $tmpx[1]);

$tmpx = explode(\"\", $tmpx[1]);

$song2title = $tmpx[0];

$tmpx = explode(\"\", $tmpx[1]);

$tmpx = explode(\"\", $tmpx[1]);

$stream2status = $tmpx[0];

 

//Foto nustatymai. Kas eteryje rodo foto

if($server2title == 'serveris') //ce rasyti kaip yra pasidares dj GENRE geriausia kad butu vienas zodis pvz serveris 

echo \"
\";

 

 

 

if ($stream2status == \"1\")

{

//Kas eteryje

echo \" $server2title

\";

 

 

 

 

//Ka serveris groja

if ($pl2 ==\"\")

{

echo \"\";

}

else

{

echo \"
echo \"$pl2\";

echo \"\\" target=\\"_blank\\">\";

}

//Was wird gespielt?

echo \">

$song2title\";

echo \"

Klausytis:
 \";

}

//Jeigu niekas nera prisijunges i etery :)

else

{

echo \"Netransliuojama

\";

}

closeside();

#10

extasy · 2007-08-29 22:23

)

Puslapis 1 iš 3: 12 3

Rašyti komentarą

Turite prisijungti, norėdami parašyti komentarą.

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

	Neleista registracija: 39452
	Šiandien: 31