Navigacija

Vartotojų tinkle

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

Registruoti nariai: 25,955
Naujausias narys: Johny

Naujausi straipsniai

Paskutiniai nariai

Johny 2 savaitės
Reikalas 3 savaitės
Jaunelis 9 savaitės
lanis10 savaitės
And2s10 savaitės
Memento Mori15 savaitės
ozzWANTED16 savaitės
Quwqkibor18 savaitės
asirija22 savaitės
tomeem24 savaitės
weberiz27 savaitės
mRokass29 savaitės
kartoonas30 savaitės
iaescortsmap31 savaitės
grunskiz33 savaitės
Bruksnys34 savaitės
illusion34 savaitės
ordo35 savaitės
Jurgaila35 savaitės
originalcs1635 savaitės

Informacija:


OS: Unknown
Naršyklė: Nežinoma
IP: 3.14.251.57
Naujienų: 529
Straipsnių: 235
Temų: 52,588
Postų: 522,528
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.

Jaunelis
2024 Lie. 25 11:07:43
Oho vis dar veikia svetainė akinanti šypsen Šimtas metų, matau Šaukykloje nuostalgija. Smagu panaršyt po forumą ir pažiūrėt senas temas šypsosi

And2s
2024 Lie. 17 19:07:04
2008 pirmą kart čia patekau, man buvo 10m ir čia pramokau programavimo.. smagu skaityti senas žinutes, tokia nostalgija akinanti šypsen ačiū Ozz kad saugoji šitą kultūrinį reliktą šypsosi

ozzWANTED
2024 Sau. 17 01:01:00
Desperatiškus komentarus šaukykloje su accountu po mėnesio prasibuvimo, ištryniau. Pasaulis ir taip juodas. Įjungiam šviesą, prašviesės. šypsosi

Majakas
2023 Gru. 10 19:12:39
Negaliu patikėti jog žinutės/pranešimai visi yra nuo 2008 m akinanti šypsen

Žmogus
2023 Rugs. 7 21:09:14
O gal BloodKiller pasijungs?

Š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
Headeryje Avataras
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | Žaliems

Autorius: iSty Peržiūrų: 494      Spausdinti temą
2009 Bal. 11 16:04:32          1 žinutė iš 2
Spausdinti pranešimą





Kaip padaryti kad čia būtu avataras..

Header.php:

<?php
error_reporting(0);
$scdef = ""; // Default station name to display when server or stream is down
$scip = "shoutcast.volna.lt"; // ip or url of shoutcast server (DO NOT ADD HTTP:// don't include the port)
$scport = "8050"; // port of shoutcast server
$scpass = "kaniukai"; // password to shoutcast server
$maxusers = "100"; //Kiek vienu sykiu klausosi zmoniu
$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.' ';
}
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);
   }
   $loop = array("STREAMSTATUS", "BITRATE", "SERVERTITLE", "CURRENTLISTENERS", "AIM", "ICQ");
   $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);
      // uncomment the next line to see all variables
      // echo'$'.$scphp.' = '.$$scphp.'<br>';
      $y++;
   }
   //end intro xml elements
   //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));
   fclose($scfp);
}

//display stats
if($streamstatus == "1"){
switch ($aim) {
   case 'WiNALL': $aimlogo = "Serveris"; break;
   case 'Serveris': $aimlogo = "Serveris"; break;
   case 'Bakkaz': $aimlogo = "Bakkaz"; break;
   case 'Dj_Tadydass': $aimlogo = "Dj_Tadydass"; break;
   case 'Dj Destiny': $aimlogo = "Dj Destiny"; break;
   case 'Dj Destiny': $aimlogo = "Dj Destiny"; break;
   case 'Laurynas' : $aimlogo = "Laurynas"; break;
default:  $aimlogo = "dj";
}
$_SESSION['djus'] = $aim;
echo "               <table cellpadding='0' cellspacing='0' width='1'>
                  <tr>
                     <td height='17' valign='middle' >
                        <table cellpadding='0' cellspacing='0' width='130' align='center'>
                           <tr>
                              <td height='17'>
                                 <p align='center'>
                                    <font face='Tahoma' style='font-size: 8pt' color='#FFFFFF'><b>Laida:</b></font>
                                    <font face='Tahoma' style='font-size: 8pt' color='#FFFFFF'>".$icq."</font><br>
                                    <font face='Tahoma' style='font-size: 8pt' color='#FFFFFF'><b>Eteryje:</b></font>
                                    <font face='Tahoma' style='font-size: 8pt' color='#FFFFFF'>".$aim."</font>
                                 </p>
                              </td>
                           </tr>
                           <tr>
                              <td height='17'>
                                 <p align='center'>
                                    <marquee behavior='right'> <font face='Arial' style='font-size: 8pt' color='#000000'>".$daina."</font></marquee>
                                 </p>
                              </td>
                           </tr>
                        </table>
                     </td>
                  </tr>
         </table>\n";
}
if($streamstatus == "0"){
echo "<table cellpadding='0' cellspacing='0' align='center><tr><td><font size='2' face='tahoma' color='#6C6D7B'>Technine profilaktika.</font></td></tr></table>";
}

$pavadinimas = ""; //pavadinimas
echo "                  <center><b>".$pavadinimas."</b>
                  <font size='1'><center></font>
                  
               </td>
            </tr>
         </table>
      </td>
   </tr>
   <tr>
</table>\n";
closeside_panel();
?>




www.styGRAFIKA.tk - Grafikos Studija!
Redagavo iSty 2009 Bal. 11 16:04:29
2009 Bal. 11 17:04:29          2 žinutė iš 2
Spausdinti pranešimą
https://webdnd.com/readarticle.p...icle_id=92 pagal šitą darykis.
Peršokti į forumą: