@echo off
set nf=0
Echo **********************************************
Echo *                                            *
Echo * Pack new .BMS files to DFBase.PFF.         *
Echo * This batch file and the .BMS files need to *
Echo * be in the Delta Force program directory    *
Echo *                                            *
Echo **********************************************
Echo.
Echo.

if exist pack.exe goto :DFBASE
set nf=1
Echo ********************************
Echo ********************************
Echo **                            **
Echo **                            **
Echo **     PACK.EXE not found     **
Echo **                            **
Echo **                            **
Echo ********************************
Echo ********************************
Echo.
Echo.



:DFBASE
if exist dfbase.pff goto :START
set nf=1
Echo ********************************
Echo ********************************
Echo **                            **
Echo **                            **
Echo **    DFBase.PFF not found    **
Echo **                            **
Echo **                            **
Echo ********************************
Echo ********************************
Echo.
Echo.


:START
if "%nf%"=="1" goto :END


REM if exist C08TEST.BMS  pack.exe dfbase.pff C08TEST.bms
REM if exist C08WORK.BMS  pack.exe dfbase.pff C08WORK.bms

Choice Pack ALL files downloaded from this site?
if errorlevel=2 goto :INDIVIDUAL


if exist C08AirB.bms  pack.exe dfbase.pff C08AirB.bms
if exist C08Air2.bms  pack.exe dfbase.pff C08Air2.bms
if exist C08Air2N.bms pack.exe dfbase.pff C08Air2N.bms
if exist C08Air2F.bms pack.exe dfbase.pff C08Air2F.bms
if exist C08Camp1.bms pack.exe dfbase.pff C08Camp1.bms
if exist C08BigM.bms  pack.exe dfbase.pff C08BigM.bms
if exist C08BigMN.bms pack.exe dfbase.pff C08BigMN.bms
if exist C08Comp.bms  pack.exe dfbase.pff C08Comp.bms
if exist C08DXRds.bms pack.exe dfbase.pff C08DXRds.bms
if exist C08Enc.bms   pack.exe dfbase.pff C08Enc.bms
if exist C08GHill.bms pack.exe dfbase.pff C08GHill.bms
if exist C08GSky1.bms pack.exe dfbase.pff C08GSky1.bms
if exist C08GSky2.bms pack.exe dfbase.pff C08GSky2.bms
if exist C08GSky3.bms pack.exe dfbase.pff C08GSky3.bms
if exist C08HiCl1.bms pack.exe dfbase.pff C08HiCl1.bms
if exist C08HiCl2.bms pack.exe dfbase.pff C08HiCl2.bms
if exist C08HiCl3.bms pack.exe dfbase.pff C08HiCl3.bms
if exist C08Hous1.bms pack.exe dfbase.pff C08Hous1.bms
if exist C08Hous2.bms pack.exe dfbase.pff C08Hous2.bms
if exist C08Hous3.bms pack.exe dfbase.pff C08Hous3.bms
if exist C08HousF.bms pack.exe dfbase.pff C08HousF.bms
if exist C08Nite1.bms pack.exe dfbase.pff C08Nite1.bms
if exist C08Nite2.bms pack.exe dfbase.pff C08Nite2.bms
if exist C08Nite3.bms pack.exe dfbase.pff C08Nite3.bms
if exist C08NPlat.bms pack.exe dfbase.pff C08NPlat.bms
if exist C08PDrop.bms pack.exe dfbase.pff C08PDrop.bms
if exist C08Pink.bms  pack.exe dfbase.pff C08Pink.bms
if exist C08Power.bms pack.exe dfbase.pff C08Power.bms
if exist C08REst1.bms pack.exe dfbase.pff C08REst1.bms
if exist C08Rest2.bms pack.exe dfbase.pff C08REst2.bms
if exist C08REst3.bms pack.exe dfbase.pff C08REst3.bms
if exist C08REstF.bms pack.exe dfbase.pff C08REstF.bms
if exist C08Rat.bms   pack.exe dfbase.pff C08Rat.bms
if exist C08Tow1.bms  pack.exe dfbase.pff C08Tow1.bms
if exist C08Tow1N.bms pack.exe dfbase.pff C08VTow1N.bms
if exist C08Vill1.bms pack.exe dfbase.pff C08Vill1.bms
if exist C08Volc.bms  pack.exe dfbase.pff C08Volc.bms
if exist C08Wood.bms  pack.exe dfbase.pff C08Wood.bms

