ECHO OFF
:MENU
!\57 1
!\GET
IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO HELP
IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO PMEN
IF ERRORLEVEL 61 IF NOT ERRORLEVEL 62 GOTO GAME
IF ERRORLEVEL 62 IF NOT ERRORLEVEL 63 GOTO UTIL
IF ERRORLEVEL 63 IF NOT ERRORLEVEL 64 GOTO SHOR
IF ERRORLEVEL 64 IF NOT ERRORLEVEL 65 GOTO MAGA
IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO QUIT
GOTO MENU


:HELP
FOR %%A IN (1 9) DO !\57 %%A
!\GET
IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO MAGA
IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO PMEN
GOTO MENU


:PMEN
FOR %%A IN (1 2) DO !\57 %%A
:PMEN2
!\GET
IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO HELP
IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO GAME
IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO PMENB
IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO PMENC
IF ERRORLEVEL 61 IF NOT ERRORLEVEL 62 GOTO PMEND
IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
GOTO PMEN2
:PMENB
CLS
ECHO ABOUT TO CREATE B:\MENU..
MD B:\MENU
ECHO NOW EXPANDING PowerMenu INTO B:\MENU
POWRMENU\POWER B:\MENU
GOTO PMENZ
:PMENC
CLS
ECHO ABOUT TO CREATE C:\MENU..
MD C:\MENU
ECHO NOW EXPANDING PowerMenu INTO C:\MENU
POWRMENU\POWER C:\MENU
GOTO PMENZ
:PMEND
CLS
ECHO ABOUT TO CREATE D:\MENU..
MD D:\MENU
ECHO NOW EXPANDING PowerMenu INTO D:\MENU
POWRMENU\POWER D:\MENU
:PMENZ
ECHO INSTALLATION COMPLETE (if no error messages)
ECHO Press any key to continue
!\GET
GOTO MENU

:GAME
FOR %%A IN (1 3) DO  !\57 %%A
:GAME2
!\GET
IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO PMEN
IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO UTIL
IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO GAMER
IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO GAMEP
IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
GOTO GAME2
:GAMER
!\PLWAIT
!\PBS-VIEW GAMES\LIFE8025.DOC
GOTO GAME
:GAMEP
!\PLWAIT
GAMES\LIFE8025
GOTO GAME

:UTIL
FOR %%A IN (1 4) DO !\57 %%A
:UTIL2
!\GET
IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO GAME
IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO SHOR
IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO UTILC
IF ERRORLEVEL 60 IF NOT ERRORLEVEL 61 GOTO UTILP
IF ERRORLEVEL 61 IF NOT ERRORLEVEL 62 GOTO UTILR
GOTO UTIL2
:UTILC
!\PLWAIT
!\PBS-VIEW UTILS\CHANGE.DOC
GOTO UTIL
:UTILP
!\PLWAIT
!\PBS-VIEW UTILS\PATTERN.DOC
GOTO UTIL
:UTILR
!\PLWAIT
CD UTILS
PATTERN
CD..
GOTO UTIL


:SHOR
FOR %%A IN (1 5) DO !\57 %%A
:SHOR2
!\GET
IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO UTIL
IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO MAGA
IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO SHORP
GOTO SHOR2
:SHORP
!\PLWAIT
FOR %%A IN (SHORTIES\*.DOC) DO !\PBS-VIEW %%A
GOTO SHOR


:MAGA
FOR %%A IN (1 6) DO !\57 %%A
:MAGA2
!\GET
IF ERRORLEVEL 75 IF NOT ERRORLEVEL 76 GOTO SHOR
IF ERRORLEVEL 77 IF NOT ERRORLEVEL 78 GOTO HELP
IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
IF ERRORLEVEL 59 IF NOT ERRORLEVEL 60 GOTO MAGAP
GOTO MAGA2
:MAGAP
!\PLWAIT
!\PBS-VIEW MAGAZINE\MAGAZINE.DOC
GOTO MAGA


:QUIT
IF EXIST EXTRA.BAT !\57 7
IF NOT EXIST EXTRA.BAT !\57 8
:QUIT2
!\GET
IF ERRORLEVEL 21 IF NOT ERRORLEVEL 22 GOTO QUITD
IF ERRORLEVEL 49 IF NOT ERRORLEVEL 50 GOTO MENU
IF ERRORLEVEL 45 IF NOT ERRORLEVEL 46 IF EXIST EXTRA.BAT EXTRA
IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO MENU
GOTO QUIT2
:QUITD
CLS
ECHO GOODBYE from SuperDisk 57  (June 1991)