.K ""
echo "Dieses Script und zugehörige Tools sind © RHEIN-MAIN-SOFT 1994"
echo "Die Nutzung dieser durch andere Personen ist untersagt !"
echo ""
echo "Dieses Skript entpackt die Dateien des gewählten LhA-Archives"
echo "per Dateiauswahlfenster in ein beliebiges Verzeichnis. Sollte"
echo "das Zielverzeichnis eine Diskette sein, so formatieren Sie"
echo "diese bitte zuvor."

echo ""

ask "Möchten Sie nun mit dem Entpacken beginnen (Y/N) ?"
if not warn
        echo "Versuchen Sie es noch einmal, wenn Sie soweit sind..."
        echo "Klicke das Schließ-Gadget an, um das Fenster zu schließen."
        endcli
endif

echo "Entpacke die Dateien des Archives..."
:c/RequestFile SYS: TITLE "Wähle Zielverzeichnis..." POSITIVE "Weiter" NEGATIVE "Abbruch" DRAWERSONLY NOICONS  >env:dest

if not exists $dest
    echo "Entpack-Vorgang abgebrochen..."
else
    :c/RMSlx x azap_v240.lha $dest
    unsetenv dest
endif

echo ""
echo "Fertig."
echo "Klicken Sie das Schließ-Gadget an, um das Fenster zu schließen."
endcli
;dieses Script ist © RMS 1994