; Install script for VideoControl

(set @abort-button	  "Installation Abbrechen")
(set @askoptions-help "Wählen Sie aus den zu Auswahl stehenden Optionen die die Sie möchten.")
(set @askchoice-help  "Wählen Sie aus den zu Auswahl stehenden Möglichkeiten eine aus.")
(set @askbool-help    "Sie müssen sich entscheiden.")
(set @asknumber-help  "Sie müssen eine Zahl eingeben.")
(set @askstring-help  "Sie müssen eine Zeichenkette eingeben.")
(set @askdisk-help 	  "Sie müssen eine Diskette einlegen.")
(set @askdir-help 	  "Sie müssen ein Verzeichnis auswählen.")
(set @askfile-help 	  "Sie müssen eine Datei auswählen.")
(set @copylib-help	  "Es sollen ein oder mehrere Dateien kopiert werden. Vor dem Kopieren wird überprüft ob sich nicht schon eine neuere Version dieser Datei im Zielverzeichnis befindet. Ist dem so, wird die zu instalierende ältere Version nicht installiert.")
(set @copyfiles-help  "Es sollen ein oder mehrere Dateien kopiert werden." )
(set @makedir-help	  "Es soll ein neues Verzeichnis angelegt werden.")

(set #copying-reqtools-help "\nDie ReqTools.library verleiht VideoControl diese gut aussehenden Auswahlfenster und ist essentiell für viele Programmfunktionen.")
(set #copying-gadtools-help "\nDie gadtoolsbox.library erleichtert VideoControl den Umgang mit den vielen Tastaturkürzeln und ist ebenfalls unverzichtbar für viele Programmfunktionen.")
(set #copying-nofrag-help   "\nDie nofrag.library wird von der gadtoolsbox.library benötigt.")
(set #copying-catalogs-help "\nIn diesem Verzeichnis befinden sich sogenannte Kataloge die es Programmen, wie zum Beispiel der mit diesem Produkt mitgelieferten reqtools.library, sich auf Ihre Muttersprache, also Deutsch, einzustellen.")


;=============================================================================
; make sure we are running under at least 2.04 ROM

(if (< (/ (getversion) 65536) 37)
(
    (abort "Sie benötigen mindestens Kickstart 2.04 im mittels dieses Scripts zu installieren !")
))


(set @default-dest
	(askdir
		(prompt "In welches Verzeichnis soll \"VideoControl\" installiert werden ?")
        (help @askdir-help)
        (default "SYS:Utilities")
	)
)

(set wantinstall
	(askoptions
		(prompt  "Welche Dateien möchten Sie installieren ?")

		(choices "Hauptprogramm"
				 "Demonstrations Datei"
				 "Demonstrations ARexx-Scripts"
				 "ReqTools-Voreinsteller"
		)

		(help 	 "Sie können sich hier entscheiden welche Dateien des \"VideoControl\" Programm-Pakets Sie installieren möchten.\n\n"
				 "Hauptprogramm - Das Programm \"VideoControl\".\n\n"
				 "Demonstrations Datei - Eine kleine Datei zum Schnelleinstieg in das Programm.\n\n"
				 "Demonstrations ARexx-Script - Ein kleines ARexx-Script welches die Benutzung einiger der in \"VideoControl\" integrierten ARexx-Befehle demonstriert.\n\n"
                 "ReqTools-Voreinsteller - Mit diesem eigenständigen Programm können Sie Ihre eigenen Vorstellungen für die Arbeits- und Erscheinungsweise, der mit diesem Produkt mitgelieferten, reqtools.library setzen."
		)
	)
)


(if (IN wantinstall 0)
	(copyfiles
		(source "VideoControl")
		(dest (tackon @default-dest "VideoControl"))
		(prompt "Kopiere Hauptprogramm ...")
		(infos)
		(noposition)
		(help @copyfiles-help)
	)
)


(if (IN wantinstall 1)
	(copyfiles
		(source "Demo.VC")
		(dest (tackon @default-dest "VideoControl"))
		(prompt "Kopiere Demo-Datei ...")
		(infos)
		(noposition)
		(help @copyfiles-help)
	)
)


(if (IN wantinstall 2)
	(copyfiles
		(source "ARexx")
		(dest (tackon (tackon @default-dest "VideoControl") "ARexx"))
		(infos)
		(noposition)
		(all)
		(help @copylib-help)
	)
)

(if (IN wantinstall 3)
	(copylib
		(prompt "Installiere den ReqTools-Voreinsteller ...")
		(source "Prefs/ReqTools")
		(confirm)
		(infos)
		(noposition)
		(help @copyfiles-help)
		(dest "SYS:Prefs")
	)
)


(set LocaleVer (/ (getversion "LIBS:locale.library") 65536))

(if (>= LocaleVer 38)
(
(copyfiles
	(prompt "Kopiere Kataloge nach LOCALE:Catalogs...")
   	(help #copying-catalogs-help)
   	(source "Catalogs/Deutsch")
   	(dest "LOCALE:Catalogs")
   	(pattern "#?")
   	(confirm)
    )
))

(copylib
	(prompt "Kopiere reqtools.library nach Libs: ...")
	(help #copying-reqtools-help)
	(source "libs/reqtools.library")
	(dest "Libs:")
	(confirm)
)

(copylib
	(prompt "Kopiere gadtoolsbox.library nach Libs: ...")
	(help #copying-gadtools-help)
	(source "libs/gadtoolsbox.library")
	(dest "Libs:")
	(confirm)
)

(copylib
	(prompt "Kopiere nofrag.library nach Libs: ...")
	(help #copying-nofrag-help)
	(source "libs/nofrag.library")
	(dest "Libs:")
	(confirm)
)