echo off
if x%1==x set drive=c:
if x%2==x set direct=wcs
if not x%1==x set drive=%1
if not x%2==x set direct=%2
drive
if errorlevel 0 if not errorlevel 1 set cddrive=a
if errorlevel 1 if not errorlevel 2 set cddrive=b
if errorlevel 2 if not errorlevel 3 set cddrive=c
if errorlevel 3 if not errorlevel 4 set cddrive=d
if errorlevel 4 if not errorlevel 5 set cddrive=e
if errorlevel 5 if not errorlevel 6 set cddrive=f
if errorlevel 6 if not errorlevel 7 set cddrive=g
if errorlevel 7 if not errorlevel 8 set cddrive=h
if errorlevel 8 if not errorlevel 9 set cddrive=i
if errorlevel 9 if not errorlevel 10 set cddrive=j
if errorlevel 10 if not errorlevel 11 set cddrive=k
if errorlevel 11 if not errorlevel 12 set cddrive=l
if errorlevel 12 if not errorlevel 13 set cddrive=m
if errorlevel 13 if not errorlevel 14 set cddrive=n
if errorlevel 14 if not errorlevel 15 set cddrive=o
if errorlevel 15 if not errorlevel 16 set cddrive=p
if errorlevel 16 if not errorlevel 17 set cddrive=q
if errorlevel 17 if not errorlevel 18 set cddrive=r
if errorlevel 18 if not errorlevel 19 set cddrive=s
if errorlevel 19 if not errorlevel 20 set cddrive=t
if errorlevel 20 if not errorlevel 21 set cddrive=u
if errorlevel 21 if not errorlevel 22 set cddrive=v
if errorlevel 22 if not errorlevel 23 set cddrive=w
if errorlevel 23 if not errorlevel 24 set cddrive=x
if errorlevel 24 if not errorlevel 25 set cddrive=y
if errorlevel 25 if not errorlevel 26 set cddrive=z
echo.
ask OK to copy files to directory %drive%\%direct% ? (Y/N)  
if errorlevel 1 goto avslutt
goto ny
:avslutt
echo.
echo Call COPY_WC again with parameters drive: directory
echo Example:   COPY_WC d: icame
echo.
cd \
goto slutt
:ny
echo.
echo Creating directory, copying files ...
echo.
mkdir %drive%\%direct%
copy *.* %drive%\%direct%
copy .\bookmenu\mf.%cddrive% %drive%\%direct%\menu.fil
copy .\bookmenu\mx.%cddrive% %drive%\%direct%\menu.xrf
changex .\bookmenu\bookten.btx %drive%\%direct%\bookten.btx J: %cddrive%:
copy .\bookmenu\bookshlf.btx %drive%\%direct%\bookshlf.btx
echo.
%drive%
cd \%direct%
call newmenu.bat
:slutt2
echo.
echo To start WordCruncher: goto %drive%\%direct% and write ICAMECD
echo.
:slutt