:askIt
testdir %1:\sierra\sq4
echo.
echo ¨Quieres instalar la versi¢n (P)eque¤a, (C)ompleta,
echo (A)yuda, o (S)alida:?
pick pcas small large help exit2

:help
clear
echo
echo
echo Debes instalar de una de estas formas:
echo
echo La instalaci¢n PEQUE¥A s¢lo instalar  el disco STARTUP
echo en tu disco duro. Debes jugar desde floppys.
echo Espacio aproximado necesitado en disco duro:  720K
echo La instalaci¢n COMPLETA instalar  todos los ficheros en tu
echo disco duro. El juego entero ser  jugado desde el disco
echo duro.
echo Espacio aproximado necesitado en disco duro:  7.0 Meg
echo
goto askIt

:small
rem	Create the drivers subdirectory and copy the drivers.
godir %1:\sierra\sq4	CantCreate

rem	Copy over the necessary files.
copy %2:ibmkbd.drv
copy %2:joystick.drv
copy %2:vga320.drv
copy %2:vga320bw.drv
copy %2:tandykbd.drv
copy %2:tandy3v.drv
copy %2:tandy3vd.drv
copy %2:mt32.drv
copy %2:std.drv
copy %2:sndblast.drv
copy %2:mtblast6.drv
copy %2:ibmps1.drv
copy %2:adl.drv
copy %2:cms.drv
copy %2:sq4.bat
copy %2:sq42.bat ..\sq4.bat
copy %2:sq43.bat \sq4.bat
copy %2:version
copy %2:sierra.exe
copy %2:interp.txt
copy %2:resource.000 
copy %2:resource.map 
copy %2:???.scr
copy %2:???.tex
copy %2:*.snd
copy %2:readme

echo %3>resource.cfg

copy %2:install.exe
copy %2:install.hlp
copy %2:install.txt

goto exit

:large
rem	Check to see that there is enough space for the installation.
space %1: 7000	NoSpace

rem	Create the drivers subdirectory and copy the drivers.
godir %1:\sierra\sq4	CantCreate

rem	Copy over the necessary files.
copy %2:ibmkbd.drv
copy %2:joystick.drv
copy %2:vga320.drv
copy %2:vga320bw.drv
copy %2:mt32.drv
copy %2:tandykbd.drv
copy %2:tandy3v.drv
copy %2:tandy3vd.drv
copy %2:std.drv
copy %2:sndblast.drv
copy %2:mtblast6.drv
copy %2:ibmps1.drv
copy %2:adl.drv
copy %2:cms.drv

copy %2:install.hlp
copy %2:install.exe
copy %2:install.txt

copy %2:sq44.bat sq4.bat
copy %2:sq45.bat ..\sq4.bat
copy %2:sq46.bat \sq4.bat
copy %2:version
copy %2:sierra.exe
copy %2:interp.txt
copy %2:resource.000 
copy %2:resource.map 
copy %2:???.scr
copy %2:???.tex
copy %2:*.snd
copy %2:readme

echo %3>resource.cfg

rem	Prompt for each disk of the game in succession and copy
rem	everything over from it.

echo Copiando ficheros del juego...

exists %2:resource.001 Por favor inserta el "Disco 1" en la unidad %2.
copy %2:resource.001

exists %2:resource.002 Por favor inserta el "Disco 2" en la unidad %2.
copy %2:resource.002

exists %2:resource.003 Por favor inserta el "Disco 3" en la unidad %2.
copy %2:resource.003

exists %2:resource.004 Por favor inserta el "Disco 4" en la unidad %2.
copy %2:resource.004

exists %2:resource.005 Por favor inserta el "Disco 5" en la unidad %2.
copy %2:resource.005

exists %2:resource.006 Por favor inserta el "Disco 6" en la unidad %2.
copy %2:resource.006

goto exit

:NoSpace
echo
echo "­No hay suficiente espacio en %1 para instalar Space Quest IV!"
echo "7.0 megabytes de espacio en disco son necesarios."
:warnspace
echo
echo ¨Quieres instalar la versi¢n (P)eque¤a, (A)yuda,
echo o (S)alida:?
pick pas small help2 Exit2

:help2
clear
echo
echo La instalaci¢n PEQUE¥A s¢lo instalar  el disco STARTUP
echo en tu disco duro. Debes jugar desde floppys.
echo Recomendamos esta instalaci¢n porque no tienes
echo espacio suficiente en tu disco duro.
goto warnspace

:CantCreate
echo "Incapaz de crear directorio %1\sierra\sq4"
pause
end

:exit
echo
echo  Para jugar AHORA:
echo    Teclea SQ4 [ENTER].
echo
echo  Para jugar DESPUES:
echo    Desde tu directorio ra¡z, teclea SQ4 y pulsa [ENTER].
echo
pause

:Exit2
end
