Navigacija

Vartotojų tinkle

Prisijungusių svečių: 64
Prisijungusių narių: 0
Prisijungusių narių nėra

Registruoti nariai: 25,964
Naujausias narys: laleceylan50

Naujausi straipsniai

Paskutiniai nariai

Reikalas 5 dienos
Kižas 1 savaitė
Bruksnys 2 savaitės
laleceylan50 4 savaitės
minimukas 4 savaitės
N-20 7 savaitės
Rytis 8 savaitės
DjArtas 9 savaitės
WolfHammer 9 savaitės
Nostesi19 savaitės
Wisedocs19 savaitės
asdasdddz23 savaitės
Paslapties K...24 savaitės
Audrius_1727 savaitės
Simbijanas39 savaitės
Karinacraft39 savaitės
Žmogus43 savaitės
Darexs49 savaitės
Nepas50 savaitės
keistuole52 savaitės

Informacija:


OS: Unknown
Naršyklė: Nežinoma
IP: 216.73.216.14
Naujienų: 529
Straipsnių: 235
Temų: 52,590
Postų: 522,550
Postų pask. parą: 0
Shout'ų pask. parą: 0
P.S.C. pask. parą: 0
Nuorodų kataloge: 13

Lankomumo Statistika

Peržiūrų šiandien: 22

Iš viso peržiūrų: 22948724

Prisijungti

REGISTRUOTIS
Nario vardas

Slaptažodis



Pamiršai slaptažodį?
Paprašyk naujo

Aktyvuoti save

Šaukykla

Jei norite rašyti žinutes, turite prisijungti.

minimukas
2026 Vas. 21 08:02:25
oi oi akinanti šypsen yra dar cia gyvu? akinanti šypsen

N-20
2026 Vas. 6 21:02:05
O mes dar gyvi šypsosi)

WolfHammer
2026 Sau. 25 01:01:35
drovus

Žmogus
2025 Geg. 31 10:05:18
Kas geresnio? šypsosi

Nepas
2025 Bal. 9 17:04:13
drovus

Šaukyklos archyvas

Apklausa

Ar esate patenkinti lietuviško vertimo kokybe?

Taip!

Taip, bet yra ką taisyti (parašysiu komentaruose)

Ne

Norėdamas balsuoti turite prisijungti.
Archyvas
Reklama 400x60
Padekit su radijo panele
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | Bendri PHP-F klausimai

Autorius: cipis Peržiūrų: 794      Spausdinti temą
2008 Rugp. 11 21:08:29          1 žinutė iš 2
Spausdinti pranešimą
Reike kad idetumet toke nesamone Klausyti Knopke Be paveikslelio ;)
openside("Upo Radijas");

error_reporting(0);
$scdef = "Serversi neveikia";               // Default station name to display when server or stream is down
$scip = "78.62.120.222"; // ip or url of shoutcast server (DO NOT ADD HTTP:// don't include the port)
$scport = "8002";                   // port of shoutcast server
$scpass = "xxxxx";                 // password to shoutcast server
//End configuration
error_reporting(0);
$scsuccs = NULL;
$page = NULL;
include('config_radio.php');  //you may edit this path to fit your server environment otherwise leave it alone
$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
 if(!$scfp) {
  $scsuccs=1;
echo''.$scdef.' greit veiksime';
 }
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", "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] == "currentlisteners"))
   $$scphp = urldecode($$scphp);

// 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);
 $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++;
 }
 $daina = str_replace('_',' ',substr ($song[0],0,90));
//end song info

fclose($scfp);
}

//display stats
if($streamstatus == "1"){
switch ($aim) {
    case 'WiNALL': $aimlogo = "Serveris"; break;
 case 'Serveris': $aimlogo = "Serveris"; break;
 case 'Minix': $aimlogo = "Minix"; break;
 default:  $aimlogo = "dj";
}
$_SESSION['djus'] = $aim;
echo'<div align="center">
 <table cellpadding="0" cellspacing="0" width="0">
  <!-- MSTaašype="nolayout" -->
    <tr>
   <td height="0" bgcolor="">
   <p align="center">
   <a href="radija.php"><img border="0" src="radio/dj/'.$aimlogo.'.png" width="120" heigth="100"></a>
<tr>
 <td height="17" valign="bottom" bgcolor="">
   <div align="center">
    <table cellpadding="0" cellspacing="0" width="111">
     <tr>
   <td height="17">
   <p align="">
   <font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>Eteryje:</b></font>
   <font face="Tahoma" style="font-size: 8pt" color="#000000">Upo Radija</font></td>
  </tr>
<tr>
     <td height="17">
   <p align="">
   <font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>Klauso:</b></font>
   <font face="Arial" style="font-size: 7pt" color="#000000">'.$currentlisteners.'</font>       </tr>
<tr>
   <td height="">
   <p align="">
   <font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>DJ:</b></font>
   <font face="Tahoma" style="font-size: 8pt" color="#000000">DJ Dede</font></td>
  </tr>
  <tr>
   <td height="17">
   <p align="">
   <font face="Tahoma" style="font-size: 8pt" color="#3E1710"><b>Groja:</b></font>
   <font face="Arial" style="font-size: 7pt" color="#000000">'.$daina.'</font></td>
   <br><br></font>
<p>
  </tr>
  </tr>
  </table>
                 </div>
   </td>
  </tr>
  <tr>
   <td>
   </td>
  </tr>
 </table>
</div>';
}
if($streamstatus == "0")
{
echo'<font size="2" face="tahoma" color="#6C6D7B">Šiuo metu radija yra išjungta.</font>';
}
closeside();




Counter-Strike 1.6 - NAUJOKAI-LT
WWW.NAUJOKAI.NET
2008 Rugp. 11 21:08:01          2 žinutė iš 2
Spausdinti pranešimą
Susitvarkeu Pats liežuvis liežuvis liežuvis

Counter-Strike 1.6 - NAUJOKAI-LT
WWW.NAUJOKAI.NET
Peršokti į forumą: