@echo off
echo. 
echo clnvid.bat for BattleTech
echo.
set v0=
if "%1"=="" goto Usage
if "%1"=="-h" goto Usage
if "%1"=="-H" goto Usage
if "%1"=="-a" set v0=a
if "%1"=="-A" set v0=a
if "%1"=="-u" set v0=u
if "%1"=="-U" set v0=u
if not "%v0%"=="" goto Prompt
:Usage
echo.
echo usage:  clnvid.bat  option
echo.
echo                      '-a' - delete obsolete files without prompt
echo                      '-u' - prompt for go-ahead before deleting
echo                      '-h' - display help (this message)
echo.
goto End
:Prompt
if "%v0%"=="a" goto Start
echo If you continue, obsolete video files will be deleted.
pause
echo.
:Start
echo Deleting obsolete video files...
rem
call delete.bat %v0% .\video\mat\btarena.bmf
call delete.bat %v0% .\video\mat\btfx.bmf
call delete.bat %v0% .\video\mat\btpolar.bmf
call delete.bat %v0% .\video\mat\btveh.bmf
call delete.bat %v0% .\video\geo\night\btfx.bmf
rem
call delete.bat %v0% .\video\geo\blh_tshd.bgf
call delete.bat %v0% .\video\geo\lok_tshd.bgf
call delete.bat %v0% .\video\geo\mad_tshd.bgf
call delete.bat %v0% .\video\geo\own_tshd.bgf
call delete.bat %v0% .\video\geo\thr_tshd.bgf
call delete.bat %v0% .\video\geo\vul_tshd.bgf
call delete.bat %v0% .\video\spot.bgf
call delete.bat %v0% .\video\ppc.bgf
rem
echo done.
goto End
:End
set v0=