home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 18 / 18.iso / w / w364 / 8.img / SINSTAL1.BAT < prev    next >
Encoding:
DOS Batch File  |  1991-09-17  |  6.6 KB  |  137 lines
  1. REM  SINSTAL1.BAT FOR CGW 1.02 Dom (September 1991) - NETWORK SERVER
  2. cls
  3. echo Current Drive and Subdirectory:
  4. cd 
  5. echo  ╔═══════════════════════════════════════════════════════════════════════╗
  6. echo  ║                                                                       ║
  7. echo  ║               WELCOME TO CORRECT GRAMMAR for WINDOWS                  ║
  8. echo  ║                    NETWORK SERVER INSTALLATION                        ║
  9. echo  ║                                                                       ║
  10. :AGAIN1                                                                       ║
  11. echo  ║     This installation procedure will install Correct Grammar for      ║
  12. echo  ║     Windows for use on a Local Area Network to the current drive      ║
  13. echo  ║     and subdirectory.  Is this what you want to do? (Y/N)             ║
  14. echo  ║                                                                       ║
  15. echo  ║     If this is not what you want, type N.  Restart the installation   ║
  16. echo  ║     from the drive and subdirectory where you want Correct Grammar    ║
  17. echo  ║     installed.  For example:   Z:\WINWORD or Z:\WSWIN                 ║
  18. echo  ║                                                                       ║
  19. echo  ║                    Writing Tools Group, Inc.                          ║
  20. echo  ║                                                                       ║
  21. echo  ╚═══════════════════════════════════════════════════════════════════════╝
  22. %1LOCATE 09,61
  23. %1GETYNCG
  24. if errorlevel 3 goto AGAIN
  25. if errorlevel 2 goto NOTNOW
  26. :INCUR
  27. echo Y
  28. cls
  29. echo  ╔═══════════════════════════════════════════════════════════════════════╗
  30. echo  ║                                                                       ║
  31. echo  ║   Correct Grammar for Windows files are now being copied to the       ║ 
  32. echo  ║   network server.  This may take several minutes.  Thank you for      ║
  33. echo  ║   your patience. . .                                                  ║
  34. echo  ║                                                                       ║
  35. echo  ╚═══════════════════════════════════════════════════════════════════════╝
  36. %1LOCATE 04,25
  37. copy %1SETATTR.EXE >nul
  38. copy %1DHUFF.EXE >nul
  39. if exist CG*.* SETATTR CG*.* /RESET >nul
  40. copy %1CGINSTAL.SCR   >nul
  41. copy %1INFORMAL.CGG   >nul
  42. copy %1BASICS.CGG     >nul
  43. copy %1REVIEWER.CGG   >nul
  44. copy %1CUSTOM.CGG     >nul
  45. copy %1ACADEMIC.CGG   >nul
  46. dhuff %1INSTALCG.WRI INSTALCG.WRI    >nul
  47. copy %1INSTALCG.WP    >nul
  48. copy %1USERRULE.TXT   >nul
  49. copy %1CGDIC.SYS      >nul
  50. dhuff %1CGW.EXE    CGW.EXE          >nul
  51. copy %1GETYNCG.COM    >nul
  52. dhuff %1CGW.HLP    CGW.HLP          >nul
  53. copy %1CGW.SMM          >nul
  54. dhuff %1INSTALCG.SAM INSTALCG.SAM    >nul
  55. dhuff %1INSTALCG.PM4 INSTALCG.PM4   >nul
  56. copy %1LOCATE.COM     >nul
  57. copy %1LEGAL.CGG      >nul
  58. copy %1ADVRTSNG.CGG   >nul
  59. dhuff %1INSTALCG.CHP INSTALCG.CHP    >nul
  60. copy %1INSTALCG.DOC   >nul
  61. copy %1TECHNICL.CGG   >nul
  62. copy %1BUSINESS.CGG   >nul
  63. copy %1COMPILED.RLS   >nul
  64. copy %1OTHERS.TXT     >nul
  65. copy %1LEARNING.CGD   >nul
  66. dhuff %1MAKERULE.EXE MAKERULE.EXE   >nul
  67. copy %1TOUR.CGD          >nul
  68. copy %1FICTION.CGG    >nul
  69. copy %1GETNUM.EXE     >nul
  70. copy %1INSTALL.EXE    >nul
  71. copy %1CGUSRLOK.PTH   >nul
  72. copy %1BOX.TXT        >nul
  73. copy %1CGWHOOK.DLL  >nul
  74. copy %1CGGCS.DLL  >nul
  75. dhuff %1CGAMGCS.DAT CGAMGCS.DAT  >nul
  76. copy %1CGINSTAL.PRO >nul
  77. goto SETATR
  78. :WRONG
  79. cls
  80. echo  ╔═══════════════════════════════════════════════════════════════════════╗
  81. echo  ║                                                                       ║
  82. echo  ║     Sorry, something is wrong.  You may be out of disk space.         ║
  83. echo  ║     Installation cannot continue.                                     ║
  84. echo  ║                                                                       ║
  85. echo  ║     To install Correct Grammar, you need 1 MB of available space      ║
  86. echo  ║     on your hard disk.   Please correct the problem and try again.    ║
  87. echo  ║                                                                       ║
  88. echo  ╚═══════════════════════════════════════════════════════════════════════╝
  89. goto END
  90. :AGAIN
  91. cls
  92. LOCATE 00,00
  93. echo  ╔═══════════════════════════════════════════════════════════════════════╗
  94. echo  ║                                                                       ║
  95. echo  ║     Sorry, that is not a valid selection.                             ║
  96. goto AGAIN1
  97. :NOTNOW
  98. echo N
  99. cls
  100. echo  ╔═══════════════════════════════════════════════════════════════════════╗
  101. echo  ║                                                                       ║
  102. echo  ║   To install Correct Grammar for Windows on a Network, place the      ║
  103. echo  ║   Correct Grammar Disk in a diskette drive and make the current       ║
  104. echo  ║   drive and directory the network server's drive and directory where  ║
  105. echo  ║   you want Correct Grammar installed.                                 ║
  106. echo  ║                                                                       ║
  107. echo  ║   Then, type A:SINSTALL                                               ║
  108. echo  ║                                                                       ║
  109. echo  ╚═══════════════════════════════════════════════════════════════════════╝
  110. goto END
  111. :SETATR
  112. cls
  113. ECHO  ╔═══════════════════════════════════════════════════════════════════════╗
  114. ECHO  ║                                                                       ║
  115. ECHO  ║   Making program files read-only...                                   ║
  116. ECHO  ║                                                                       ║
  117. ECHO  ╚═══════════════════════════════════════════════════════════════════════╝
  118. setattr CGW.EXE /SET >nul
  119. setattr INSTALCG.* /SET >nul
  120. if exist CGAMGCS.DAT setattr CGAMGCS.DAT /SET >nul
  121. if exist CGBRGCS.DAT setattr CGBRGCS.DAT /SET >nul
  122. cls
  123. :DONE
  124. cls
  125. LOCATE 00,00
  126. ECHO  ╔═══════════════════════════════════════════════════════════════════════╗
  127. ECHO  ║                                                                       ║
  128. ECHO  ║    Installation of Correct Grammar for Windows Network is complete.   ║
  129. ECHO  ║    Please remove your diskette and keep it in a safe place.           ║
  130. ECHO  ║                                                                       ║
  131. ECHO  ║    Now, have each user who wants to use Correct Grammar INSTALL       ║
  132. ECHO  ║    using the instructions in the "Installing Correct Grammar for      ║
  133. ECHO  ║    Windows on a LAN" addendum.                                        ║
  134. ECHO  ║                                                                       ║
  135. ECHO  ╚═══════════════════════════════════════════════════════════════════════╝
  136. :END
  137.