goto :RUNDF


:INDIVIDUAL
echo.
Echo Very well, as you wish....
echo.

:AB
if not exist C08AirB.bms  goto :A2
Choice Pack Air Base?
if errorlevel=2 goto :C1
pack.exe dfbase.pff C08AirB.bms
echo.

:A2
if not exist C08Air2.bms  goto :A2N
Choice Pack Air Base No. 2?
if errorlevel=2 goto :A2N
pack.exe dfbase.pff C08Air2.bms
echo.

:A2N
if not exist C08Air2N.bms  goto :A2F
Choice Pack Air Base No. 2 Night?
if errorlevel=2 goto :A2F
pack.exe dfbase.pff C08Air2N.bms
echo.

:A2F
if not exist C08Air2F.bms  goto :AH1
Choice Pack Air Base No. 2 Capture the Flag?
if errorlevel=2 goto :AH1
pack.exe dfbase.pff C08Air2F.bms
echo.

:AH1
if not exist C08Hous1.bms goto :AH2
Choice Pack Arond the Houses 1?
if errorlevel=2 goto :AH2
packe.exe dfbase.pff C08Hous1.bms
echo.

:AH2
if not exist C08Hous1.bms goto :AH3
Choice Pack Arond the Houses 2?
if errorlevel=2 goto :AH3
packe.exe dfbase.pff C08Hous2.bms
echo.

:AH3
if not exist C08Hous1.bms goto :AHf
Choice Pack Arond the Houses 3?
if errorlevel=2 goto :AHf
packe.exe dfbase.pff C08Hous3.bms
echo.

:AHf
if not exist C08Hous1.bms goto :BM
Choice Pack Arond the Houses CTF?
if errorlevel=2 goto :BM
packe.exe dfbase.pff C08HousF.bms
echo.

:BM
if not exist C08BigM.bms  goto :BMn
Choice Big Map?
if errorlevel=2 goto :BMn
pack.exe dfbase.pff C08BigM.bms
echo.

:BMn
if not exist C08BigMN.bms  goto :C1
Choice Pack Big Map Noght?
if errorlevel=2 goto :C1
pack.exe dfbase.pff C08BigMN.bms
echo.

:C1
if not exist C08Camp1.bms goto :CO
Choice Pack Camp Mo.1?
if errorlevel=2 goto :CO
pack.exe dfbase.pff C08Camp1.bms
echo.

:CO
if not exist C08Comp.bms goto :DX
Choice Pack Compund?
if errorlevel=2 goto :DX
pack.exe dfbase.pff C08Comp.bms
echo.

:DX
if not exist C08DXRds.bms goto :EN
Choice Pack Desert Cross Roads?
if errorlevel=2 goto :EN
pack.exe dfbase.pff C08DXRds.bms
echo.

:EN
if not exist C08Enc.bms goto :GH
Choice Pack Enclosure?
if errorlevel=2 goto :GH
pack.exe dfbase.pff C08Enc.bms
echo.

:GH
if not exist C08GHill.bms goto :GS
Choice Pack Green Hill?
if errorlevel=2 goto :GS
packe.exe dfbase.pff C08GHill.bms
echo.


:GS
if not exist C08GSky1.bms goto :GS2
Choice Pack Grey Skies 1?
if errorlevel=2 goto :GS2
pack.exe dfbase.pff C08GSky1.bms
echo.

:GS2
if not exist C08GSky2.bms goto :GS3
Choice Pack Grey Skies 2?
if errorlevel=2 goto :GS3
pack.exe dfbase.pff C08GSky2.bms
echo.

:GS3
if not exist C08GSky3.bms goto :HC
Choice Pack Grey Skies 3?
if errorlevel=2 goto :NF
pack.exe dfbase.pff C08GSky3.bms
echo.

:HC
if not exist C08HiCl1.bms goto :HC2
Choice Pack Highland Clearance 1?
if errorlevel=2 goto :GS2
pack.exe dfbase.pff C08HiCl1.bms
echo.

