ECHO OFF
:MENU
UNSNAP SCREENS /N1		rem MENU
GET
IF ERRORLEVEL 51 GOTO MENU
IF ERRORLEVEL 50 GOTO MAGNEWS	rem M
IF ERRORLEVEL 49 GOTO TOWNQ	rem N
IF ERRORLEVEL 48 GOTO BOXING	rem B
IF ERRORLEVEL 36 GOTO MENU
IF ERRORLEVEL 35 GOTO HELPS	rem H
IF ERRORLEVEL 32 GOTO MENU
IF ERRORLEVEL 31 GOTO SLICE	rem S
IF ERRORLEVEL 23 GOTO MENU
IF ERRORLEVEL 22 GOTO UTILS	rem U
IF ERRORLEVEL 21 GOTO MENU
IF ERRORLEVEL 20 GOTO TUNICA	rem T
IF ERRORLEVEL 19 GOTO SHORT	rem R
IF ERRORLEVEL 18 GOTO MENU
IF ERRORLEVEL 17 GOTO WKSHOP	rem W
IF ERRORLEVEL 16 GOTO QUITS	rem Q
GOTO MENU

:WKSHOP
UNSNAP SCREENS /N9
GET
IF ERRORLEVEL 68 GOTO WKSHOP
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 60 GOTO WKSHOP
IF ERRORLEVEL 59 GOTO PRN9	rem F1 - print
GOTO MENU
:PRN9
SHOW WORKSHOP\DRIVE.DOC
GOTO MENU

:UTILS
UNSNAP SCREENS /N7
GET
IF ERRORLEVEL 68 GOTO UTILS
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 60 GOTO UTILS
IF ERRORLEVEL 59 GOTO PRN7	rem F1 - print
GOTO MENU
:PRN7
SHOW UTILS\BIGBRO.DOC
SHOW UTILS\X.DOC
GOTO MENU

:TUNICA
UNSNAP SCREENS /N6
GET
IF ERRORLEVEL 68 GOTO TUNICA
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 61 GOTO TUNICA
IF ERRORLEVEL 60 GOTO DON6	rem F2 - execute
IF ERRORLEVEL 59 GOTO PRN6	rem F1 - print
GOTO MENU
:DON6
CD TUNICA
TUNICA
CD ..
GOTO MENU
:PRN6
SHOW TUNICA\TUNICA.DOC
GOTO TUNICA

:SLICE
UNSNAP SCREENS /N12
GET
IF ERRORLEVEL 68 GOTO SLICE
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 60 GOTO SLICE
IF ERRORLEVEL 59 GOTO PRN12	rem F1 - print
GOTO MENU
:PRN12
SHOW SLICE\SLICE.DOC
GOTO SLICE

:SHORT
UNSNAP SCREENS /N8
GET
IF ERRORLEVEL 68 GOTO SHORT
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 60 GOTO SHORT
IF ERRORLEVEL 59 GOTO PRN8	rem F1 - print
GOTO MENU
:PRN8
SHOW SHORTIES\CAPARAMS.DOC
SHOW SHORTIES\F_S_B.DOC
GOTO MENU

:TOWNQ
UNSNAP SCREENS /N5
GET
IF ERRORLEVEL 68 GOTO TOWNQ
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 61 GOTO TOWNQ
IF ERRORLEVEL 60 GOTO DON5	rem F2 - execute
IF ERRORLEVEL 59 GOTO PRN5	rem F1 - print
GOTO MENU
:DON5
CD GAMES
TWNQST
CD ..
GOTO MENU
:PRN5
SHOW GAMES\TWNQST.DOC
GOTO TOWNQ

:MAGNEWS
UNSNAP SCREENS /N10
GET
IF ERRORLEVEL 68 GOTO MAGNEWS
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 60 GOTO MAGNEWS
IF ERRORLEVEL 59 GOTO PRN10	rem F1 - print
GOTO MENU
:PRN10
SHOW MAGAZINE\FORCEBKU.DOC
SHOW MAGAZINE\MOTOR.DOC
GOTO MENU

:HELPS
UNSNAP SCREENS /N2
GET
IF ERRORLEVEL 68 GOTO HELPS
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 60 GOTO HELPS
IF ERRORLEVEL 59 GOTO PRN2	rem F1 - print
GOTO MENU
:PRN2
SHOW HELP\HELP.51
GOTO MENU

:BOXING
UNSNAP SCREENS /N4
GET
IF ERRORLEVEL 68 GOTO BOXING
IF ERRORLEVEL 67 GOTO MENU	rem F9 - out
IF ERRORLEVEL 61 GOTO BOXING
IF ERRORLEVEL 60 GOTO DON4	rem F2 - execute
IF ERRORLEVEL 59 GOTO PRN4	rem F1 - print
GOTO MENU
:DON4
CD GAMES
BOXING
CD ..
GOTO MENU
:PRN4
SHOW GAMES\BOXING.DOC
GOTO BOXING


:QUITS
UNSNAP SCREENS /N11
GET
IF ERRORLEVEL 50 GOTO QUITS
IF ERRORLEVEL 49 GOTO MENU	rem N - no
IF ERRORLEVEL 22 GOTO QUITS
IF NOT ERRORLEVEL 21 GOTO QUITS
CLS