; *********************************
; * Install V1.0		  *
; *				  *
; * Indexeur install script	  *
; *				  *
; * (c) 1996 Christophe Nowak	  *
; *********************************

(set IndexeurBin	"Indexeur")
(set IndexeurFDoc       "Docs/français/Indexeur.guide")
(set IndexeurEDoc       "Docs/english/Indexeur.guide")
(set IndexeurFCat       "catalogs/français/indexeur.catalog")

; Default : English

(set default_lang 1)

(set #DirChoice		"Choose Place for Indexeur (No Directory created)")
(set #InstallProg	"Copying Indexeur...")
(set #InstallCat	"Copying Catalog File...")
(set #SelCat		"Choose Language")
(set #InstallDoc	"Copying Help File...")
(set #SelDoc            "Choose Help File")
(set #EndMsg
(cat	"Installation Successfull\n"
        "Indexeur 1.0 Copyright Nowak Christophe in 1996\n"
        "This is a MUI Application\nMui is Copyright Stefan Stuntz\n"
	"Hope that Indexeur will help you"))

;*****************************************
; French Strings

(if (= @language "français")
(
(set default_lang 2)

(set #DirChoice		"Choisissez le répertoire Cible (Aucune création de répertoire)")
(set #InstallProg	"Copie d'Indexeur...")
(set #InstallCat	"Copie du Catalogue...")
(set #SelCat		"Sélectionner les catalogues")
(set #InstallDoc	"Copie de la documentation...")
(set #SelDoc		"Sélectionner la documentation")
(set #EndMsg
(cat	"Installation Réussie\n"
        "indexeur 1.0 est Copyright 1996 Nowak Christophe\n"
        "Ceci est une application MUI\nMui est Copyright Stefan Stuntz\n"
	"J'espére que ce programme vous sera utile"))
))


(set IndexDir (askdir
		(Prompt #DirChoice)
		(help @askdir-help)
		(default "SYS:")
))

(copyfiles
	(prompt #InstallProg)
	(help 	@copyfiles-help)
	(source IndexeurBin)
	(dest 	IndexDir)
	(infos)
)

(if (exists "LOCALE:")
(
	(set tools
		(askoptions
			(prompt #SelCat)
			(help @askoptions-help)
			(default default_lang)
			(choices "English" "Français")
		)
	)

	(if (in tools 1)
		(copyfiles
			(prompt #InstallCat)
			(help	@copyfiles-help)
			(source IndexeurFCat)
			(dest 	"LOCALE:Catalogs/français")
			(confirm)
		)
	)
))

(set tools
	(askoptions
		(prompt #SelDoc)
		(help @askoptions-help)
		(default default_lang)
		(choices "English" "Français")
	)
)

(if (in tools 0)
	(copyfiles
		(prompt #InstallDoc)
		(help	@copyfiles-help)
		(source IndexeurEDoc)
		(dest 	Indexdir)
		(confirm)
                (infos)
	)
)

(if (in tools 1)
	(copyfiles
		(prompt #InstallDoc)
		(help	@copyfiles-help)
		(source IndexeurFDoc)
		(dest 	IndexDir)
		(confirm)
                (infos)
	)
)

(message #EndMsg)
(exit (quiet))