home *** CD-ROM | disk | FTP | other *** search
- echo off
- REM THE ABOVE STATEMENT TURNS ECHO OFF SO THAT COMMANDS ARE NOT SEEN
- :again
- REM THIS PAINTS THE MENU ON THE SCREEN.
- be menu.dat
-
- REM GET THE USERS CHOICE AND PROCESS.
- be ask " " qsdnb DEF=q bright yellow
-
- REM REMEMBER THAT CHOICES MUST BE LISTED IN REVERSE ORDER.
- REM NOW GO RUN THE PROGRAM REQUESTED.
- if errorlevel 5 goto BE
- if errorlevel 4 goto NI
- if errorlevel 3 goto DS
- if errorlevel 2 goto SF
- if errorlevel 1 goto QUIT
-
- :BE
- REM THIS AGAIN INVOKES BE WITH ANOTHER FILE OF COMMANDS
- be bedemo.dat
- goto again
-
- :NI
- be cls
- NI
- goto again
-
- :DS
- be cls
- DS
- goto again
-
- :SF
- be cls
- SF
- goto again
-
- :QUIT
- be cls
- exit
-