home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 September / Simtel20_Sept92.cdr / msdos / sysutl / portfind.arc / COMMTEST.BAT next >
DOS Batch File  |  1988-08-25  |  2KB  |  67 lines

  1. pf
  2. @if errorlevel 15 goto 15port
  3. @if errorlevel 14 goto 14port
  4. @if errorlevel 13 goto 13port
  5. @if errorlevel 12 goto 12port
  6. @if errorlevel 11 goto 11port
  7. @if errorlevel 10 goto 10port
  8. @if errorlevel 9 goto 9port
  9. @if errorlevel 8 goto 8port
  10. @if errorlevel 7 goto 7port
  11. @if errorlevel 6 goto 6port
  12. @if errorlevel 5 goto 5port
  13. @if errorlevel 4 goto 4port
  14. @if errorlevel 3 goto 3port
  15. @if errorlevel 2 goto 2port
  16. @if errorlevel 1 goto 1port
  17. @if errorlevel 0 goto 0port
  18. :0port
  19. rem                You have no com ports!
  20. @goto endall
  21. :1port
  22. rem                You have com port 1
  23. @goto endall
  24. :2port
  25. rem                You have com port 2
  26. @goto endall
  27. :3port
  28. rem                You have com ports 1 and 2
  29. @goto endall
  30. :4port
  31. rem                You have com port 3
  32. @goto endall
  33. :5port
  34. rem                You have com ports 1 and 3
  35. @goto endall
  36. :6port
  37. rem                You have com ports 2 and 3
  38. @goto endall
  39. :7port
  40. rem                You have com ports 1, 2, and 3
  41. @goto endall
  42. :8port
  43. rem                You have com port 4
  44. @goto endall
  45. :9port
  46. rem                You have com ports 1 and 4
  47. @goto endall
  48. :10port
  49. rem                You have com ports 2 and 4
  50. @goto endall
  51. :11port
  52. rem                You have com ports 1, 2, and 4
  53. @goto endall
  54. :12port
  55. rem                You have com ports 3 and 4
  56. @goto endall
  57. :13port
  58. rem                You have com ports 1, 3, and 4
  59. @goto endall
  60. :14port
  61. rem                You have com ports 2, 3, and 4
  62. @goto endall
  63. :15port
  64. rem                You have com ports 1, 2, 3, and 4
  65. :endall
  66. rem                The error level test is over.
  67.