$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( '-;2001 Space Odissey;http://www.angelfire.com/rings/cptblack/2001_space_odissey.mid', '-;Aprilimou;http://gm.idohost.com/aprilimou.mid', '-;Azzurro;http://ravioli.hollosite.com/azzurro.mid', '-;Bruttosozialprodukt;http://xmidis.250free.com/bruttosozialprodukt.mid', '-;Chariots of fire;http://www.angelfire.com/rings/cptblack/chariots_of_fire.mid', '-;Dschinghis Khan;http://xmidis.250free.com/dschinghis_khan.mid', '-;Deer hunter;http://www.angelfire.com/rings/cptblack/deer_hunter.mid', '-;El Condor Pasa;http://xmidis.250free.com/elcondorpasa.mid', '-;Few dollars more;http://www.angelfire.com/rings/cptblack/for_a_few_dollars_more.mid', '-;Godfather;http://www.angelfire.com/rings/cptblack/godfather.mid', '-;I have a dream;http://xmidis.250free.com/i_have_a_dream.mid', '-;Imaste dyo;http://gm.idohost.com/imaste_dyo.mid', '-;It`s a heartache;http://xmidis.250free.com/its_a_heartache.mid', '-;Jaws;http://www.angelfire.com/rings/cptblack/jaws.mid', '-;Jesse James;http://www.angelfire.com/rings/cptblack/jesse_james.mid', '-;Jurassic Park;http://www.angelfire.com/rings/cptblack/jurassic_park.mid', '-;La pioggia;http://ravioli.hollosite.com/la_pioggia.mid', '-;Lady d`Arbanville;http://xmidis.250free.com/ladydarbanville.mid', '-;Last of mohicans;http://www.angelfire.com/rings/cptblack/last_of_mohicans.mid', '-;Lemontree;http://xmidis.250free.com/lemontree.mid', '-;Love Story;http://www.angelfire.com/rings/cptblack/love_story.mid', '-;Mamma mia;http://xmidis.250free.com/mamma_mia.mid', '-;Marina;http://ravioli.hollosite.com/marina.mid', '-;Midnight cowboy;http://www.angelfire.com/rings/cptblack/midnight_cowboy.mid', '-;Once upon a time;http://www.angelfire.com/rings/cptblack/once_upon_a_time_in_west.mid', '-;Sacco e Vanzetti;http://www.angelfire.com/rings/cptblack/sacco_and_vanzetti.mid', '-;Sounds of silence;http://xmidis.250free.com/sounds_of_silence.mid', '-;Susanna;http://ravioli.hollosite.com/susanna.mid', '-;Troubled waters;http://xmidis.250free.com/troubledwaters.mid', '-;Yellow river;http://xmidis.250free.com/yellow_river.mid', '-;Varka sto yalo;http://gm.idohost.com/varka_sto_yalo.mid', '-;Vraho-vraho;http://gm.idohost.com/vraho_vraho.mid', '-;Zehn kleine jagermeister;http://xmidis.250free.com/zehn_kleine_jaegermeister.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 'Hitlinks
'; echo ''; GenerateList(); echo '
'; echo '