home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / RNG-PSE1.DMS / in.adf / Install-PGSextras < prev   
Encoding:
Text File  |  1995-09-19  |  2.4 KB  |  44 lines
  1. ;PAGESTREAM2.2 COVER DISK EXTRAS INSTALLATION SCRIPT
  2. ;COPYRIGHT ©1995 SOFT-LOGIK PUBLISHING CORPORATION
  3.  
  4. (message "This installation script will install additional PageStream2.2 files to your hard drive.\n\nIt requires approximately 800K of hard drive space. If you do not have this much free space, abort now.")
  5.  
  6. ;GET DESTINATION
  7. (set PGSdest
  8.     (askdir
  9.         (prompt
  10.             "Select the PageStream2 drawer.\n")
  11.         (help
  12.             "The October95 CU Amiga cover disk version of PageStream2.2 must be installed prior to installing these files.")
  13.         (default @default-dest)
  14.     )
  15. )
  16. (if (<> (exists (tackon PGSdest "PageStream2UK")) 1)
  17.     (
  18.         ;Be nice and find it even if they didn't actually open the PageStream2 drawer
  19.         (if (= (exists (tackon PGSdest "PageStream2")) 2)
  20.             (set PGSdest (tackon PGSdest "PageStream2"))
  21.             (abort "The PageStream2 program is not in this drawer. Please try again.")
  22.         )
  23.     )
  24. )
  25.  
  26. (if (<> (exists (tackon PGSdest "Drivers")) 2) (makedir (tackon PGSdest "Drivers")))
  27. (if (<> (exists (tackon PGSdest "Printers")) 2) (makedir (tackon PGSdest "Printers")))
  28. (if (<> (exists (tackon PGSdest "Spell")) 2) (makedir (tackon PGSdest "Spell")))
  29. (if (<> (exists (tackon PGSdest "PSFonts")) 2) (makedir (tackon PGSdest "PSFonts")))
  30. (set @default-dest PGSdest)
  31.  
  32.  
  33. ;INSTALL EXTRAS
  34. (
  35.     (copyfiles (source "PageStream2Extras:Drivers") (dest (tackon PGSdest "Drivers")) (all))
  36.     (copyfiles (source "PageStream2Extras:Printers") (dest (tackon PGSdest "Printers")) (all))
  37.     (copyfiles (source "PageStream2Extras:Spell") (dest (tackon PGSdest "Spell")) (all))
  38.     (copyfiles (source "PageStream2Extras:PSFonts") (dest (tackon PGSdest "PSFonts")) (all))
  39. )
  40.  
  41. (message "Before you can use the additional fonts, you must add the new font path to the Font Manager. Here's how:\n\nChoose the Set/Save Paths command from the Global menu. Click on the Font Manager button in the Set/Save Paths requester. Click on the Add button in the Font Manager requester.\n\nSelect the StandardFonts drawer by clicking on it.\nDo not select a file! Click on OK.\n\nClick on Save Default in the Font Manager requester. Click on OK in the Set/Save Paths requester.")
  42.  
  43. (exit "To register your CU Amiga cover disk of PageStream2.2 and to receive the 90 page manual and full 5 disk set, send a cheque, postal order or credit card information for £24.95 to:\n\n Soft-Logik Publishing\n315 Consort Drive, St. Louis, MO 63011, USA\nOr fax: 001-314-256-7773 or telephone: 001-314-256-9595.")
  44.