.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 RAM:PSInstall/Drawer.info {dest}PageSetterII.info
ENDIF

;COPY PSInstUtil:Misc/Icons/AmigaFonts.info RAM:PSInstall
;COPY PSInstUtil:Misc/Icons/PSFonts.info RAM:PSInstall
;COPY PSInstUtil:Misc/Icons/PS2Assigns.info RAM:PSInstall

;
; Install the program itself.
;
ECHO "*N"
INSTUTIL ask -dy "Install the PageSetterII program [Y/N]? Y"
IF NOT WARN
   EXECUTE RAM:PSInstall/DiskMount PageSetterII 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

   COPY PSInstPgm:MakeMetric {dest}PageSetterII

ENDIF


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

   EXECUTE RAM:PSInstall/DiskMount PageSetterII PageSetterII: PSInstPgm:

   IF NOT EXISTS {dest}PageSetterII/NewsLetter
      MAKEDIR {dest}PageSetterII/NewsLetter
   ENDIF
   COPY PSInstPgm:NewsLetter {dest}PageSetterII/NewsLetter ALL QUIET
   COPY PSInstPgm: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

   EXECUTE RAM:PSInstall/DiskMount PageSetterII PageSetterII: PSInstPgm:

   FAILAT 21
   ECHO "*N     Copying Bitmap fonts to FONTS:"
   COPY PSInstPgm: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

      EXECUTE RAM:PSInstall/DiskMount PageSetterII PageSetterII: PSInstPgm:

      ECHO "*N     Copying Bitmap fonts to {dest}PageSetterII/Fonts:"
      IF NOT EXISTS {dest}PageSetterII/Fonts
         MAKEDIR {dest}PageSetterII/Fonts
      ENDIF
      COPY PSInstPgm: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 RAM:PSInstall/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 RAM:PSInstall/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

   EXECUTE RAM:PSInstall/DiskMount PageSetterII PageSetterII: PSInstPgm:

   ; Copy the CGFonts stuff
   ECHO "*N     Copying Compugraphic Fonts ..."
   IF NOT EXISTS {dest}PageSetterII/CGFonts
      MAKEDIR {dest}PageSetterII/CGFonts
   ENDIF
   COPY PSInstPgm:CGFonts {dest}PageSetterII/CGFonts ALL QUIET
   COPY PSInstPgm:CacheEditII {dest}PageSetterII/CacheEditII
   COPY PSInstPgm:CacheEditII.info {dest}PageSetterII/CacheEditII.info
   INSTUTIL reseticon {dest}PageSetterII/CacheEditII

ENDIF   ; copy CG Fonts

ENDSKIP

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

IF EXISTS {dest}PageSetterII/NewsLetter/NewsLetter.Final
   ECHO >AsnPSUtil "ASSIGN PSUtil:        {dest}PageSetterII"
ELSE
   COPY NIL: to AsnPSUtil
ENDIF

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

IF EXISTS {dest}PageSetterII/CGFonts
        IF NOT EXISTS {dest}PageSetterII/CGFonts/CGCache
                MAKEDIR {dest}PageSetterII/CGFonts/CGCache
        ENDIF
ENDIF

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

JOIN AsnPS AsnPSUtil AsnCFonts AsnCCache as S:PageSetterII-Startup
COPY s:PageSetterII-Startup {dest}PageSetterII/PS2Assigns
COPY RAM:PSInstall/PS2Assigns.info {dest}PageSetterII/PS2Assigns.info
INSTUTIL reseticon {dest}PageSetterII/PS2Assigns