; Install script for JV1080 (Workbench 2.0+)
; (c) Copyright 1998 Jon Rocatis

(set ppdir "")

(set @app-name "JV-1080")

;=============================================================================
; make sure we are running under a 2.04 ROM

(if (< (/ (getversion) 65536) 37)
(
    (abort #bad-kick)
))

;=============================================================================
; which language should be used?

(set #bad-kick "You must be using Kickstart 2.04 to install using this script!")

(set #where-apache "Where have you Apache installed?")

(set #install-msg (cat
                 "\nRoland JV-1080 PlugIn installation script.\n"
                 "This script installs the\nApache JV-1080 PlugIn\non your Amiga.\n\n"
                 "You MUST have Apache installed!\n\n"
                 "Read the Roland.JV1080 AmigaGuide for more\n"
                 "information on the distribution.\n\n"
                 "Roland JV-1080 PlugIn © 1998 Jon Rocatis\n"
                 "All Rights Reserved."
                )
)

;=============================================================================

(message #install-msg)

(set ppdestdir
	(tackon
		(askdir
			(prompt #where-apache)
			(help @askdir-help)
			(default @default-dest)
		)
		"PlugIns/Roland.JV1080"
	)
)

(set @default-dest ppdestdir)

;--- Copy all the files

(message ppdestdir)

(copyfiles
	(source ppdir)
	(dest ppdestdir)
	(pattern "~(install*)")
	(infos)
)	

;-- Use AmigaGuide for guide viewing if user is running KS2.0

(if (< (/ (getversion) 65536) 39)
(
        (tooltype
                (dest (tackon ppdestdir "Roland.JV1080.guide"))
                (setdefaulttool "SYS:Utilities/AmigaGuide")
        )
))