space %1: 18944 noIntro
godir %1:%4 cantcreate
echo instalar la intro. >dointro
goto Continue

:noIntro
space %1: 13312 nospace
clear
echo Si quieres ver la presentaci˘n inicial, es necesario
echo un espacio de disco duro en la unidad %1: de 20,2 
echo Megabytes. No obstante, tienes bastante espacio para 
echo instalar s˘lo el juego.
echo ¨Contin£o instalando Kings Quest VI? (S/N)
pick sn Continue Quit

:Continue
godir %1:%4 cantcreate

if exist resource.000 del resource.000

echo echo off >..\kq6.bat
echo cd %4    >>..\kq6.bat
echo kq6      >>..\kq6.bat

copy %2:*.drv
copy %2:*.map
copy %2:install.*
copy %2:interp.err
copy %2:kq6.bat
copy %2:readme.*
copy %2:resource.msg
copy %2:sierra.exe
copy %2:sync.exe
copy %2:version
copy %2:walkthru.*

echo %3>resource.cfg

if exist %2:patches\*.* copy %2:patches\*.*

if not exist dointro goto doGame
exists %2:intro.b01 Por favor inserta el "Disco 1" en unidad %2.
copy seq.exe + %2:intro.b01
exists %2:intro.b02 Por favor inserta el "Disco 2" en unidad %2.
copy seq.exe + %2:intro.b02
exists %2:intro.b03 Por favor inserta el "Disco 3" en unidad %2.
copy seq.exe + %2:intro.b03

:doGame
del dointro
exists %2:resource.d01 Por favor inserta el "Disco 4" en unidad %2.
copy resource.000 + %2:resource.d01
exists %2:resource.d02 Por favor inserta el "Disco 5" en unidad %2.
copy resource.000 + %2:resource.d02
exists %2:resource.d03 Por favor inserta el "Disco 6" en unidad %2.
copy resource.000 + %2:resource.d03
exists %2:resource.d04 Por favor inserta el "Disco 7" en unidad %2.
copy resource.000 + %2:resource.d04
exists %2:resource.d05 Por favor inserta el "Disco 8" en unidad %2.
copy resource.000 + %2:resource.d05
exists %2:resource.d06 Por favor inserta el "Disco 9" en unidad %2.
copy resource.000 + %2:resource.d06
exists %2:resource.sfx Por favor inserta el "Disco 10" en unidad %2.
copy %2:resource.sfx

cls
echo
echo ˙Para jugar Kings Quest VI:
echo ˙   Desde el directorio de %1:%4,
echo ˙   Teclea KQ6 y pulsa [ENTER].
echo
pause
end
:cantcreate
echo Incapaz de crear directorio %1:%4
end
:nospace
cls
echo
echo No hay suficiente espacio en %1: para instalar.
echo Son necesarios 13,2 Megabytes de espacio en disco. 
pause

:Quit
end
