ECHO OFF
CLS
A:
IF EXIST \V\*.* GOTO :PERUSTETTU
ECHO PERUSTAN ASEMASSA A: OLEVASTA LEVYSTŽ VARMUUSKOPIOLEVYN
CD \
MD V
C:
ATTRIB +a *.* /S
ATTRIB -a *.EXE /S
A:
:PERUSTETTU
C:
ECHO Varmuuskopioin ...
:C
XCOPY *.* A:\V\*.* /S /M /V
IF ERRORLEVEL 5 GOTO :5
IF ERRORLEVEL 4 GOTO :4
Echo VARMUUSKOPIOINTI TEHTY. PAINA [ENTER]
GOTO :LOPPU
:5
ECHO PULMA: LEVYKKEELLE KIRJOITTAMINEN EI ONNISTU!
:4
ECHO VAIHDA ASEMAAN UUSI LEVY JA PAINA [ENTER]
PAUSE >NUL
ECHO JATKAN KOPIOINTIA ...
GOTO :C
:LOPPU
PAUSE >NUL