home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / SYS60.ZIP / SYS60.BAT < prev    next >
Encoding:
DOS Batch File  |  1991-02-20  |  2.0 KB  |  60 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 SYS60.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  sys60.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...
  36. goto HALT
  37. :NOTPU
  38. echo Your SYS60.TPU unit cannot be found...
  39. goto HALT
  40. :NOMOVER
  41. echo Your TPUMOVER.EXE program cannot be found...
  42. goto HALT
  43. :CLEANUP
  44. echo The SYSTEM.TPU has not been moved out of your directory...
  45. goto HALT
  46. :BADMOVER2
  47. ren system.tpu sys60.tpu
  48. :BADMOVER1
  49. echo The TPUMOVER program maybe the wrong version...
  50. echo   Deleting TPL-BOR.TPL and TPL-EPS.TPL...
  51. del tpl-bor.tpl
  52. del tpl-eps.tpl
  53. goto HALT
  54. :ALREADY
  55. echo The library already exists...
  56.  
  57. :HALT
  58. echo ----------------- The installation has NOT been completed. -------------------
  59.  
  60. :EXIT