:HC2
if not exist C08HiCl2.bms goto :HC3
Choice Pack Highland Clearance 2?
if errorlevel=2 goto :GS3
pack.exe dfbase.pff C08HiCl2.bms
echo.

:HC3
if not exist C08HiCl3.bms goto :NF
Choice Pack Highland Clearance 3?
if errorlevel=2 goto :NF
pack.exe dfbase.pff C08HiCl3.bms
echo.

:NF
if not exist C08Nite1.bms goto :NF2
Choice Pack Night Fight 1?
if errorlevel=2 goto :NF2
pack.exe dfbase.pff C08Nite1.bms
echo.

:NF2
if not exist C08Nite2.bms goto :NF2
Choice Pack Night Fight 2?
if errorlevel=2 goto :NF3
pack.exe dfbase.pff C08Nite2.bms
echo.

:NF3
if not exist C08Nite3.bms goto :NP
Choice Pack Night Fight 3?
if errorlevel=2 goto :NP
pack.exe dfbase.pff C08Nite3.bms
echo.

:NP
if not exist C08NPlat.bms goto :PD
Choice Pack Night Plateau?
if errorlevel=2 goto :PD
pack.exe dfbase.pff C08NPlat.bms
echo.

:PD
if not exist C08PDrop.bms goto :PP
Choice Pack Para Drop?
if errorlevel=2 goto :PP
pack.exe dfbase.pff C08PDrop.bms
echo.

:PP
if not exist C08Pink.bms goto :PS
Choice Pack Pretty in Pink?
if errorlevel=2 goto :PS
pack.exe dfbase.pff C08Pink.bms
echo.

:PS
if not exist C08Power.bms goto :RE
Choice Pack Power Station?
if errorlevel=2 goto :RE
pack.exe dfbase.pff C08Power.bms
echo.

:RE
if not exist C08REst1.bms goto :RE2 
Choice Pack River Estate 1?
if errorlevel=2 goto :RE2
pack.exe dfbase.pff C08REst1.bms
echo.

:RE2
if not exist C08Rest2.bms goto :RE3
Choice Pack River Estate 2?
if errorlevel=2 goto :RE3
pack.exe dfbase.pff C08REst2.bms
echo.

:RE3
if not exist C08REst3.bms goto :REF
Choice Pack River Estate 3?
if errorlevel=2 goto :REF
pack.exe dfbase.pff C08REst3.bms
echo.

:REF
if not exist C08REstF.bms goto :RR
Choice Pack River Estate F?
if errorlevel=2 goto :RR
pack.exe dfbase.pff C08REstF.bms
echo.

:RR
if not exist C08Rat.bms   goto :T1
Choice Pack Rat Run?
if errorlevel=2 goto :T1
pack.exe dfbase.pff C08Rat.bms
echo.

:T1
if not exist C08Tow1.bms   goto :T1N
Choice Pack Town No. 1?
if errorlevel=2 goto :T1N
pack.exe dfbase.pff C08Tow1.bms
echo.

:T1N
if not exist C08Tow1N.bms   goto :V1
Choice Pack Town No. 1 Night?
if errorlevel=2 goto :V1
pack.exe dfbase.pff C08Tow1N.bms
echo.

:V1
if not exist C08Vill1.bms goto :VC
Choice Pack Village No. 1?
if errorlevel=2 goto :VC
pack.exe dfbase.pff C08Vill1.bms
echo.

:VC
if not exist C08Volc.bms  goto :WL
Choice Pack Volcano's Crater?
if errorlevel=2 goto :WL
pack.exe dfbase.pff C08Volc.bms
echo.

:WL
if not exist C08Wood.bms  goto :XX
Choice Pack Woodland?
if errorlevel=2 goto :XX
pack.exe dfbase.pff C08Wood.bms
echo.

:XX
echo.
goto :RUNDF

:RUNDF
if not exist DF.EXE goto :END
Echo.
Echo.
Choice Run Delta Force?
if errorlevel=2 goto :END
"DF.EXE "

:END
Echo.
Echo.
Echo FINISHED