home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 19 / CD_ASCQ_19_010295.iso / dos / prg / pas / ktools / menu.bat < prev    next >
DOS Batch File  |  1994-11-23  |  2KB  |  121 lines

  1. :start
  2. @echo off
  3. a:
  4. cd \
  5. cls
  6. batmenu menu.bat
  7. if errorlevel=21 goto Fin
  8. if errorlevel=20 goto F20
  9. if errorlevel=19 goto F19
  10. if errorlevel=18 goto F18
  11. if errorlevel=17 goto F17
  12. if errorlevel=16 goto F16
  13. if errorlevel=15 goto F15
  14. if errorlevel=14 goto F14
  15. if errorlevel=13 goto F13
  16. if errorlevel=12 goto F12
  17. if errorlevel=11 goto F11
  18. if errorlevel=10 goto F10
  19. if errorlevel=9 goto F9
  20. if errorlevel=8 goto F8
  21. if errorlevel=7 goto F7
  22. if errorlevel=6 goto F6
  23. if errorlevel=5 goto F5
  24. if errorlevel=4 goto F4
  25. if errorlevel=3 goto F3
  26. if errorlevel=2 goto F2
  27. if errorlevel=1 goto F1
  28. goto Fin
  29.  
  30. :F1
  31. rem # PrĂ©sentation
  32. echo Chargement de textread en cours ...
  33. TextRead KTOOLS.DOC
  34. goto start
  35.  
  36. :F2
  37. rem # Programme TextRead
  38. echo Chargement de textread en cours ...
  39. TextRead
  40. goto start
  41.  
  42. :F3
  43. rem # Programme WriRead
  44. echo Chargement de wriread en cours ...
  45. WriRead
  46. goto start
  47.  
  48. :F4
  49. rem # Programme SwagRead
  50. echo Chargement de swagread en cours ...
  51. SwagRead
  52. goto start
  53.  
  54. :F5
  55. rem # Programme Calendrier
  56. echo Chargement de calend en cours ...
  57. Calend
  58. goto start
  59.  
  60. :F6
  61. rem # Programme Fiches
  62. echo Chargement de fiches en cours ...
  63. Fiches
  64. goto start
  65.  
  66. :F7
  67. rem # Programme ZipView
  68. echo Chargement de zipview en cours ...
  69. zipview
  70. goto start
  71.  
  72. :F8
  73. rem # Consultation des sources
  74. echo Chargement de textread en cours ...
  75. cd \source
  76. \textread
  77. goto start
  78.  
  79. :F9
  80. rem # Fiches DOS
  81. echo Chargement de fiches en cours ...
  82. fiches doshelp.bnt
  83. goto start
  84.  
  85. :F10
  86. rem 
  87.  
  88. :F11
  89. rem 
  90.  
  91. :F12
  92. rem 
  93.  
  94. :F13
  95. rem 
  96.  
  97. :F14
  98. rem 
  99.  
  100. :F15
  101. rem 
  102.  
  103. :F16
  104. rem 
  105.  
  106. :F17
  107. rem 
  108.  
  109. :F18
  110. rem 
  111.  
  112. :F19
  113. rem 
  114.  
  115. :F20
  116. rem 
  117.  
  118. :Fin
  119. rem # Sortie
  120. exit
  121.