home *** CD-ROM | disk | FTP | other *** search
/ PC Plus 57 / ISSUE_57_JUN_1991 / PCPLUS.BAT < prev   
Encoding:
DOS Batch File  |  1991-01-01  |  3.3 KB  |  149 lines
  1. ECHO OFF
  2. :MENU
  3. !\57 1
  4. !\GET
  5. IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO HELP
  6. IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO PMEN
  7. IF ERRORLEVEL 61 IF NOT ERRORLEVEL 62 GOTO GAME
  8. IF ERRORLEVEL 62 IF NOT ERRORLEVEL 63 GOTO UTIL
  9. IF ERRORLEVEL 63 IF NOT ERRORLEVEL 64 GOTO SHOR
  10. IF ERRORLEVEL 64 IF NOT ERRORLEVEL 65 GOTO MAGA
  11. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO QUIT
  12. GOTO MENU
  13.  
  14.  
  15. :HELP
  16. FOR %%A IN (1 9) DO !\57 %%A
  17. !\GET
  18. IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO MAGA
  19. IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO PMEN
  20. GOTO MENU
  21.  
  22.  
  23. :PMEN
  24. FOR %%A IN (1 2) DO !\57 %%A
  25. :PMEN2
  26. !\GET
  27. IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO HELP
  28. IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO GAME
  29. IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO PMENB
  30. IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO PMENC
  31. IF ERRORLEVEL 61 IF NOT ERRORLEVEL 62 GOTO PMEND
  32. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
  33. GOTO PMEN2
  34. :PMENB
  35. CLS
  36. ECHO ABOUT TO CREATE B:\MENU..
  37. MD B:\MENU
  38. ECHO NOW EXPANDING PowerMenu INTO B:\MENU
  39. POWRMENU\POWER B:\MENU
  40. GOTO PMENZ
  41. :PMENC
  42. CLS
  43. ECHO ABOUT TO CREATE C:\MENU..
  44. MD C:\MENU
  45. ECHO NOW EXPANDING PowerMenu INTO C:\MENU
  46. POWRMENU\POWER C:\MENU
  47. GOTO PMENZ
  48. :PMEND
  49. CLS
  50. ECHO ABOUT TO CREATE D:\MENU..
  51. MD D:\MENU
  52. ECHO NOW EXPANDING PowerMenu INTO D:\MENU
  53. POWRMENU\POWER D:\MENU
  54. :PMENZ
  55. ECHO INSTALLATION COMPLETE (if no error messages)
  56. ECHO Press any key to continue
  57. !\GET
  58. GOTO MENU
  59.  
  60. :GAME
  61. FOR %%A IN (1 3) DO  !\57 %%A
  62. :GAME2
  63. !\GET
  64. IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO PMEN
  65. IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO UTIL
  66. IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO GAMER
  67. IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO GAMEP
  68. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
  69. GOTO GAME2
  70. :GAMER
  71. !\PLWAIT
  72. !\PBS-VIEW GAMES\LIFE8025.DOC
  73. GOTO GAME
  74. :GAMEP
  75. !\PLWAIT
  76. GAMES\LIFE8025
  77. GOTO GAME
  78.  
  79. :UTIL
  80. FOR %%A IN (1 4) DO !\57 %%A
  81. :UTIL2
  82. !\GET
  83. IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO GAME
  84. IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO SHOR
  85. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
  86. IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO UTILC
  87. IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO UTILP
  88. IF ERRORLEVEL 61 IF NOT ERRORLEVEL 62 GOTO UTILR
  89. GOTO UTIL2
  90. :UTILC
  91. !\PLWAIT
  92. !\PBS-VIEW UTILS\CHANGE.DOC
  93. GOTO UTIL
  94. :UTILP
  95. !\PLWAIT
  96. !\PBS-VIEW UTILS\PATTERN.DOC
  97. GOTO UTIL
  98. :UTILR
  99. !\PLWAIT
  100. CD UTILS
  101. PATTERN
  102. CD..
  103. GOTO UTIL
  104.  
  105.  
  106. :SHOR
  107. FOR %%A IN (1 5) DO !\57 %%A
  108. :SHOR2
  109. !\GET
  110. IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO UTIL
  111. IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO MAGA
  112. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
  113. IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO SHORP
  114. GOTO SHOR2
  115. :SHORP
  116. !\PLWAIT
  117. FOR %%A IN (SHORTIES\*.DOC) DO !\PBS-VIEW %%A
  118. GOTO SHOR
  119.  
  120.  
  121. :MAGA
  122. FOR %%A IN (1 6) DO !\57 %%A
  123. :MAGA2
  124. !\GET
  125. IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO SHOR
  126. IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO HELP
  127. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
  128. IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO MAGAP
  129. GOTO MAGA2
  130. :MAGAP
  131. !\PLWAIT
  132. !\PBS-VIEW MAGAZINE\MAGAZINE.DOC
  133. GOTO MAGA
  134.  
  135.  
  136. :QUIT
  137. IF EXIST EXTRA.BAT !\57 7
  138. IF NOT EXIST EXTRA.BAT !\57 8
  139. :QUIT2
  140. !\GET
  141. IF ERRORLEVEL 21 IF NOT ERRORLEVEL 22 GOTO QUITD
  142. IF ERRORLEVEL 49 IF NOT ERRORLEVEL 50 GOTO MENU
  143. IF ERRORLEVEL 45 IF NOT ERRORLEVEL 46 IF EXIST EXTRA.BAT EXTRA
  144. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
  145. GOTO QUIT2
  146. :QUITD
  147. CLS
  148. ECHO GOODBYE from SuperDisk 57  (June 1991)
  149.