home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 8 / 1995-07_Disc_8.iso / pcg.bat < prev    next >
DOS Batch File  |  1995-05-03  |  2KB  |  133 lines
  1. @echo off
  2. cls
  3. @echo .
  4. @echo    ╔══════════════════════════════════════════╗
  5. @echo    ║    Before we begin, please enter the     ║
  6. @echo    ║    letter corresponding to your CD-ROM   ║
  7. @echo    ║    DRIVE: (D-Z are valid choices)        ║
  8. @echo    ╚══════════════════════════════════════════╝
  9. @echo .
  10. @echo    Enter Choice or CTRL-C to exit [default=D]:
  11. choice /c:defghijklmnopqrstuvwxyz /n
  12. if errorlevel 23 goto dos23
  13. if errorlevel 22 goto dos22
  14. if errorlevel 21 goto dos21
  15. if errorlevel 20 goto dos20
  16. if errorlevel 19 goto dos19
  17. if errorlevel 18 goto dos18
  18. if errorlevel 17 goto dos17
  19. if errorlevel 16 goto dos16
  20. if errorlevel 15 goto dos15
  21. if errorlevel 14 goto dos14
  22. if errorlevel 13 goto dos13
  23. if errorlevel 12 goto dos12
  24. if errorlevel 11 goto dos11
  25. if errorlevel 10 goto dos10
  26. if errorlevel 9 goto dos9
  27. if errorlevel 8 goto dos8
  28. if errorlevel 7 goto dos7
  29. if errorlevel 6 goto dos6
  30. if errorlevel 5 goto dos5
  31. if errorlevel 4 goto dos4
  32. if errorlevel 3 goto dos3
  33. if errorlevel 2 goto dos2
  34. if errorlevel 1 goto dos1
  35.  
  36. :dos23
  37. SET %x=z:
  38. goto pcg
  39.  
  40. :dos22
  41. SET %x=y:
  42. goto pcg
  43.  
  44. :dos21
  45. SET %x=x:
  46. goto pcg
  47.  
  48. :dos20
  49. SET %x=w:
  50. goto pcg
  51.  
  52. :dos19
  53. SET %x=v:
  54. goto pcg
  55.  
  56. :dos18
  57. SET %x=u:
  58. goto pcg
  59.  
  60. :dos17
  61. SET %x=t:
  62. goto pcg
  63.  
  64. :dos16
  65. SET %x=s:
  66. goto pcg
  67.  
  68. :dos15
  69. SET %x=r:
  70. goto pcg
  71.  
  72. :dos14
  73. SET %x=q:
  74. goto pcg
  75.  
  76. :dos13
  77. SET %x=p:
  78. goto pcg
  79.  
  80. :dos12
  81. SET %x=o:
  82. goto pcg
  83.  
  84. :dos11
  85. SET %x=n:
  86. goto pcg
  87.  
  88. :dos10
  89. SET %x=m:
  90. goto pcg
  91.  
  92. :dos9
  93. SET %x=l:
  94. goto pcg
  95.  
  96. :dos8
  97. SET %x=k:
  98. goto pcg
  99.  
  100. :dos7
  101. SET %x=j:
  102. goto pcg
  103.  
  104. :dos6
  105. SET %x=i:
  106. goto pcg
  107.  
  108. :dos5
  109. SET %x=h:
  110. goto pcg
  111.  
  112. :dos4
  113. SET %x=g:
  114. goto pcg
  115.  
  116. :dos3
  117. SET %x=f:
  118. goto pcg
  119.  
  120. :dos2
  121. SET %x=e:
  122. goto pcg
  123.  
  124. :dos1
  125. SET %x=d:
  126. goto pcg
  127.  
  128. :pcg
  129. CALL PCG8.EXE
  130. goto end
  131.  
  132. :end
  133.