home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
amenu
/
basic_q.bat
< prev
next >
Wrap
DOS Batch File
|
1980-01-02
|
371b
|
21 lines
run386 select basic.SEL
IF ERRORLEVEL 3 GOTO END
IF ERRORLEVEL 2 GOTO DOC
IF ERRORLEVEL 1 GOTO EXE
IF ERRORLEVEL 0 GOTO END
:EXE
q:
cd \fbasic%1
RUN386 a:fb386 -x Q:\fbasic%1%1.bas
GOTO SKIP
:DOC
IF NOT EXIST Q:\fbasic%1%1.DOC GOTO JUMP
RUN386 LOOK Q:\fbasic%1%1.DOC
GOTO SKIP
:JUMP
RUN386 LOOK Q:\fbasic%1\README.DOC
:SKIP
a:
a:\BASIC_Q.BAT %1
:END