<?php

$t = "    ";
$dir = "./clips/";
$l = $_REQUEST["l"];

if (!isset($l))
    $l = "0";
$h = opendir($dir);
while ($file = readdir($h)) {
    $match = substr($file, 0, 1);
    if ($l == "0" && $match > 0 && $match < 10)
        $file_list[] = $file;
    else if ($file != "." && $file != ".." && strcasecmp($match, $l) == 0)
        $file_list[] = $file;
}
closedir($h);

if (!isset($s)) {
    $start = 0;
}
else {
    $start = $s;
}
$end = $start + 25;
$back = $start - 25;
$p2 = sizeof($file_list) / 25;
$letters = "<a href=\"music.php?l=0\">0-9</a> | ";
$letter = array(
                 0 => "A",
                 1 => "B",
                 2 => "C",
                 3 => "D",
                 4 => "E",
                 5 => "F",
                 6 => "G",
                 7 => "H",
                 8 => "I",
                 9 => "J",
                 10 => "K",
                 11 => "L",
                 12 => "M",
                 13 => "N",
                 14 => "O",
                 15 => "P",
                 16 => "Q",
                 17 => "R",
                 18 => "S",
                 19 => "T",
                 20 => "U",
                 21 => "V",
                 22 => "W",
                 23 => "X",
                 24 => "Y",
                 25 => "Z");
$cletter = strtoupper($l);

for ($l=0; $l<26; $l++) {
    $aletter = strtolower($letter[$l]);
    if ($l < 25)
        $letters .= "<a href=\"music.php?l=$aletter\">$letter[$l]</a> | ";
    else
        $letters .= "<a href=\"music.php?l=$aletter\">$letter[$l]</a>";
}

$cletters = strtolower($cletter);
$body = "";

if (sizeof($file_list) > 0) {
    asort($file_list);
    while (list($key, $file) = each($file_list)) {
        $file_namel = $wdir.$file;
        $ext = substr($file_namel, -4);
        $file_namet = str_replace($ext, "", $file_namel);
        $body .= "<a href=\"clips/$file_namel\">$file_namet</a><br>\n";
    }
}
else
    $body .= "None found.\n";

$body .= "<br>";

require_once("header.html");

echo <<<HTML
<table width="100%" border="0">
           <td class="boxTabs" valign="top">
		            <b>Audio Clips - $cletter</b><br>$letters
			<hr size="1" noshade>
            $body
        </td>
		</table>
   
HTML;

require_once("footer.html");

?>