@echo off
rem Tato davka slouzi k doinstalovani vybranych baliku CSTeXu
rem Parametry %1 a %2  =  odkud a kam  (jako pro davku Install.bat)
rem dalsi parametry:  seznam instalovanych baliku

if '%3'==''  goto help

set FROM=%1
set DEST=%2
shift
shift

:loop
if exist %FROM%\%1.zip goto unzip

echo 
echo ************* Vlozte do mechaniky %FROM% disketu se souborem  %1.zip
echo a pak zmacknete cokoli.
echo Nainstaluji se tyto ZIPy:  %1 %2 %3 %4 %5 %6 %7 %8 %9
echo Pokud chcete instalaci ukoncit, zmacknete Control-C.
pause > nul

if not exist %FROM%\%1.zip echo V MECHANICE JE ZREJME NESPRAVNA DISKETA !
if not exist %FROM%\%1.zip goto loop

:unzip

unzip %FROM%\%1 -d %DEST%\
shift
if '%1'==''  goto end
goto loop


:help
echo  Doplneni instalace CSTeXu o jednotlive baliky (zipy).
echo  Parametry:
echo    1.   = odkud se instaluje (mechanika nebo adresar)
echo    2.   = kam se instaluje (tj. kde je umisten adresar  emtex )
echo    3... = seznam baliku, ktere se maji instalovat.
echo  Priklad:
echo    i-add  a: c: csindex pkedit texcad texware
echo  Pokud nektery balik neni v adresari podle prveho parametru,
echo  davka vyzve k vlozeni diskety.

:end