home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / PGS30A.LHA / 3.0aupdate / Install-PageStream3.0a
Encoding:
Text File  |  1994-09-22  |  6.5 KB  |  164 lines
  1. ;PAGESTREAM 3.0a ONLINE UPDATE PATCH INSTALLATION SCRIPT
  2. ;COPYRIGHT ©1994 SOFT-LOGIK PUBLISHING CORPORATION
  3.  
  4. ;SEE IF PAGESTREAM3 AND SOFTLOGIK ARE ASSIGNED AND EVERYTHING EXISTS
  5. (set PGSdest (getassign "PageStream3" "a"))
  6. (set SLdest (getassign "SoftLogik" "a"))
  7. (if (OR (= PGSdest "") (= SLdest ""))
  8.     (abort "PageStream3: and/or SoftLogik: are not assigned. You must properly install PageStream3 before applying this update patch.")
  9. )
  10. (set @default-dest PGSdest)
  11. (if (<> (exists "PageStream3:PageStream3") 1)
  12.     (abort "PageStream3 is not in the PageStream3: directory. You must properly install PageStream3 before applying this update patch.")
  13. )
  14. (if (<> (exists "SoftLogik:Libs") 2)
  15.     (abort "The SoftLogik:Libs directory is missing. You must properly install PageStream3 before applying this update patch.")
  16. )
  17. (if (<> (exists "SoftLogik:Engines") 2)
  18.     (abort "The SoftLogik:Engines directory is missing. You must properly install PageStream3 before applying this update patch.")
  19. )
  20. (if (<> (exists "SoftLogik:Printers") 2)
  21.     (abort "The SoftLogik:Printers directory is missing. You must properly install PageStream3 before applying this update patch.")
  22. )
  23. (if (<> (exists "SoftLogik:Filters") 2)
  24.     (abort "The SoftLogik:Filteres directory is missing. You must properly install PageStream3 before applying this update patch.")
  25. )
  26. (if (<> (exists "SoftLogik:Effects") 2)
  27.     (abort "The SoftLogik:Effects directory is missing. You must properly install PageStream3 before applying this update patch.")
  28. )
  29.  
  30. ;SEE WHAT THE USER WANTS TO INSTALL
  31. (set ALLflag 0)
  32. (set SMAflag 1)
  33.  
  34. (message "\n\nThis will update your hard drive installation of PageStream 3.0 to version 3.0a.\n\nYour original PageStream3 disks will not be modified.")
  35. (set install_mode
  36.     (askchoice
  37.         (prompt
  38.             "\nSelect an installation option.\n\nChoose `All' if you have a full PageStream3 installation. Choose `Smart' if you have a custom or minimum PageStream3 installation.\n")
  39.         (choices "All New and Improved 3.0a Files" "Smart Install")
  40.         (default 0)
  41.         (help
  42.             "Smart Install will check to see if a file exists before copying the new one to your hard drive. Thus, if you deleted the HP.printer driver because you didn't need it, the new one will not be installed.")
  43.     )
  44. )
  45.  
  46. ;SET FLAGS FOR NEW STUFF IF SMART INSTALL
  47. (if (= install_mode SMAflag)
  48.     (set epsonflag
  49.         (askbool
  50.             (prompt
  51.                 "Do you want to install the new custom Epson printer driver?\n\nThis driver also can be used for some Canon printers.")
  52.             (help
  53.                 "This driver can be used on most Epson compatible printers and some Canon BubbleJet printers instead of using PageStream3's Preference driver with your AmigaDOS driver.")
  54.             (default 1)
  55.         )
  56.     )
  57. )
  58.  
  59. ;COPY THE LHEX PROGRAM TO RAM:
  60. (copyfiles
  61.     (source "PageStream3Disk1:lhex")
  62.     (dest "ram:")
  63.     (nogauge)
  64. )
  65.  
  66. ;UPDATE LIBS
  67. (working "Installing Updated Libraries...")
  68. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Libs x Libs.lha")
  69. (delete "Libs.LHA" (safe))
  70.  
  71. ;UPDATE FONT ENGINES
  72. (working "Installing Updated Font Engines...")
  73. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Engines x Engines.lha")
  74. (delete "Engines.LHA" (safe))
  75.  
  76. ;UPDATE PRINTER DRIVERS
  77. (working "Installing Updated Printer Drivers...")
  78. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/HP.printer"))
  79.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x HP.lha")
  80. )
  81. (delete "HP.LHA" (safe))
  82. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/PostScript.printer"))
  83.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x PostScript.lha")
  84. )
  85. (delete "PostScript.LHA" (safe))
  86. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/Preference.printer"))
  87.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x Preference.lha")
  88. )
  89. (delete "Preference.LHA" (safe))
  90. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/IFFILBM.printer"))
  91.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x IFFILBM.lha")
  92. )
  93. (delete "IFFILBM.LHA" (safe))
  94. (if (OR (= install_mode ALLflag) (= epsonflag 1))
  95.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x Epson.lha")
  96. )
  97. (delete "Epson.LHA" (safe))
  98.  
  99. ;UPDATE FILTERS AND EFFECTS
  100. (working "Installing Updated Filters and Effects...")
  101. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Filters.lha")
  102. (delete "Filters.LHA" (safe))
  103. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/PageStream2.dfilter"))
  104.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x PageStream2.lha")
  105. )
  106. (delete "PageStream2.LHA" (safe))
  107. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/ProPage.dfilter"))
  108.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x PPage.lha")
  109. )
  110. (delete "PPage.LHA" (safe))
  111. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/FinalWriter.tfilter"))
  112.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x FWriter.lha")
  113. )
  114. (delete "FWriter.LHA" (safe))
  115. (if (OR (= install_mode ALLflag) (exists "PageStream3:BME"))
  116.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Effects x Trace.lha")
  117. )
  118. (delete "Trace.LHA" (safe))
  119.  
  120. ;UPDATE MACROS
  121. (if (OR (= install_mode ALLflag) (exists "PageStream3:Macros/TechReport.Rexx"))
  122.     (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Macros x Macros.lha")
  123. )
  124. (delete "Macros.LHA" (safe))
  125.  
  126. ;INSTALL CORRECT BME ICON
  127. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x bmeinfo.lha")
  128. (delete "bmeinfo.lha" (safe))
  129.  
  130. ;UPDATE PAGESTREAM3
  131. (working "Decompressing Patch File...")
  132. (run "ram:lhex >NIL: <NIL: -qfw=ram: x patch.lha")
  133. (delete "patch.lha" (safe))
  134. (working "Patching PageStream 3.0 to 3.0a...\n\nThis will take about 1 minute on an A4000, 2 minutes on an A1200 or A3000, and more time on slower computers.")
  135. (run "spatch >NIL: <NIL: -oPageStream3:PageStream3.0a -pram:PageStream3.pch PageStream3:PageStream3")
  136. (if (exists "PageStream3:PageStream3.0a")
  137.     (
  138.         (delete "PageStream3:PageStream3")
  139.         (rename "PageStream3:PageStream3.0a" "PageStream3:PageStream3")
  140.     )
  141. )
  142. (delete "ram:PageStream3.pch" (safe))
  143. (delete "spatch" (safe))
  144.  
  145. ;INSTALL README
  146. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x Read.LHA")
  147. (delete "Read.LHA" (safe))
  148.  
  149. ;DISPLAY README (Try 3 different ways!)
  150. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x Read.LHA")
  151. (delete "Read.LHA" (safe))
  152. (IF (> (run "Sys:Utilities/MultiView PageStream3:ReadMe.Now") 0)
  153.     (IF (> (run "Sys:Utilities/AmigaGuide PageStream3:ReadMe.Now") 0)
  154.         (run "More PageStream3:ReadMe.Now")
  155.     )
  156. )
  157.  
  158. ;REMOVE THE LHARC PROGRAM
  159. (delete "ram:lhex" (safe))
  160. (delete "Install-PageStream3.0a.info" (safe))
  161.  
  162. ;GEE, THAT WAS FUN
  163. (exit "PageStream 3.0a installed!")
  164.