home *** CD-ROM | disk | FTP | other *** search
- echo off
- :TOP
- cls
- sask menu.dat 1234p
- If ERRORLEVEL = 99 goto ERROR
- if ERRORLEVEL = 5 goto PARK
- If ERRORLEVEL = 4 goto EXIT
- if ERRORLEVEL = 3 goto SHELL
- if ERRORLEVEL = 2 goto LOTUS
- echo You pressed the number 1 and Smartcomm would now be loaded
- echo however this is only a demo!
- pause
- goto TOP
- :LOTUS
- echo You pressed the number 2 and Lotus 1-2-3 would now be loaded, but
- echo maybe you don't have it, so I won't run it.
- pause
- goto TOP
- :SHELL
- echo You pressed the number 3 and I'll now run a second DOS shell. If
- echo COMMAND.COM does not exist on your path, you will receive an error
- echo and be returned. Otherwise, just type EXIT to get back to here.
- command
- echo You have returned!
- pause
- goto TOP
- :EXIT
- echo You pressed the number 4 and I will now stop this Demonstration.
- echo Please be sure to review the DEMO.BAT file to see how this
- echo mini-menu was created. Goodbye!
- goto DONE
- :PARK
- echo You pressed the letter P and I would now normally run a disk head
- echo parking program. But, I won't in this demo.
- pause
- goto TOP
- :ERROR
- echo You either pressed Ctrl-C/Ctrl-Break or some other error occurred
- echo aborting
- :DONE
- echo on
-