$t0 = time(); $t1 = $t0 + 3600; Header("Expires: " . + gmdate("D, d M Y H:i:s", $t1) . " GMT"); $WMLOUTPUT = preg_match("/vnd.wap.wml/i", getenv("HTTP_ACCEPT")); $MIDILIST = array( "-;1812 - Overture;1812_overture.mid", "-;Beethoven Symph. 5;beethoven_sym5.mid", "-;Bolero;bolero.mid", "-;Für Elise;fur_elise.mid", "-;Habanera;habanera.mid", "-;Hungarian dance;hungarian_dance.mid", "-;La Donna e mobile;la_donna_e_mobile.mid", "-;Mozart Symph. 40;mozart_sym40.mid", "-;Ode an die Freude;ode_an_die_freude.mid", "-;Sabre dance;sabre_dance.mid", "-;Toccata and fuga;toccata_and_fuga.mid" ); function GenerateList() { global $WMLOUTPUT; global $MIDILIST; foreach ($MIDILIST as $w) { list($s, $caption, $url) = explode(";",$w); $s = trim($s); $caption = trim($caption); $url = trim($url); if ($WMLOUTPUT) { echo "
$s $caption
"; } else { echo "$s $captionCategory:
'; echo 'Classical melodies
'; echo ''; GenerateList(); echo '
'; echo '