Category : Tutorials + Patches
Archive   : ZIP-2-4.ZIP
Filename : M.BAT

ECHO OFF
REM M.BAT created by Chan Shippy April 1989
CLS
ECHO:
IF EXIST C:\UTIL\CHECKEY.COM GOTO START
ECHO The file CHECKEY.COM is required for M.BAT
ECHO CHECKEY.COM must be in the subdirectory C:\UTIL
ECHO unless you change the drive:\subdirectory
ECHO prefix in the line that calls CHECKEY.
ECHO:
GOTO END

:START
CLS
C:
CD C:\
ECHO:
ECHO Chan's EZ-menu (M.BAT)
ECHO:
ECHO A. Directory of A: (1.2 M) S. Format A: (1.2 M)
ECHO B. Directory of B: (720 K) T. Format A: (360 K)
ECHO C. EXIT to DOS (C:\) U. Format B: (720 K)
ECHO D. V.
ECHO E. W. PCWrite (word proc.)
ECHO F. X.
ECHO G. GALAXY (word processor) Y.
ECHO H. Ham Radio (UTU) Z. Procomm+ (telecomm)
ECHO I. BASIC (SYSTEM to exit) 0.
ECHO J. 1. Q&A (database)
ECHO K. Chan's Calculator 2.
ECHO L. 3.
ECHO M. Chime Clock 4.
ECHO N. 5.
ECHO O. 6.
ECHO P. PARK HARD DISK HEADS 7.
ECHO Q. Quattro (spreadsheet) 8.
ECHO R. 9.
ECHO:
ECHO Your choice: (A-9) or (Esc). to EXIT to DOS (C:\)

:GETKEY
REM ERRORLEVEL's must be checked for in reverse order
REM Check for the largest first

C:\UTIL\CHECKEY
IF ERRORLEVEL 37 GOTO DOS
IF ERRORLEVEL 36 GOTO Z
IF ERRORLEVEL 35 GOTO GETKEY REM Y
IF ERRORLEVEL 34 GOTO GETKEY REM X
IF ERRORLEVEL 33 GOTO W
IF ERRORLEVEL 32 GOTO GETKEY REM V
IF ERRORLEVEL 31 GOTO U
IF ERRORLEVEL 30 GOTO T
IF ERRORLEVEL 29 GOTO S
IF ERRORLEVEL 28 GOTO GETKEY REM R
IF ERRORLEVEL 27 GOTO Q
IF ERRORLEVEL 26 GOTO P
IF ERRORLEVEL 25 GOTO GETKEY REM O
IF ERRORLEVEL 24 GOTO GETKEY REM N
IF ERRORLEVEL 23 GOTO M
IF ERRORLEVEL 22 GOTO GETKEY REM L
IF ERRORLEVEL 21 GOTO K
IF ERRORLEVEL 20 GOTO GETKEY REM J
IF ERRORLEVEL 19 GOTO I
IF ERRORLEVEL 18 GOTO H
IF ERRORLEVEL 17 GOTO G
IF ERRORLEVEL 16 GOTO GETKEY REM F
IF ERRORLEVEL 15 GOTO GETKEY REM E
IF ERRORLEVEL 14 GOTO GETKEY REM D
IF ERRORLEVEL 13 GOTO C
IF ERRORLEVEL 12 GOTO B
IF ERRORLEVEL 11 GOTO A
IF ERRORLEVEL 10 GOTO GETKEY REM Zero
IF ERRORLEVEL 9 GOTO GETKEY REM Nine
IF ERRORLEVEL 8 GOTO GETKEY REM Eight
IF ERRORLEVEL 7 GOTO GETKEY REM Seven
IF ERRORLEVEL 6 GOTO GETKEY REM Six
IF ERRORLEVEL 5 GOTO GETKEY REM Five
IF ERRORLEVEL 4 GOTO GETKEY REM Four
IF ERRORLEVEL 3 GOTO GETKEY REM Three
IF ERRORLEVEL 2 GOTO GETKEY REM Two
IF ERRORLEVEL 1 GOTO One

:A
CLS
DIR A:/P
PAUSE
GOTO START

:B
CLS
DIR B:/P
PAUSE
GOTO START

:C
REM Exit to DOS and clear the screen
GOTO DOS

😀
GOTO START

:E
GOTO START

:F
GOTO START

:G
CLS
ECHO Loading Galaxy . . .
CD C:\GXY
GALAXY C:\LET\*.*
GOTO START

:H
CD C:\RADIO
COMMAND /C UTU
GOTO START

:I
CLS
ECHO Loading BASIC . . .
CD C:\BAS
BASIC KEYOFF
GOTO START

:J
GOTO START

:K
CLS
ECHO Loading CALC . . .
C:\UTIL\LOCKKEYS NUM:ON
C:\UTIL\CALC/C
GOTO START

:L
GOTO START

:M
CLS
ECHO Loading CHIMECLK . . .
C:\UTIL\CHIMECLK/C
GOTO START

:N
GOTO START

:O
GOTO START

😛
CLS
ECHO Parking the Hard Disk heads . . .
C:\UTIL\PARK
GOTO START

:Q
CLS
ECHO Loading Quattro . . .
CD C:\QT\WKQ
C:\QT\Q
GOTO START

:R
GOTO START

:S
CLS
ECHO:
ECHO About to format drive A at 1.2 M . . .
FORMAT A:
GOTO START

:T
CLS
ECHO:
ECHO About to format drive A at 360 K . . .
FORMAT A:/4
GOTO START

:U
CLS
ECHO About to format drive B at 720 K . . .
FORMAT B:
GOTO START

:V
GOTO START

:W
CLS
ECHO Loading PCWrite . . .
CD\PCW
ED C:\LET\*.*
GOTO START

:X
GOTO START

:Y
GOTO START

:Z
CLS
CD C:\COMM
PCPLUS
GOTO START

:Zero
GOTO START

:One
CD C:\DB
QA
GOTO START

:Two
GOTO START

:Three
GOTO START

:Four
GOTO START

:Five
GOTO START

:Six
GOTO START

:Seven
GOTO START

:Eight
GOTO START

:Nine
GOTO START

:DOS
CLS
:END