@rem argument %1 is the destination drive letter

@set o_path=%path%
@set path=%1:\os2;%1:\os2\install;%path%

@if "%1"=="" goto usage
@echo - Cirrus Logic SVGA installation for OS/2 2.1...

@rem ---------------------------------------------------------------------
@echo - saving original files . . .

@if exist %1:\os2\screen01._cl           goto sav1
@if exist %1:\os2\screen01.sys copy %1:\os2\screen01.sys %1:\os2\screen01._cl >nul

:sav1
@if exist %1:\os2\screen02._cl           goto sav2
@if exist %1:\os2\screen02.sys copy %1:\os2\screen02.sys %1:\os2\screen02._cl >nul

:sav2
@if exist %1:\os2\svga._cl               goto sav3
@if exist %1:\os2\svga.exe copy %1:\os2\svga.exe %1:\os2\svga._cl >nul

:sav3
@if exist %1:\os2\dll\bvhsvga._cl        goto sav4
@if exist %1:\os2\dll\bvhsvga.dll copy %1:\os2\dll\bvhsvga.dll %1:\os2\dll\bvhsvga._cl >nul

:sav4
@if exist %1:\os2\dll\ibmdev32._cl       goto sav5
@if exist %1:\os2\dll\ibmdev32.dll copy %1:\os2\dll\ibmdev32.dll %1:\os2\dll\ibmdev32._cl >nul

:sav5
@if exist %1:\os2\dll\ibmvga32._cl       goto sav6
@if exist %1:\os2\dll\ibmvga32.dll copy %1:\os2\dll\ibmvga32.dll %1:\os2\dll\ibmvga32._cl >nul

:sav6
@if exist %1:\os2\mdos\vsvga._cl         goto sav7
@if exist %1:\os2\mdos\vsvga.sys copy %1:\os2\mdos\vsvga.sys %1:\os2\mdos\vsvga._cl >nul

:sav7
@rem ---------------------------------------------------------------------
@echo - installing drivers . . .

@attrib -r %1:\os2\screen0?.sys 
@if exist %1:\os2\screen01.sys unpack screen01.sy_ %1: >nul
@if exist %1:\os2\screen02.sys unpack screen02.sy_ %1: >nul
@copy svga.exe          %1:\os2 >nul
@copy psclblt.dsc       %1:\os2\install >nul
@dspinstl

@echo -
@echo - Please shutdown and reboot the system for the newly installed
@echo - drivers to take effect . . .
@echo -
@goto home

:usage
@echo *------------------------------------------------------------------*
@echo * Cirrus Logic SVGA installation for OS/2 2.1...                   *
@echo *==================================================================*
@echo *                                                                  *
@echo * Please specify the drive letter for the files to be copied to... *
@echo *                                                                  *
@echo * usage:   clinst21 [destination drive letter]                     *
@echo * example: clinst21 C                                              *
@echo * meaning: install Cirrus Logic driver on drive C, the OS/2 drive  *
@echo *                                                                  *
@echo *------------------------------------------------------------------*

:home
@set path=%o_path%
@set o_path=