@echo off
cls
echo                  ----------------------------------
echo                  Duke Language Toolkit Version 2.30
echo                  ----------------------------------
if b%2 == ba: goto doit
if b%2 == bb: goto doit
if b%2 == bc: goto doit
if b%2 == bd: goto doit
if b%2 == be: goto doit
if b%2 == bf: goto doit
:dont
cls
echo                  ----------------------------------
echo                  Duke Language Toolkit Installation:
echo                  ----------------------------------
echo Place Duke Language Toolkit Disk 1 in drive
echo Type "install X: Y:"      to install the DLT from drive X: to drive Y:
echo Type "install X: Y: /s"   to install DLT source code from drive X: to drive Y:
echo Type "install X: Y: /pcw" to install PC-write from drive X: to drive Y:
echo                  ----------------------------------
echo Where X: is the drive you are installing FROM
echo   and Y: is the drive you are installing TO
echo                  ----------------------------------
echo NOTE: Installation is to the *CURRENT* directory.  Make sure that the
echo       current directory in the drive you are installing *to* is where 
echo       you want the installed files to be written to!
echo       E.g., mkdir \toolkit     chdir \toolkit
echo       .
goto end
:doit
if b%1 == b%2 goto dont
if b%1 == ba: goto doit2
if b%1 == bb: goto doit2
if b%1 == bc: goto doit2
goto dont
:doit2
if b%3==b/s goto source
if b%3==b/pcw goto pcw
%2
if not errorlevel 0 goto :errordir
%1one
if NOT EXIST loadfont.exe goto error
echo If installing on diskettes, insert second disk on drive %2
echo for font and printer files
pause 
%1two
if NOT EXIST read.me goto error
goto done
:pcw
echo If installing on diskettes, insert a blank formated disk on drive %2
echo Insert Duke Language Toolkit Disk 2 in drive %1
pause
%2
%1pcw
if NOT EXIST ed.exe goto error
goto done
:source
echo If installing on diskettes, insert a blank formatted disk on drive %2
echo Insert Duke Language Toolkit Disk 2 in drive %1
pause
%2
%1source
if NOT EXIST lf.mac goto error
goto done
:errordir
echo Problem with destination - No such disk or directory.
:error
echo INSTALLATION ERROR. Restart process from the beginning.
goto end
:done
echo Installation complete
:end