home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
educ
/
pres2.zip
/
PRES_B.EXE
/
lha
/
READPRES.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-01-30
|
939b
|
59 lines
ECHO OFF
:START
CLS
TYPE LISTPRES.LST
REPLY
IF ERRORLEVEL 57 GOTO _HELP
IF ERRORLEVEL 56 GOTO _8
IF ERRORLEVEL 55 GOTO _7
IF ERRORLEVEL 54 GOTO _6
IF ERRORLEVEL 53 GOTO _5
IF ERRORLEVEL 52 GOTO _4
IF ERRORLEVEL 51 GOTO _3
IF ERRORLEVEL 50 GOTO _2
IF ERRORLEVEL 49 GOTO _1
IF ERRORLEVEL 48 GOTO EXIT
GOTO _HELP
:_1
PR1-6.COM
GOTO END
:_2
PR7-13.COM
GOTO END
:_3
PR14-18.COM
GOTO END
:_4
PR19-25.COM
GOTO END
:_5
PR26-30.COM
GOTO END
:_6
PR31-34.COM
GOTO END
:_7
IF NOT EXIST PR35-39.COM GOTO ERROR
PR35-39.COM
GOTO END
:_8
IF NOT EXIST PR40-41.COM GOTO ERROR
PR40-41.COM
GOTO END
:ERROR
ECHO:
ECHO Presidents 35-41 may not be on this disk.
ECHO Check. If necessary you can type the ...COM name directly.
PAUSE
GOTO END
:_HELP
ECHO:
ECHO Type a number [1-8] at the prompt [0 TO EXIT].
ECHO example: 1 or 5
pause
:END
GOTO START
:EXIT
CLS
ECHO END OF READING PRESIDENT BIOGRAPHIES