home *** CD-ROM | disk | FTP | other *** search
- ECHO OFF
- IF %0 == a:install SET DRIVE=A:
- IF %0 == A:INSTALL SET DRIVE=A:
- IF %0 == b:install SET DRIVE=B:
- IF %0 == B:INSTALL SET DRIVE=B:
- CLS
- CD\2020
- IF NOT EXIST MASTER.EXE GOTO NOV3
- ECHO
- ECHO
- ECHO 2020 SHAPES DISK INSTALLATION
- ECHO
- ECHO THIS PROCEDURE WILL ATTEMPT TO
- ECHO INSTALL THE FULL SET OF FRAMELESS
- ECHO SHAPES ON YOUR SYSTEM.
- ECHO THIS REQUIRES A LARGE AMOUNT OF
- ECHO DISK SPACE, SO YOU SHOULD PERFORM
- ECHO THIS INSTALLATION ONLY IF YOU
- ECHO INTEND TO DEDICATE THIS COMPUTER
- ECHO TO CATALOG CREATION.
- ECHO
- ECHO TO ABORT THIS PROCEDURE, HIT
- ECHO CTRL-BREAK...
- PAUSE
- chkspace . 5000
- IF ERRORLEVEL 1 GOTO ABORT
- :STEP1
- IF EXIST %DRIVE%SHAPE_E1.DWC GOTO STEP1B
- ECHO PLEASE INSERT 'FRAMELESS SHAPES DISQUETTE #1' INTO DRIVE %DRIVE%
- PAUSE
- GOTO STEP1
- :STEP1B
- INPOLY -A %DRIVE%SHAPE_E1.DWC
- :STEP2
- IF EXIST %DRIVE%SHAPE_E2.DWC GOTO STEP2B
- ECHO PLEASE INSERT 'FRAMELESS SHAPES DISQUETTE #2' INTO DRIVE %DRIVE%
- PAUSE
- GOTO STEP2
- :STEP2B
- INPOLY -A %DRIVE%SHAPE_E2.DWC
- :STEP3
- IF EXIST %DRIVE%SHAPE_E3.DWC GOTO STEP3B
- ECHO PLEASE INSERT 'FRAMELESS SHAPES DISQUETTE #3' INTO DRIVE %DRIVE%
- PAUSE
- GOTO STEP3
- :STEP3B
- INPOLY -A %DRIVE%SHAPE_E3.DWC
- ECHO
- ECHO
- ECHO FRAMELESS SHAPES NOW INSTALLED.
- ECHO
- GOTO END
- :ABORT
- ECHO
- ECHO INSUFFICIENT DISK SPACE TO INSTALL SHAPES
- ECHO USE 'GETSHAPE' PROCEDURE TO SELECTIVELY
- ECHO LOAD THE SHAPES YOU NEED.
- ECHO
- ECHO
- GOTO END
- :NOV3
- ECHO
- ECHO
- ECHO ERROR: 2020 V3 NOT PRESENT!
- ECHO INSTALL V3 BEFORE INSTALLING THIS DISK
- ECHO
- :END
-
-