godir %1:%4 cantcreate
echo Do you wish to install (L)arge, or (S)mall?
pick ls large small

:large
space %1: 16000 nospace
echo Copying files to %1:%4 ...
echo echo off >..\kq6cd.bat
echo cd %4 >>..\kq6cd.bat
echo sierra >>..\kq6cd.bat
echo cd .. >>..\kq6cd.bat
echo echo off > kq6cd.bat
echo sierra >> kq6cd.bat
echo %3>resource.cfg
echo audio=%2:>>resource.cfg
echo sync=%2:>>resource.cfg
echo movieDir=%2:\seq>>resource.cfg
echo patchDir=%2:>>resource.cfg
copy %2:install.exe %1:
copy %2:install.hlp %1:
copy %2:install.ini %1:
copy %2:install.ins %1:
copy %2:install.scr %1:
copy %2:install.txt %1:
copy %2:interp.err %1:
copy %2:interp.txt %1:
copy %2:kq6cd %1:
copy %2:*.drv %1:
copy %2:message.map %1:
copy %2:mmaware.dll %1:
copy %2:proglib.dll %1:
copy %2:readme %1:
copy %2:resource.000 %1:
copy %2:resource.map %1:
copy %2:resource.msg %1:
copy %2:resource.sfx %1:
copy %2:scidll.dll %1:
copy %2:sierra.exe %1:
goto done

:small
echo Copying files to %1:%4 ...
echo echo off >..\kq6cd.bat
echo cd %4 >>..\kq6cd.bat
echo %2: >>..\kq6cd.bat
echo sierra %1:resource.cfg >>..\kq6cd.bat
echo %1: >>..\kq6cd.bat
echo cd .. >>..\kq6cd.bat
echo echo off > kq6cd.bat
echo %2: >> kq6cd.bat
echo sierra %1:resource.cfg >> kq6cd.bat
echo %1: >> kq6cd.bat
echo %3>resource.cfg
echo movieDir=%2:\seq;.\>>resource.cfg
echo
goto done

:done
cd ..
cls
echo
echo ˙To play Kings Quest VI now:
echo ˙   Type KQ6CD [ENTER].
echo
echo ˙To play Kings Quest VI later:
echo ˙   From the directory of %1:%4,
echo ˙   Type KQ6CD and press [ENTER].
echo
pause
goto quit

:cantcreate
alert Unable to create directory %1:%4
pause
goto quit

:nospace
cls
echo
echo There is not enough space on %1: to install. 
echo 16 megabytes of disk space are necessary.
pause
goto quit

:quit
end
