.KEY dest
.BRA {
.KET }

;
; Do the PageSetterII installation:
;
; Inputs:
;    dest  Where stuff should go.


IF NOT EXISTS {dest}PageSetterII
   ECHO "     Creating Directory {dest}PageSetterII ..."
   MAKEDIR {dest}PageSetterII
   COPY PSInstUtil:Misc/Icons/Drawer.info {dest}PageSetterII.info
ENDIF

;
; Install the program itself.
;
ECHO "*N"
INSTUTIL ask -dy "Install the PageSetterII program [Y/N]? Y"
IF NOT WARN
   EXECUTE RAM:PSInstall/DiskMount Program PageSetterII: PSInstPgm:

   ECHO "*N     Copying PageSetterII program ..."
   COPY PSInstPgm:PageSetterII {dest}PageSetterII/PageSetterII
   COPY PSInstPgm:PageSetterII.info {dest}PageSetterII/PageSetterII.info
   INSTUTIL reseticon {dest}PageSetterII/PageSetterII


;
; these libraries are necessary for PageSetterII, make sure that they are there:
; (This is near the copying of PageSetterII, to eliminate a disk swap.)
;
   IF NOT EXISTS LIBS:mathtrans.library
      ECHO "*N     Copying mathtrans.library"
      COPY PSInstPgm:libs/mathtrans.library LIBS:
   ENDIF
   IF NOT EXISTS LIBS:diskfont.library
      ECHO "*N     Copying diskfont.library"
      COPY PSInstPgm:libs/diskfont.library LIBS:
   ENDIF

   ;
   ; While we've got this diskette, grab the new paintjet driver in case
   ; he wants it.
   COPY PSInstPgm:devs/printers/HP_PaintJet RAM:PSInstall

   COPY PSInstUtil:MakeFont {dest}PageSetterII
   COPY PSInstUtil:MakeFont.info {dest}PageSetterII
   INSTUTIL reseticon {dest}PageSetterII/MakeFont
   COPY PSInstUtil:MakeMetric {dest}PageSetterII

ENDIF


ECHO "*N"
INSTUTIL ask -dy "Copy Tutorial Files to {dest}PageSetterII [Y/N]? Y"
IF NOT warn

   IF NOT EXISTS {dest}PageSetterII/NewsLetter
      MAKEDIR {dest}PageSetterII/NewsLetter
   ENDIF
   COPY PSInstUtil:NewsLetter {dest}PageSetterII/NewsLetter ALL QUIET
   COPY PSInstUtil:NewsLetter.info {dest}PageSetterII
   INSTUTIL reseticon {dest}PageSetterII/NewsLetter

ENDIF	; copy Tutorial files

ECHO "*N"
INSTUTIL ask -dy "Copy new HP PaintJet printer driver to DEVS:printers [Y/N]? Y"
IF NOT warn
   COPY RAM:PSInstall/HP_PaintJet DEVS:printers
ENDIF


ECHO "*N"
INSTUTIL ask -dy "Copy PageSetterII Bitmap fonts to FONTS: directory [Y/N]? Y"
IF NOT warn

   FAILAT 21
   ECHO "*N     Copying Bitmap fonts to FONTS:"
   COPY PSInstUtil:fonts FONTS: ALL QUIET
   IF error
      ECHO "*N      Not enough room on the FONTS: directory*N"
   ENDIF
   FAILAT 10

ELSE

   INSTUTIL ask -dy "Copy PageSetterII Bitmap fonts to {dest}PageSetterII/Fonts [Y/N]? Y"
   IF NOT warn

      ECHO "*N     Copying Bitmap fonts to {dest}PageSetterII/Fonts:"
      IF NOT EXISTS {dest}PageSetterII/Fonts
	 MAKEDIR {dest}PageSetterII/Fonts
      ENDIF
      COPY PSInstUtil:fonts {dest}PageSetterII/Fonts ALL QUIET

      ;
      ; Make a couple of IconX files to switch between PageSetterII and normal fonts.
      ;
      CD RAM:PSInstall
      ECHO >SelPS.1 "Echo *"Selecting PageSetterII fonts: *" NOLINE"
      ECHO >SelPS.2 "Assign FONTS: {dest}PageSetterII/Fonts"
      ECHO >Sel.Done "Echo *"Done.*""
      JOIN SelPS.1 SelPS.2 Sel.Done AS {dest}PageSetterII/PSFonts
      COPY PSInstUtil:misc/Icons/PSFonts.info {dest}PageSetterII/PSFonts.info

      ECHO >SelAm.1 "Echo *"Selecting Amiga fonts: *" NOLINE"
      ECHO >SelAm.2a "Assign FONTS: " NOLINE

      CD FONTS:
      CD >RAM:PSInstall/SelAm.2b
      CD RAM:PSInstall

      JOIN SelAm.1 SelAm.2a SelAm.2b Sel.Done AS {dest}PageSetterII/AmigaFonts
      COPY PSInstUtil:misc/Icons/AmigaFonts.info {dest}PageSetterII/AmigaFonts.info

   ENDIF

ENDIF	; copy FONTS

ECHO "*N"
INSTUTIL ask -dy "Copy Compugraphic Fonts to {dest}PageSetterII/CGFonts [Y/N]? Y"
IF NOT warn
   ; Copy the CGFonts stuff
   ECHO "*N     Copying Compugraphic Fonts ..."
   IF NOT EXISTS {dest}PageSetterII/CGFonts
      MAKEDIR {dest}PageSetterII/CGFonts
   ENDIF
   COPY PSInstUtil:CGFonts {dest}PageSetterII/CGFonts ALL QUIET

   ; Post-processing:
   ; - Nuke the Disk.info, which is not needed on the hard drive
   ; - Move CacheEdit up into the main PageSetterII drawer
   RENAME {dest}PageSetterII/CGFonts/CacheEdit {dest}PageSetterII/CacheEdit
   RENAME {dest}PageSetterII/CGFonts/CacheEdit.info {dest}PageSetterII/CacheEdit.info
   INSTUTIL reseticon {dest}PageSetterII/CacheEdit

ENDIF	; copy CG Fonts

ENDSKIP

;
; The Assign commands for startup-sequence
;
CD RAM:PSInstall
ECHO >AsnPS	   "ASSIGN PageSetterII:  {dest}PageSetterII"

If EXISTS {dest}PageSetterII/CGFonts
   ECHO >AsnCFonts "ASSIGN CGFonts:       {dest}PageSetterII/CGFonts"
ELSE
   COPY NIL: to AsnCFonts
ENDIF

IF EXISTS {dest}PageSetterII/CGFonts/CGCache
   ECHO >AsnCCache "ASSIGN CGCache:       {dest}PageSetterII/CGFonts/CGCache"
ELSE
   COPY NIL: to AsnCCache
ENDIF

JOIN AsnPS AsnCFonts AsnCCache as S:PageSetterII-Startup