Advertisement
Guest User

Untitled

a guest
Jul 27th, 2017
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.26 KB | None | 0 0
  1. @echo off
  2. goto menu
  3. :menu
  4. echo.
  5. echo What would you like to do?
  6. echo.
  7. echo Choice
  8. echo.
  9. echo 1 Open L4H Depression
  10. echo 2 Open L4H Diabetes HR
  11. echo 3 Open ABH
  12. echo 4 Open EAP
  13. echo 5 Open Global
  14. echo 6 Open MEAS
  15. echo 7 Open MEAS Depression
  16. echo 8 Open MEAS Diabetes
  17. echo 9 Quit
  18. echo.
  19.  
  20. :choice
  21. choice.exe /C:123456789
  22. if errorlevel 9 goto quit
  23. if errorlevel 8 goto MEASDIHR
  24. if errorlevel 7 goto MEASDepr
  25. if errorlevel 6 goto MEAS
  26. if errorlevel 5 goto Global
  27. if errorlevel 4 goto EAP
  28. if errorlevel 3 goto ABH
  29. if errorlevel 2 goto L4HDiab
  30. if errorlevel 1 goto L4HDepress
  31. REM if "%C%"=="9" goto quit
  32. REM if "%C%"=="8" goto MEASDIHR
  33. REM if "%C%"=="7" goto MEASDepr
  34. REM if "%C%"=="6" goto MEAS
  35. REM if "%C%"=="5" goto Global
  36. REM if "%C%"=="4" goto EAP
  37. REM if "%C%"=="3" goto ABH
  38. REM if "%C%"=="2" goto L4HDiab
  39. REM if "%C%"=="1" goto L4HDepress
  40. goto choice
  41.  
  42. :L4HDepress
  43. call M:\DM\cat2000.bat
  44. goto menu
  45.  
  46. :L4HDiab
  47. call M:\DM\Diab2000.bat
  48. goto menu
  49.  
  50. :ABH
  51. call M:\DM\Abh2000.bat
  52. goto menu
  53.  
  54. :EAP
  55. call M:\DM\Eap2000.bat
  56. goto menu
  57.  
  58. :Global
  59. call M:\DM\GLOB2000.bat
  60. goto menu
  61.  
  62. :MEAS
  63. call M:\DM\Meas2000.bat
  64. goto menu
  65.  
  66. :MEASDepr
  67. call M:\DM\MEASDPy2k.bat
  68. goto menu
  69.  
  70. :MEASDIHR
  71. call M:\DM\MEASDIy2k.bat
  72. goto menu
  73.  
  74. :quit
  75. exitemu
  76. :end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement