home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 12 / CD_ASCQ_12_0294.iso / vrac / dmgr104a.zip / GO.BAT < prev    next >
DOS Batch File  |  1993-12-04  |  4KB  |  113 lines
  1. ECHO OFF
  2. CLS
  3. IF NOT EXIST DEBTMGR.MNU GOTO ERROR
  4. OPTION0
  5. :START
  6.     CLS
  7.     TYPE DEBTMGR.MNU
  8.     Choice
  9.     IF ERRORLEVEL 56 GOTO WrongKey
  10.     IF ERRORLEVEL 55 GOTO Option7
  11.     IF ERRORLEVEL 54 GOTO Option6
  12.     IF ERRORLEVEL 53 GOTO Option5
  13.     IF ERRORLEVEL 52 GOTO Option4
  14.     IF ERRORLEVEL 51 GOTO Option3
  15.     IF ERRORLEVEL 50 GOTO Option2
  16.     IF ERRORLEVEL 49 GOTO Option1
  17.     IF ERRORLEVEL 28 GOTO WrongKey
  18.     IF ERRORLEVEL 27 GOTO Quit
  19.     IF ERRORLEVEL 0  GOTO WrongKey
  20.     GOTO Quit
  21. REM ---------------------------------------------------------------
  22. :Option1
  23.     CLS
  24.     ECHO Please stand by...
  25.     OPTION1
  26.     CLS
  27.     ECHO Loading Menu, please stand by...
  28.     GOTO Start
  29. REM ---------------------------------------------------------------
  30. :Option2
  31.     CLS
  32.     ECHO Please stand by...
  33.     OPTION2
  34.     CLS
  35.     ECHO Loading Menu, please stand by...
  36.     GOTO Start
  37. REM ---------------------------------------------------------------
  38. :Option3
  39.     CLS
  40.     ECHO Please stand by...
  41.     OPTION3
  42.     CLS
  43.     ECHO Loading Menu, please stand by...
  44.     GOTO Start
  45. REM ---------------------------------------------------------------
  46. :Option4
  47.     CLS
  48.     ECHO Please stand by...
  49.     OPTION4
  50.     CLS
  51.     ECHO Loading Menu, please stand by...
  52.     GOTO Start
  53. REM ---------------------------------------------------------------
  54. :Option5
  55.     CLS
  56.     ECHO Please stand by...
  57.     OPTION5
  58.     CLS
  59.     ECHO Loading Menu, please stand by...
  60.     GOTO Start
  61. REM ---------------------------------------------------------------
  62. :Option6
  63.     MD C:\DEBTMGR > NUL
  64.     CLS
  65.     ECHO.
  66.     ECHO Copying Debt Manager files to the Hard Drive.
  67.     ECHO Please stand by...
  68.     COPY *.* C:\DEBTMGR > NUL
  69.     GOTO Start
  70. REM ---------------------------------------------------------------
  71. :Option7
  72.     CLS
  73.     ECHO Loading program please stand by...
  74.     DEBTMGR
  75.     GOTO Start
  76. REM ---------------------------------------------------------------
  77. :WrongKey
  78.     ECHO.
  79.     ECHO »» That key is not a valid option ««
  80.     PAUSE
  81.     GOTO Start
  82. REM ---------------------------------------------------------------
  83. :Error
  84.     CLS
  85.     ECHO   
  86.     ECHO          ╒═════════════════════════════════════════════════════════╕
  87.     ECHO          │ Error:  Files(s) not found.                             │
  88.     ECHO          ╞═════════════════════════════════════════════════════════╡
  89.     ECHO          │ Reason(s): The most common reason for this condition is │
  90.     ECHO          │ trying to access files that are on a different drive or │
  91.     ECHO          │ files that are in a different directory.                │
  92.     ECHO          ├─────────────────────────────────────────────────────────┤
  93.     ECHO          │ Corrective Action(s):  If you are accessing files that  │
  94.     ECHO          │ are on a diskette in Drive A or Drive B, then make sure │
  95.     ECHO          │ your current drive is set to the same drive where the   │
  96.     ECHO          │ diskette is.                                            │
  97.     ECHO          │                                                         │
  98.     ECHO          │ If you are accessing files that are on the hard drive,  │
  99.     ECHO          │ then make sure your current directory matches the       │
  100.     ECHO          │ directory that contains all the files that were copied  │
  101.     ECHO          │ from the distribution diskette.                         │
  102.     ECHO          └─────────────────────────────────────────────────────────┘
  103.     ECHO.
  104.     ECHO.
  105.     GOTO End
  106. :Escape
  107. :Quit
  108.     ECHO.
  109.     ECHO.
  110.     ECHO Thank you for using Debt Manager
  111.     ECHO.
  112. :End
  113.