<?php

# soodattu 22.1.2006

# vaihda oma käyttäjätunnuksesi tähän rimpsuun
$urlz = "http://ws.audioscrobbler.com/1.0/user/Entropia/recenttracks.txt";

# 190x350 on soppeli irc-gallerian ihkuboksiin
$leveys = "190";
$korkeus = "350";

# luodaan kuvaresurssi ja määritellään värit
$kuva = imagecreate($leveys, $korkeus);
$valkoinen = imagecolorallocate($kuva, 255, 255, 255);
$musta = imagecolorallocate($kuva, 0, 0, 0);
$punainen = imagecolorallocate($kuva, 255, 0, 0);

# haetaan biisitiedot audioscrobblerin serveriltä
$biisit = file($urlz);

# määritellään muutama muuttuja aloitusarvoihin
$korkeus = 20;
$title2 = "";

# tuupataan kuvaan tekstiä
imagestring($kuva, 2, 5, 2, "10 viimeksi soittamaani biisiä", $punainen);

# käydään läpi biisilista
foreach($biisit as $biisi) {
  # otetaan alusta turha tieto pois
  $biisi = trim(substr($biisi, 11));

  # erotellaan artisti ja biisin nimi
  list($artisti, $title) = explode(" - ", $biisi);

  # jos biisin nimi on liian pitkä niin heitetään kahdelle riville
  if(strlen($title) > 28) { $title2 = substr($title, 28); $title = substr($title, 0, 28);

  # kirjoitetaan tiedot kuvaresurssiin
  imagestring($kuva, 2, 10, $korkeus + 20, $title2, $musta); }
  imagestring($kuva, 3, 5, $korkeus, $artisti, $musta);
  imagestring($kuva, 2, 10, $korkeus + 10, $title, $musta);

  # korotetaan korkeus-muuttujaa että seuraava tieto tulee oikeaan kohtaan
  $korkeus = $korkeus + 28;

  # jos käytettiin toista riviä niin lisätään lisää korkeutta ja nollataan muuttujat
  if($title2 <> "") { $korkeus = $korkeus + 10; $title2 = ""; }
}

# kerrotaan selaimelle että nyt on png-kuvaa tulossa...
header("Content-type: image/png");

# ... ja lähetetään valmis kuva
imagepng($kuva);

# all done. yay. greetings to äiti

?>