home *** CD-ROM | disk | FTP | other *** search
/ The CDPD Public Domain Collection for CDTV 4 / CDPD_IV.bin / fish / 911-930 / ff912 / uuarc / install next >
Text File  |  1994-05-04  |  2KB  |  106 lines
  1. .bra {
  2. .ket }
  3.  
  4.  
  5. ; UUArc installation script by J.G.Brandon
  6.  
  7.  
  8. ; Display installation procedure, and check that this is acceptable
  9. ; to the user, abort if not
  10.  
  11. Echo " "
  12. Echo " UUARC BY J.G.BRANDON"
  13. Echo " "
  14. Echo " "
  15. Echo " Installation script"
  16. Echo " -------------------"
  17. Echo " "
  18. Echo " This script attempts to install the UUArc program into your C:"
  19. Echo " directory, and (if present) adds a UUArc entry to the ArcTypes"
  20. Echo " file for GuiArc, if you have it."
  21. Echo " "
  22. Echo " "
  23.  
  24. Ask " Continue with installation (Enter Y/N) ?"
  25. If NOT WARN
  26.     Echo " "
  27.     Echo " "
  28.     Echo " Okay - aborting installation."
  29.     Echo " "
  30.     EndCLI >NIL:
  31. EndIf
  32.  
  33.  
  34. ; Attempt to install the UUArc executable into C:
  35. ; If a version already exists there, check with the
  36. ; user before copying this version across
  37.  
  38. Echo "*ec"
  39. Echo " Attemping to install UUArc into C:."
  40. Echo " "
  41. If EXISTS C:UUArc
  42.     Echo " "
  43.     Echo " UUArc already installed in C:.*n"
  44.     Ask " Continue to add this version (Enter Y/N) ?"
  45.     If NOT WARN
  46.             Echo " "
  47.         Echo " "
  48.         Echo " Okay - executable not copied."
  49.         Echo " "
  50.         Wait 3 Secs
  51.         Skip NoAddUUArc
  52.     EndIf
  53. EndIf
  54.  
  55. Echo " "
  56. Echo " "
  57. Echo " Copying UUArc into C: ..."
  58. Copy UUArc C:
  59. Echo " ... done."
  60. Echo " "
  61. Wait 5 Secs
  62.  
  63.  
  64. ; Attempt to add a suitable entry to the GuiArc
  65. ; 'arctypes' file if it exists in SYS:Utilities.
  66. ; Skip if there is already an entry.
  67.  
  68. Lab NoAddUUArc
  69.  
  70. Echo "*ec"
  71. Echo " Attemping to add ArcTypes entry for GuiArc."
  72. Echo " "
  73. If NOT EXISTS SYS:Utilities/ArcTypes
  74.     Echo " "
  75.     Echo " Could not find Gui ArcTypes files in SYS:Utilities."
  76.     Echo " "
  77.     Echo " If you have GuiArc please add the UUArcType file in"
  78.     Echo " this directory onto the end of your ArcTypes file."
  79.     Echo " "
  80.         Skip InstallFinished
  81.     EndCLI >NIL:
  82. EndIf
  83.  
  84. SetEnv SEARCHRESULT NotFound
  85. Search >>ENV:SEARCHRESULT SYS:Utilities/ArcTypes @UUE quiet quick
  86. If $SEARCHRESULT GT NotFound
  87.     Echo " "
  88.     Echo " An entry for UUE archiving is already present."
  89.     Echo " "
  90.     Skip InstallFinished
  91. EndIf
  92.  
  93. Echo " "
  94. Echo " Adding a UUArc entry to ArcTypes..."
  95. Type >>SYS:Utilities/ArcTypes UUArcType
  96. Echo " .... done."
  97. Echo " "
  98.  
  99. Lab InstallFinished
  100.  
  101. Echo " "
  102. Echo " Installation complete."
  103. Echo " "
  104. Wait 10 Secs
  105. EndCLI >NIL:
  106.