Pereiti prie turinio

Pagalbos dėl eterio panelės


Rekomenduojami pranešimai

Labas draugai, man reikia kažkur pakeist kažką, kad penelė imtų pavadinimą laidos ne iš AIM, o kad imtų iš #ICQ :)

 

Ačiū, tiem kas padės.

 

 

<?php

$adresas = "xxxxxxxxx"; // Serverio adresas (IP)
$portas = "xxxx"; // Serverio Portas

// Stilius galite redaguoti naudodamiesi betkokiais html tag'ais
// Demesio: Vietoje " (dvigubu kabuciu) naudokit ' (viengubas) taip isvengsite error'u
// Gautos informacijos rodymo stilius
$stilius = "<span style='font-size:14px; padding-left:3px; margin-top:-2px;font-weight:bold; font-family:Trebuchet MS;text-shadow:#000000 1px 1px 0px; color:#efefef;'>

<span style='text-transform:uppercase;color:#0ab2ff;'>Laida:</span> %dj</span>";

// Ka rodys jeigu serveris isjungtas
$stilius_off = "Serveris nedirba";

// Neredaguoti zemiau esanciu kodu //
$sludm1435 = stream_context_create(
array(
'http'=>array(
'method'=>"GET",
'header'=>"GET /index.html HTTP/1.0\r\n".
"Cookie: foo=bar\r\n".
"Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash\r\n".
"Accept-Language: pl,en-us;q=0.5\r\n".
"Accept-Encoding: gzip, deflate\r\n".
"User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; .NET CLR 1.0.3705)\r\n".
"Host: seb.sleepbot.com\r\n".
"Connection: Closed\r\n",
'timeout'=>"1"
)
)
);
$sludm1362 = @file_get_contents('http://'.$adresas.':'.$portas.'/', 0, $sludm1435);
if(!$sludm1362) {
echo $stilius_off;
} else {
$sludm1745 = strpos($sludm1362, "kbps with <B>")+13;
$sludm1244 = strpos($sludm1362, " listeners")-$sludm1745;
$sludm = explode(" of ", substr($sludm1362, $sludm1745, $sludm1244));
$stilius = @str_replace("%klauso", $sludm[0], $stilius);
$stilius = @str_replace("%viso", $sludm[1], $stilius);
$sludm1745 = strpos($sludm1362, "Stream ICQ:")+105;
$sludm1244 = strpos($sludm1362, "Stream AIM:")-$sludm1745-63;
$sludm = explode('">', substr($sludm1362, $sludm1745, $sludm1244));
$stilius = @str_replace("%laida", $sludm[1], $stilius);
$sludm1745 = strpos($sludm1362, "Stream AIM:")+80;
$sludm1244 = strpos($sludm1362, "Stream IRC:")-$sludm1745-63;
$sludm = explode('">', substr($sludm1362, $sludm1745, $sludm1244));
$stilius = @str_replace("%dj", $sludm[1], $stilius);
$sludm1745 = strpos($sludm1362, "Current Song:")+53;
$sludm1244 = strpos($sludm1362, "Written by Stephen")-$sludm1745-205;
$stilius = @str_replace("%daina", substr($sludm1362, $sludm1745, $sludm1244), $stilius);
echo $stilius;
}

?>

 

:)

Nuoroda į pranešimą
Dalintis kituose puslapiuose

Prisijunkite prie diskusijos

Jūs galite rašyti dabar, o registruotis vėliau. Jeigu turite paskyrą, prisijunkite dabar, kad rašytumėte iš savo paskyros.

Svečias
Parašykite atsakymą...

×   Įdėta kaip raiškusis tekstas.   Atkurti formatavimą

  Only 75 emoji are allowed.

×   Nuorodos turinys įdėtas automatiškai.   Rodyti kaip įprastą nuorodą

×   Jūsų anksčiau įrašytas turinys buvo atkurtas.   Išvalyti redaktorių

×   You cannot paste images directly. Upload or insert images from URL.

Įkraunama...
  • Dabar naršo   0 narių

    Nei vienas registruotas narys šiuo metu nežiūri šio puslapio.

  • Prisijunk prie bendruomenės dabar!

    Uždarbis.lt nariai domisi verslo, IT ir asmeninio tobulėjimo temomis, kartu sprendžia problemas, dalinasi žiniomis ir idėjomis, sutinka būsimus verslo partnerius ir dalyvauja gyvuose susitikimuose.

    Užsiregistruok dabar ir galėsi:

    ✔️ Dalyvauti diskusijose;

    ✔️ Kurti naujas temas;

    ✔️ Rašyti atsakymus;

    ✔️ Vertinti kitų žmonių pranešimus;

    ✔️ Susisiekti su bet kuriuo nariu asmeniškai;

    ✔️ Naudotis tamsia dizaino versija;

    ir dar daugiau.

    Registracija trunka ~30 sek. ir yra visiškai nemokama.

  • Naujausios temos

  • Karštos temos

×
×
  • Sukurti naują...