home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s038 / 2.ddi / INTELWIN.EXE / PACE.BAT < prev    next >
Encoding:
DOS Batch File  |  1992-05-22  |  2.7 KB  |  107 lines

  1. @echo off
  2. cls
  3. echo  
  4. echo  
  5. echo  
  6. echo  
  7. echo   ┌──────────────────────────────────────────────────────────────────────┐
  8. echo   │                iRMX for Windows Demonstration Disk                   │
  9. echo   ├──────────────────────────────────────────────────────────────────────┤
  10. echo   │                                                                      │
  11. echo   │      The pace of the demo is set automatically, based on the         │
  12. echo   │      speed of your computer.                                         │
  13. echo   │                                                                      │
  14. echo   │      This startup program allows you to set the pace manually.       │
  15. echo   │                                                                      │
  16. echo   │      The pace can be a number from 1-9.  (1=slowest, 9=fastest)      │
  17. echo   │                                                                      │
  18. echo   │      Recommended pace settings are:                                  │
  19. echo   │      286 or slower computers: 9                                      │
  20. echo   │      386 computers: 5 to 8                                           │
  21. echo   │      486 computers: 2 to 4                                           │    
  22. echo   │                                                                      │
  23. echo   │      To set the pace, and start the demo, enter a number 1-9.        │
  24. echo   │                                                                      │
  25. echo   └──────────────────────────────────────────────────────────────────────┘
  26. echo  
  27.  
  28. :QUERY
  29. echo       Please type a number from 1 to 9, or ESCAPE to exit to DOS: 
  30. echo.
  31. echo.
  32. pause >nul
  33.  
  34. TESTKEY
  35. if errorlevel 58 goto QUERY
  36. if errorlevel 57 goto PACE9
  37. if errorlevel 56 goto PACE8
  38. if errorlevel 55 goto PACE7
  39. if errorlevel 54 goto PACE6
  40. if errorlevel 53 goto PACE5
  41. if errorlevel 52 goto PACE4
  42. if errorlevel 51 goto PACE3
  43. if errorlevel 50 goto PACE2
  44. if errorlevel 49 goto PACE1
  45. if errorlevel 28 goto QUERY
  46. if errorlevel 27 goto QUIT
  47. GOTO QUERY
  48.  
  49. :PACE9
  50. SET pacer=9
  51. GOTO FIRST
  52.  
  53. :PACE8
  54. SET pacer=8
  55. GOTO FIRST
  56.  
  57. :PACE7
  58. SET pacer=7
  59. GOTO FIRST
  60.  
  61. :PACE6
  62. SET pacer=6
  63. GOTO FIRST
  64.  
  65. :PACE5
  66. SET pacer=5
  67. GOTO FIRST
  68.  
  69. :PACE4
  70. SET pacer=4
  71. GOTO FIRST
  72.  
  73. :PACE3
  74. SET pacer=3
  75. GOTO FIRST
  76.  
  77. :PACE2
  78. SET pacer=2
  79. GOTO FIRST
  80.  
  81. :PACE1
  82. SET pacer=1
  83.  
  84. :FIRST
  85. SHOW TITLE /P=%PACER%
  86. TESTKEY
  87. if errorlevel 28 goto SECOND
  88. if errorlevel 27 goto Ok_End
  89.  
  90. :SECOND
  91. SHOW INT-28 /P=%PACER%
  92. TESTKEY
  93. if errorlevel 28 goto THIRD
  94. if errorlevel 27 goto Ok_End
  95.  
  96. :THIRD
  97. SHOW INT-39A /P=%PACER%
  98. if errorlevel 28 goto FIRST 
  99. if errorlevel 27 goto Ok_End
  100. GOTO FIRST                 
  101.  
  102. :Ok_End
  103. SHOW CREDIT /P=%PACER%
  104.  
  105. :QUIT
  106. cls
  107.