@echo off
rem bk.btm  do a backup to G:  2009-05-16
set date=%_date
rem presume system date configured as yyyy-MM-dd

echo There should be a blank DVD in place.
pause

loadmedia V:
rem format with UDF 2.5
format V: /FS:UDF /R:2.50 /V:%date
if errorlevel 1 pause format failed

call E:\env\qbk.btm

REM copy to DVD gets confused if descript.ion is not hidden
attrib /s +h G:\bks\DESCRIPT.ION
attrib /s +h G:\dl\DESCRIPT.ION

rem back up to DVD:
copy /s G:\bks\*.* V:\bks\
if errorlevel 1 pause fail to copy bks

copy /s G:\dl\*.* V:\dl\
if errorlevel 1 pause fail to copy dl

rem ejectmedia does not work reliably

EJECTMEDIA V:
fsutil behavior set disablelastaccess 0

rem defrag disks
call oo.btm

rem again, in case previous ones did not work.  This likely won't work either.
EJECTMEDIA V:

rem -30-