home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / m / mymath55.zip / ERRORLEV.BAT < prev    next >
DOS Batch File  |  1992-07-01  |  621b  |  14 lines
  1. ECHO OFF
  2. REM This file works with KEY.COM, which is case-sensitive.
  3. CLS
  4. SET N=
  5. ECHO --------------------------------------------------------------------------------
  6. ECHO Press a key
  7. KEY
  8. FOR %%A IN (0 1) DO IF ERRORLEVEL %%A00 SET N=%%A
  9. FOR %%A IN (0 1 2 3 4 5 6 7 8 9) DO IF ERRORLEVEL %N%%%A0 SET N=%N%%%A
  10. FOR %%A IN (0 1 2 3 4) DO IF ERRORLEVEL 2%%A0 SET N=2%%A
  11. FOR %%A IN (0 1 2 3 4 5 6 7 8 9) DO IF ERRORLEVEL %N%%%A SET N=%N%%%A
  12. FOR %%A IN (0 1 2 3 4 5) DO IF ERRORLEVEL 25%%A SET N=25%%A
  13. ECHO --------------------------------------------------------------------------------
  14. ECHO The errorlevel is %N%.