XYplorer Beta Club

Code: Select all

    $types = "*.flac | *.mp3 | *.ogg";
    $min   = input("Minimum length (in seconds)", , 180, , , 250, 150);
    $max   = input("Maximum length (in seconds)", , 190, , , 250, 150);

    $files = "";
    foreach($file, quicksearch($types, <curpath>), <crlf>) {
        $length = regexmatches(property("#audio.length", $file), "^[0-9:]+");
        $secs   = gettoken($length, -1, ":");
        $mins   = gettoken($length, -2, ":");
        $hours  = gettoken($length, -3, ":");
        $time   = ($hours * 60 * 60) + ($mins * 60) + $secs;
        if ($time <= $max && $time >= $min) { $files = $files . $file . <crlf>; }
    }
    if ($files) { paperfolder("Songs", $files); }