home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / PROG / PASCAL / SYS60A.ZIP / SYS60A.BAT < prev    next >
Encoding:
DOS Batch File  |  1991-03-25  |  2.7 KB  |  68 lines
  1. echo off
  2. cls
  3. echo ------------------------------------------------------------------------------
  4. echo          -- INSTALLATION PROGRAM FOR TURBO PASCAL 6.0 SYSTEM UNIT --
  5. echo             Copyright (c) 1990,1991 by Eagle Performance Software
  6. echo ------------------------------------------------------------------------------
  7. if not exist TURBO.TPL    goto NOLIB
  8. if not exist SYS60A.TPU   goto NOTPU
  9. if     exist TPL-EPS.TPL  goto ALREADY
  10. if     exist TPL-BOR.TPL  goto ALREADY
  11. if     exist SYSTEM.TPU   goto CLEANUP
  12. tpumover nul.tpl -nul.tpu >nul
  13. if not errorlevel 1 goto NOMOVER
  14. echo   Making backup copy of TURBO.TPL into TPL-BOR.TPL...
  15. copy turbo.tpl tpl-bor.tpl >nul
  16. echo   Creating new  copy of TURBO.TPL into TPL-EPS.TPL...
  17. copy turbo.tpl tpl-eps.tpl >nul
  18. echo   Deleting Turbo's SYSTEM.TPU...
  19. tpumover tpl-eps.tpl -system
  20. if errorlevel 1 goto BADMOVER1
  21. ren  sys60a.tpu system.tpu
  22. echo   Adding Eagle's   SYSTEM.TPU...
  23. tpumover tpl-eps.tpl +system
  24. if errorlevel 1 goto BADMOVER2
  25. del  system.tpu
  26. echo   Installing updated library TURBO.TPL ...
  27. copy tpl-eps.tpl turbo.tpl >nul
  28. echo ------------------------------------------------------------------------------
  29. echo               Installation complete!  Enjoy your faster programs.
  30. echo                 -- Shareware by Eagle Performance Software --
  31. echo ------------------------------------------------------------------------------
  32. goto EXIT
  33.  
  34. :NOLIB
  35. echo Your TURBO.TPL library cannot be found.  Check to see if you are running
  36. echo this installation in your Turbo Pascal directory.
  37. goto HALT
  38. :NOTPU
  39. echo Your SYS60A.TPU unit cannot be found.  Check to see if you have already
  40. echo installed the unit and are attempting to install it a second time.
  41. goto HALT
  42. :NOMOVER
  43. echo Your TPUMOVER.EXE program cannot be found.  Be sure that this program can
  44. echo be accessed by the path or is found in your Turbo Pascal directory.
  45. goto HALT
  46. :CLEANUP
  47. echo The SYSTEM.TPU file has not been moved out of your directory.  Relocate
  48. echo this file to keep it from being overwritten.
  49. goto HALT
  50. :BADMOVER2
  51. ren system.tpu sys60a.tpu
  52. :BADMOVER1
  53. echo The TPUMOVER program maybe the wrong version...
  54. echo   Deleting TPL-BOR.TPL and TPL-EPS.TPL...
  55. del tpl-bor.tpl
  56. del tpl-eps.tpl
  57. goto HALT
  58. :ALREADY
  59. echo The TPL-BOR.TPL/TPL-EPS.TPL libraries already exist.  You are attempting to
  60. echo install the unit a second time...
  61. echo If you are upgrading SYS, then be sure that TURBO.TPL is Borland's original
  62. echo library by copying TPL-BOR.TPL to TURBO.TPL.  Then delete TPL-BOR.TPL and
  63. echo TPL-EPS.TPL and run SYS60A.BAT again...
  64.  
  65. :HALT
  66. echo ----------------- The installation has NOT been completed. -------------------
  67.  
  68. :EXIT