home *** CD-ROM | disk | FTP | other *** search
/ MACD 4 / MACD4.iso / Patch / Programs / PS3BA1.LHA / 3.0bUpdate / Install-PageStream3.0b < prev    next >
Encoding:
Text File  |  1994-10-13  |  9.3 KB  |  257 lines

  1. ;PAGESTREAM 3.0b 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.0a to version 3.0b. It requires that PageStream 3.0a be installed on your hard drive first. If you have 3.0 and not 3.0a, you cannot use this patch. You must download the PS3B01.LHA archive instead.\n\nYour original PageStream3 disks will not be modified by this update.")
  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.0b 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 fargoflag
  49.         (askbool
  50.             (prompt
  51.                 "Do you want to install the new custom Fargo printer driver?")
  52.             (help
  53.                 "This driver can be used on the Fargo Primera printer with or without the dye sublimation option.")
  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 "Patching Libraries...")
  68. (run "ram:lhex >NIL: <NIL: -qfw=ram: x LibsPatch.lha")
  69. (delete "LibsPatch.LHA" (safe))
  70. (run "spatch >NIL: <NIL: -oSoftLogik:Libs/app.library -pram:app.pch SoftLogik:Libs/SoftLogik_App.library")
  71. (if (exists "SoftLogik:Libs/app.library")
  72.     (
  73.         (delete "SoftLogik:Libs/SoftLogik_App.library")
  74.         (rename "SoftLogik:Libs/app.library" "SoftLogik:Libs/SoftLogik_App.library")
  75.     )
  76. )
  77. (delete "ram:app.pch" (safe))
  78. (run "spatch >NIL: <NIL: -oSoftLogik:Libs/obj.library -pram:obj.pch SoftLogik:Libs/SoftLogik_Obj.library")
  79. (if (exists "SoftLogik:Libs/obj.library")
  80.     (
  81.         (delete "SoftLogik:Libs/SoftLogik_Obj.library")
  82.         (rename "SoftLogik:Libs/obj.library" "SoftLogik:Libs/SoftLogik_Obj.library")
  83.     )
  84. )
  85. (delete "ram:obj.pch" (safe))
  86.  
  87. ;UPDATE FONT ENGINES
  88. (working "Installing Updated Font Engines...")
  89. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Engines x Engines.lha")
  90. (delete "Engines.LHA" (safe))
  91.  
  92. ;UPDATE PRINTER DRIVERS
  93. (working "Installing Updated Printer Drivers...")
  94. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/HP.printer"))
  95.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x HP.lha")
  96. )
  97. (delete "HP.LHA" (safe))
  98.  
  99. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/Epson.printer"))
  100.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x Epson.lha")
  101. )
  102. (delete "Epson.LHA" (safe))
  103.  
  104. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/PostScript.printer"))
  105.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x PostScript.lha")
  106. )
  107. (delete "PostScript.LHA" (safe))
  108.  
  109. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/Preference.printer"))
  110.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x Preference.lha")
  111. )
  112. (delete "Preference.LHA" (safe))
  113.  
  114. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/IFFILBM.printer"))
  115.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x IFFILBM.lha")
  116. )
  117. (delete "IFFILBM.LHA" (safe))
  118.  
  119. (if (OR (= install_mode ALLflag) (= fargoflag 1))
  120.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x Fargo.lha")
  121. )
  122. (delete "Fargo.LHA" (safe))
  123.  
  124. ;UPDATE FILTERS AND EFFECTS
  125. (working "Installing Updated Filters and Effects...")
  126. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Filters.lha")
  127. (delete "Filters.LHA" (safe))
  128.  
  129. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/ArtExpressionEPS.gfilter"))
  130.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x ArtExpression.lha")
  131. )
  132. (delete "ArtExpression.LHA" (safe))
  133.  
  134. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/Excellence.tfilter"))
  135.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Excellence.lha")
  136. )
  137. (delete "Excellence.LHA" (safe))
  138.  
  139. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/FinalWriter.tfilter"))
  140.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x FWriter.lha")
  141. )
  142. (delete "FWriter.LHA" (safe))
  143.  
  144. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/FreehandEPS.gfilter"))
  145.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Freehand.lha")
  146. )
  147. (delete "Freehand.LHA" (safe))
  148.  
  149. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/IllustratorEPS.gfilter"))
  150.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Illustrator.lha")
  151. )
  152. (delete "Illustrator.LHA" (safe))
  153.  
  154. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/PageStream2.dfilter"))
  155.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x PageStream2.lha")
  156. )
  157. (delete "PageStream2.LHA" (safe))
  158.  
  159. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/ProPage.dfilter"))
  160.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x PPage.lha")
  161. )
  162. (delete "PPage.LHA" (safe))
  163.  
  164. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/ProDrawClip.gfilter"))
  165.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x ProDraw.lha")
  166. )
  167. (delete "ProDraw.LHA" (safe))
  168.  
  169. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/ProWrite.tfilter"))
  170.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x ProWrite.lha")
  171. )
  172. (delete "ProWrite.LHA" (safe))
  173.  
  174. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/Word.tfilter"))
  175.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Word.lha")
  176. )
  177. (delete "Word.LHA" (safe))
  178.  
  179. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/WordPerfect.tfilter"))
  180.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x WordPerfect.lha")
  181. )
  182. (delete "WordPerfect.LHA" (safe))
  183.  
  184. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/Wordworth.tfilter"))
  185.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Wordworth.lha")
  186. )
  187. (delete "Wordworth.LHA" (safe))
  188.  
  189. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Filters.lha")
  190. (delete "Filters.LHA" (safe))
  191.  
  192. (if (OR (= install_mode ALLflag) (exists "PageStream3:BME"))
  193.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Effects x Effects.lha")
  194. )
  195. (delete "Effects.LHA" (safe))
  196.  
  197. ;UPDATE MACROS
  198. (if (<> (exists "PageStream3:Macros") 2) (makedir "PageStream3:Macros" (infos)))
  199. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Macros x Macros.lha")
  200. (delete "Macros.LHA" (safe))
  201.  
  202. ;UPDATE PAGESTREAM3
  203. (working "Patching PageStream 3.0a to 3.0b...\n\nThis will take about one to five minutes.")
  204. (run "ram:lhex >NIL: <NIL: -qfw=ram: x PGSpatch.LHA")
  205. (delete "PGSpatch.LHA" (safe))
  206. (run "spatch >NIL: <NIL: -oPageStream3:PageStream3.0b -pram:PageStream.pch PageStream3:PageStream3")
  207. (if (exists "PageStream3:PageStream3.0b")
  208.     (
  209.         (delete "PageStream3:PageStream3")
  210.         (rename "PageStream3:PageStream3.0b" "PageStream3:PageStream3")
  211.     )
  212. )
  213. (delete "ram:PageStream.pch" (safe))
  214.  
  215. ;UPDATE PAGELINER
  216. (if (exists "PageStream3:PageLiner")
  217.     (
  218.         (working "Patching PageLiner 2.0 to 2.0a...")
  219.         (run "ram:lhex >NIL: <NIL: -qfw=ram: x PLpatch.LHA")
  220.         (delete "PLpatch.LHA" (safe))
  221.         (run "spatch >NIL: <NIL: -oPageStream3:PageLiner2.0a -pram:PageLiner.pch PageStream3:PageLiner")
  222.         (if (exists "PageStream3:PageLiner2.0a")
  223.             (
  224.                 (delete "PageStream3:PageLiner")
  225.                 (rename "PageStream3:PageLiner2.0a" "PageStream3:PageLiner")
  226.             )
  227.         )
  228.     )
  229. )
  230. (delete "ram:PageLiner.pch" (safe))
  231.  
  232. ;INSTALL TIPS
  233. (if (<> (exists "PageStream3:Help") 2) (makedir "PageStream3:Help" (infos)))
  234. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Help x Tips.LHA")
  235. (delete "Tips.LHA" (safe))
  236.  
  237. ;INSTALL README
  238. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x Read.LHA")
  239. (delete "Read.LHA" (safe))
  240.  
  241. ;DISPLAY README (Try 3 different ways!)
  242. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x Read.LHA")
  243. (delete "Read.LHA" (safe))
  244. (IF (> (run "Sys:Utilities/MultiView PageStream3:ReadMe.Now") 0)
  245.     (IF (> (run "Sys:Utilities/AmigaGuide PageStream3:ReadMe.Now") 0)
  246.         (run "More PageStream3:ReadMe.Now")
  247.     )
  248. )
  249.  
  250. ;REMOVE THE LHARC PROGRAM
  251. (delete "ram:lhex" (safe))
  252. (delete "spatch" (safe))
  253. (delete "Install-PageStream3.0b.info" (safe))
  254.  
  255. ;GEE, THAT WAS FUN
  256. (exit "PageStream 3.0b installed!")
  257.