@Echo Off
@A:
:Anfang
CLS
Echo.
Echo.
Echo.
Echo ------------------------------------------------------
Echo ----- D I S K E T T E N R E C Y C L E R
-----
Echo ------------------------------------------------------
Echo by Carsten Wohlgemuth
Echo.
Echo.
Echo Dieses Programm löscht die Disketten in Laufwerk A:
Echo.
Echo Bitte zu löschende Diskette in Laufwerk A: einlegen
Echo.
Echo.
Echo Zum Beenden [STRG] + [C]!
Echo.
Echo http://www.wohlgemuth.com
Echo.
Echo.
Echo Zum Löschen der Diskette,
Pause
CLS
DELTREE /Y a:\
CLS
Echo.
Echo.
Echo.
Echo ------------------------------------------------------
Echo ----- D I S K E T T E N R E C Y C L E R
-----
Echo ------------------------------------------------------
Echo by Carsten Wohlgemuth
Echo.Echo.
Echo Diese Diskette ist leer!
Echo.
Echo.
Echo http://www.wohlgemuth.com
Echo.
Echo.
Echo.
Choice /C:jn /T:j,5 . Noch eine Diskette? Ja oder Nein
@IF ERRORLEVEL 2 GOTO ENDE
GOTO ANFANG
:Ende