home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0010 - 0019 / ibm0010-0019 / ibm0010.tar / ibm0010 / 2020-SP1.ZIP / 2020-SP1.TD0 / INSTALL.BAT next >
Encoding:
DOS Batch File  |  1989-07-05  |  1.8 KB  |  69 lines
  1. ECHO OFF
  2. IF %0 == a:install SET DRIVE=A:
  3. IF %0 == A:INSTALL SET DRIVE=A:
  4. IF %0 == b:install SET DRIVE=B:
  5. IF %0 == B:INSTALL SET DRIVE=B:
  6. CLS
  7. CD\2020
  8. IF NOT EXIST MASTER.EXE GOTO NOV3
  9. ECHO  
  10. ECHO  
  11. ECHO                       2020 SHAPES DISK INSTALLATION
  12. ECHO  
  13. ECHO                       THIS PROCEDURE WILL ATTEMPT TO
  14. ECHO                       INSTALL THE FULL SET OF FRAMELESS
  15. ECHO                       SHAPES ON YOUR SYSTEM.
  16. ECHO                       THIS REQUIRES A LARGE AMOUNT OF
  17. ECHO                       DISK SPACE, SO YOU SHOULD PERFORM
  18. ECHO                       THIS INSTALLATION ONLY IF YOU
  19. ECHO                       INTEND TO DEDICATE THIS COMPUTER
  20. ECHO                       TO CATALOG CREATION. 
  21. ECHO
  22. ECHO                       TO ABORT THIS PROCEDURE, HIT
  23. ECHO                       CTRL-BREAK...
  24. PAUSE
  25. chkspace . 5000
  26. IF ERRORLEVEL 1 GOTO ABORT
  27. :STEP1
  28. IF EXIST %DRIVE%SHAPE_E1.DWC GOTO STEP1B
  29. ECHO PLEASE INSERT 'FRAMELESS SHAPES DISQUETTE #1' INTO DRIVE %DRIVE%
  30. PAUSE
  31. GOTO STEP1
  32. :STEP1B
  33. INPOLY -A %DRIVE%SHAPE_E1.DWC
  34. :STEP2
  35. IF EXIST %DRIVE%SHAPE_E2.DWC GOTO STEP2B
  36. ECHO PLEASE INSERT 'FRAMELESS SHAPES DISQUETTE #2' INTO DRIVE %DRIVE%
  37. PAUSE
  38. GOTO STEP2
  39. :STEP2B
  40. INPOLY -A %DRIVE%SHAPE_E2.DWC
  41. :STEP3
  42. IF EXIST %DRIVE%SHAPE_E3.DWC GOTO STEP3B
  43. ECHO PLEASE INSERT 'FRAMELESS SHAPES DISQUETTE #3' INTO DRIVE %DRIVE%
  44. PAUSE
  45. GOTO STEP3
  46. :STEP3B
  47. INPOLY -A %DRIVE%SHAPE_E3.DWC
  48. ECHO
  49. ECHO
  50. ECHO                       FRAMELESS SHAPES NOW INSTALLED.
  51. ECHO
  52. GOTO END
  53. :ABORT
  54. ECHO
  55. ECHO             INSUFFICIENT DISK SPACE TO INSTALL SHAPES
  56. ECHO             USE 'GETSHAPE' PROCEDURE TO SELECTIVELY
  57. ECHO             LOAD THE SHAPES YOU NEED.
  58. ECHO
  59. ECHO
  60. GOTO END
  61. :NOV3
  62. ECHO  
  63. ECHO  
  64. ECHO                    ERROR: 2020 V3 NOT PRESENT!
  65. ECHO                    INSTALL V3 BEFORE INSTALLING THIS DISK
  66. ECHO  
  67. :END
  68.  
  69.