home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / utils / e-utils2.zip / GRMENU.BAT < prev    next >
DOS Batch File  |  1989-08-28  |  4KB  |  183 lines
  1. echo off
  2. break
  3. rem This batch file uses several of the utilities in this package to build
  4. rem a menu system that can be modified and used as a front end for just about
  5. rem any system . . .
  6. rem
  7. rem Remember that you need to keep the case type statements following the
  8. rem check for errorlevel in decending order for them to be properly parsed.
  9. rem
  10. rem For the sake of the demo, all of the errorlevel values have been entered.
  11. rem It would be a good idea for the sake of speed to remove all unused
  12. rem statements and replace them with a single goto ask, and also remove all
  13. rem REM statements...
  14. :mnutop
  15. color 4 15
  16. putcurs 5 /c
  17. eko grmenu.txt 1
  18. eko grmenu.txt 2
  19. eko grmenu.txt 3
  20. putcurs 9
  21. eko grmenu.txt 4
  22. eko grmenu.txt 5
  23. eko grmenu.txt 6
  24. eko grmenu.txt 7
  25. eko grmenu.txt 8
  26. eko grmenu.txt 9
  27. eko grmenu.txt 10
  28. eko grmenu.txt 11
  29. eko grmenu.txt 12
  30. eko grmenu.txt 13
  31. :ask
  32. putcurs 20
  33. getresp Enter the number or pick key of the desired option :
  34. rem Remember that you need to keep the case type statements following the
  35. rem check for errorlevel in decending order for them to be properly parsed.
  36. rem
  37. rem Z
  38. if errorlevel = 90 goto ask
  39. rem Y
  40. if errorlevel = 89 goto ask
  41. rem X
  42. if errorlevel = 88 goto xit
  43. rem W
  44. if errorlevel = 87 goto pcw
  45. rem V
  46. if errorlevel = 86 goto ask
  47. rem U
  48. if errorlevel = 85 goto ask
  49. rem T
  50. if errorlevel = 84 goto tym
  51. rem S
  52. if errorlevel = 83 goto ask
  53. rem R
  54. if errorlevel = 82 goto ask
  55. rem Q
  56. if errorlevel = 81 goto xit
  57. rem P
  58. if errorlevel = 80 goto ask
  59. rem O
  60. if errorlevel = 79 goto ask
  61. rem N
  62. if errorlevel = 78 goto ask
  63. rem M
  64. if errorlevel = 77 goto ask
  65. rem L
  66. if errorlevel = 76 goto dl
  67. rem K
  68. if errorlevel = 75 goto ask
  69. rem J
  70. if errorlevel = 74 goto ask
  71. rem I
  72. if errorlevel = 73 goto ask
  73. rem H
  74. if errorlevel = 72 goto chk
  75. rem G
  76. if errorlevel = 71 goto ask
  77. rem F
  78. if errorlevel = 70 goto fyl
  79. rem E
  80. if errorlevel = 69 goto ask
  81. rem D
  82. if errorlevel = 68 goto tday
  83. rem C
  84. if errorlevel = 67 goto pcm
  85. rem B
  86. if errorlevel = 66 goto ask
  87. rem A
  88. if errorlevel = 65 goto ask
  89. rem 9
  90. if errorlevel = 57 goto ask
  91. rem 8
  92. if errorlevel = 56 goto xit
  93. rem 7
  94. if errorlevel = 55 goto tday
  95. rem 6
  96. if errorlevel = 54 goto tym
  97. rem 5
  98. if errorlevel = 53 goto chk
  99. rem 4
  100. if errorlevel = 52 goto dl
  101. rem 3
  102. if errorlevel = 51 goto pcm
  103. rem 2
  104. if errorlevel = 50 goto fyl
  105. rem 1
  106. if errorlevel = 49 goto pcw
  107. rem 0
  108. if errorlevel = 48 goto ask
  109. goto mnutop
  110.  
  111. :fyl
  112. putcurs 12 /c
  113. echo This option would have run PC-File if it had been set up properly . . .
  114. echo You can include the batch commands directly in this file, or you can
  115. echo use the CALL option to call a secondary batch file that will return
  116. echo control to this program when completed.
  117. tone /f350 /d500
  118. pausec
  119. goto mnutop
  120.  
  121.  
  122. :pcw
  123. putcurs 12 /c
  124. echo This option would have run PC-Write if it had been set up properly . . .
  125. echo You can include the batch commands directly in this file, or you can
  126. echo use the CALL option to call a secondary batch file that will return
  127. echo control to this program when completed.
  128. tone /f350 /d500
  129. pausec
  130. goto mnutop
  131.  
  132.  
  133. :pcm
  134. putcurs 12 /c
  135. echo This option would have run ProComm if it had been set up properly . . .
  136. echo You can include the batch commands directly in this file, or you can
  137. echo use the CALL option to call a secondary batch file that will return
  138. echo control to this program when completed.
  139. tone /f350 /d500
  140. pausec
  141. goto mnutop
  142.  
  143.  
  144. :dl
  145. putcurs 8 /c
  146. dir /w
  147. tone /f350 /d500
  148. pausec
  149. goto mnutop
  150.  
  151. :chk
  152. putcurs 8 /c
  153. chkdsk/f
  154. tone /f350 /d500
  155. pausec
  156. goto mnutop
  157.  
  158. :tym
  159. putcurs 23
  160. now
  161. tone /f350 /d500
  162. pausec
  163. clrbelow 22
  164. goto ask
  165.  
  166. :tday
  167. putcurs 23
  168. today
  169. tone /f350 /d500
  170. pausec
  171. clrbelow 22
  172. goto ask
  173.  
  174. :xit
  175. tone /d500 /f550 /r3
  176. getyn Are you sure you want to quit
  177. if errorlevel = 1 goto :xxx
  178. clrline 20
  179. goto ask
  180.  
  181. :xxx
  182. color 0 15
  183.