; A1230  Turbo+  Performance  Series II Install Script
; Version 1.01
; By Gary Nush ----- 08 September 1993
; Written for use with Commodore's Installer.

(set instldsk "GVP.Install:")

; ========================
; If the user has booted from this floppy, we need to find out
; where the usual SYS: partition is.  Try a few looks about the system...
; Currently looks for WB_3.x:, System3.0:, dh0:, or Workbench3.0:.  Ask
; user if we can't figure out where s/he boots from, and/or for confirmation.

(set target (getassign "wb_3.x" 'd'))             ; Device-only check.
(if (= target "")
    (set target (getassign "System3.0" 'v')))     ; VolumeName-only check.
(if (= target "")
    (set target (getassign "Workbench3.0" 'v')))  ; VolumeName-only check.
(if (= target "")
    (set target (getassign "dh0" 'd')))           ; Device-only check.
(if (= target "")
    (set target (getassign "System3.0")))         ; Logical assign check.
(if (= target "")
    (set target (getassign "dh0")))               ; Logical assign check.

; If we're at Wit's End: -- Welcome to Wit's End, population 1?
(if (= target "")
   (set target @default-dest)                     ; default destination
)

; Now, make absolutely, positively sure that we go to the right place.
(set target (askdir (prompt "Which partition do you usually boot from?\n"
                            "The required utilities should be installed there.")
                    (help @askdir-help)
                    (default target)))

; ====================
; This is where the installation occurs:
;

(copyfiles (source (tackon instldsk "GVP"))
           (dest (tackon target "Utilities/GVP"))
           (all)
           (infos)
           (confirm)
           (prompt "Shall I install the GVP support software?")
           (help "This software allows you to configure, control, "
                 "and test the A1230 Turbo+ Accelerator.\n\n"
                 @copyfiles-help))


(copyfiles (source (tackon instldsk "GVP/68030"))
           (dest (tackon target "WBStartup"))
           (pattern "GvpCpuCtrl_Proj#?")
           (infos)
           (confirm)
           (prompt "To improve system performance, 512K of RAM "
                   "can be set aside to hold a copy of Kickstart. "
                   "This will result in faster access to ROM routines "
                   "but will reduce the amount of free memory for "
                   "for other programs by 512K.  Choose PROCEED to "
                   "activate the Kickstart remapping or SKIP THIS "
                   "PART to continue on without remapping Kickstart.")
           (help "This will copy a file to the WBStartup drawer that "
                 "automatically executes GvpCpuCtrl to remap Kickstart "
                 "into system Fast RAM for faster access to routines "
                 "that are normally located in ROM.\n\n"
                 @copyfiles-help))

(set @default-dest target)