home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 September / Simtel20_Sept92.cdr / msdos / pcmag / vol8n17.arc / BAT_CASE.BAT < prev    next >
DOS Batch File  |  1989-08-29  |  816b  |  53 lines
  1.  
  2.  
  3. ECHO OFF
  4. CLS
  5. :MENU
  6. ECHO WHAT would you like to do now?
  7. ECHO    (S) Run Spreadsheet
  8. ECHO    (D) Run Database
  9. ECHO    (W) Run Word Processor
  10. ECHO    (Q) Quit
  11. GETKEY
  12. SET opt=0
  13. REM 68=D, 81=Q, 83=S, 87=W, 100=d, 113=q, 115=s, 119=w
  14. FOR %%e IN (68 69 81 82 83 84 87 88 100) DO IF ERRORLEVEL %%e SET opt=%%e
  15. FOR %%e IN (101 113 114 115 116 119 120) DO IF ERRORLEVEL %%e SET opt=%%e
  16. GOTO CASE%opt%
  17. :CASE0
  18. :CASE69
  19. :CASE82
  20. :CASE84
  21. :CASE88
  22. :CASE101
  23. :CASE114
  24. :CASE116
  25. :CASE120
  26. ECHO That was not a valid option
  27. PAUSE
  28. GOTO MENU
  29.  
  30. :CASE115
  31. :CASE83
  32. ECHO Pretending to run Spreadsheet
  33. PAUSE
  34. GOTO MENU
  35.  
  36. :CASE68
  37. :CASE100
  38. ECHO Pretending to run Database
  39. PAUSE
  40. GOTO MENU
  41.  
  42. :CASE119
  43. :CASE87
  44. ECHO Pretending to run Word Processor
  45. Pause
  46. GOTO MENU
  47.  
  48. :CASE113
  49. :CASE81
  50. ECHO ENDING it all
  51.  
  52.  
  53.