
; == English strings =========================================================

(set guide-language 0)
(set default-lang 4)

(set #bad-kick "You must be using Kickstart 2.04+ to install ReqChange")

(set #install-msg
	(cat
		"\nWelcome to the ReqChange installation utility.\n\n"
		"This program lets you install ReqChange on your Amiga.\n\n"
		"See the ReadMe file for information on the distribution of "
		"ReqChange.\n\n"
		"ReqChange © 1992-1995  Magnus Holmgren.\n"
		"All rights reserved."
	)
)

(set #copy-reqchange-library "Copying reqchange.library to Libs:...")

(set #copy-reqtools-library "Copying reqtools.library to Libs:...")

(set #copy-reqchange-prefs "Copying ReqChange preferences editor...")

(set #copy-reqtools-prefs "Copying ReqTools preferences editor...")

(set #convert-guide "Converting ReqChange.guide...")

(set #copy-reqchange-guide "Copying ReqChange.guide...")

(set #copy-reqchange-pics "Copying window preview pictures...")

(set #copy-startrc "Copying StartRC...")

(set #copy-font "Copying ' no font' to Fonts:...")

(set #install-parts
	(cat
		"Please select the different parts of ReqChange that you "
		"would like to install:"
	)
)

(set #item-reqchange-prefs "ReqChange preferences")

(set #item-reqtools-prefs "ReqTools preferences")

(set #item-no-font "' no font'")

(set #item-reqchange-guide "ReqChange.guide")

(set #item-reqchange-pics "Window previews")

(set #item-magicwb "MagicWB icons")

(set #item-translations "Translations")

(set #install-parts-help
	(cat
		"    Here you select the different parts of ReqChange that you would "
		"like to have installed. After that, you select the details about "
		"about the installation, such as where the different parts should be "
		"installed, or which languages you would like to have installed (if "
		"any). You may choose to install the following items:\n\n"
		"    ReqChange preferences: With this program you can adjust how "
		"ReqChange should behave. You should definitively install this "
		"program.\n\n"
		"    ReqTools preferences: With this program you can adjust how "
		"the ReqTools requesters should behave. Not as important as the "
		"ReqChange preferences editor, but you should install this program "
		"as well. If you already have ReqTools installed, this program will "
		"only be copied if the included version is newer than the one "
		"currently installed.\n\n"
		"    ' no font': This is a special 'empty' font that is needed for "
		"ReqChange to be able to do a full emulation of the Asl font "
		"requester. When this font is selected, ReqChange will act as if "
		"the user had cleared the font name field and selected 'Ok'. This "
		"will return an empty font name to the program, or, if you prefer, "
		"no font. It is recommended that you install this font for "
		"ReqChange to behave as good as possible, although it isn't that "
		"important.\n\n"
		"    ReqChange.guide: The AmigaGuide® file that contains the "
		"documentation to ReqChange. This exaplains all those details "
		"about the program that otherwise might be hard to find out, "
		"so you should really install this file. Also, if you place "
		"it in the same directory as the prefs editor, or in the AmigaGuide "
		"search path (as defined in the AmigaGuide/Path environment "
		"variable), you'll have online help available in the preferences "
		"editor (assuming AmigaGuide is properly installed).\n\n"
		"    Window previews: Pictures showing how the ReqChange "
		"preferences editor windows can look. If you have OS 3.0 or higher "
		"then you can access these pictures from within the "
		"ReqChange.guide file. Otherwise you can use a simple picture "
		"viewer to view them.\n\n"
		"    MagicWB-icons: Icons for the programs and the documentation "
		"in the so called MagicWB-look. If you don't select this, you will "
		"either get normal looking icons, or the NewIcons version, "
		"if NewIcons is installed.\n\n"
		"    Translations: If you have OS 2.1 or higher, and you would "
		"like ReqChange and ReqTools to operate in another language than "
		"the builtin English, then a couple of additional files need to "
		"be installed. Note that OS 2.1+ must be properly installed, for "
		"the Installer to install these files.\n\n"
		"    The defaults here have selected with care, based on your "
		"current system configuration. Usually you shouldn't need to "
		"change them."
	)
)

; This is used for the intermediate users.
(set #where-prefs
	(cat
		"Where would you like to install the ReqChange and ReqTools "
		"preferences editors?"
	)
)

; And these two are used for the expert user
(set #where-reqchange-prefs
	(cat
		"Where would you like to install the ReqChange preferences "
		"editor?"
	)
)

(set #where-reqtools-prefs
	(cat
		"Where would you like to install the ReqTools preferences "
		"editor?"
	)
)

(set #help-where-prefs
	(cat
		"    The preferences programs allows you to modify the behaviour "
		"of ReqChange and ReqTools. The reccomended place to install these "
		"programs is in Sys:Prefs, as there already are several other "
		"preferences editors in this drawer."
	)
)

(set #where-startrc "Where would you like to install the StartRC program?")

(set #help-where-startrc
	(cat
		"    StartRC is a small program, which is used to start and stop "
		"ReqChange. If you place it in Sys:WBStartup, it will "
		"automatically start ReqChange each boot."
	)
)

(set #guide-language "Which langauge would you like to have the documentation in?")

(set #where-reqchange-guide "Where would you like to install ReqChange.guide?")

(set #help-guide-language
	(cat
		"The ReqChange documentation is currently available in two "
		"different languages, English and Swedish. Simply select the "
		"language you prefer."
	)
)

(set #help-where-reqchange-guide
	(cat
		"    ReqChange.guide is the manual for ReqChange in the special "
		"AmigaGuide® hypertext format. If you install the ReqChange.guide "
		"file either in the same drawer as the ReqChange preferences "
		"program, or in any of the drawers specified in the AmigaGuide "
		"search path (specified in the AmigaGuide/Path environment "
		"variable), then you will be able to get online help in the "
		"preferences editor (assuming that AmigaGuide is properly "
		"installed on your system)."
	)
)

(set #pic-language "Which language should the pictures be in?")

(set #where-reqchange-pics
	"Where would you like to install the window preview pictures?"
)

(set #help-where-reqchange-pics
	(cat
		"    These pictures can be used by the online help, if you have OS "
		"3.0 or higher. In order for the online help to be able to find "
		"these pictures, they must be located in the drawer called "
		"Pictures, located in the same drawer as the ReqChange.guide file. "
		"This Pictures drawer can also be located in any of the drawers "
		"specified in the AmigaGuide® search path (specified in the "
		"environment variable AmigaGuide/Path).\n"
		"    Please note that you select where the drawer Pictures should "
		"be located.\n"
		"    If you don't have OS 3.0 or higher, then you can view these "
		"preview pictures with a simple picture viewer."
	)
)

(set #which-language "\nWhich languages should be installed?")

(set #which-language-help
	(cat
		"    The Amiga can be operated in many different languages. If you "
		"want ReqChange to use the same language as the Amiga Workbench "
		"then a couple of catalog files must be copied to your harddisk "
		"for each language supported.\n"
		"    To reduce the amount of space consumed by the language files, "
		"you can select to have only the files of specific languages "
		"copied.\n"
		"    Simply check the boxes of the languages you wish to have have "
		"available on your system.\n"
		"    Please note that there are not language files for all listed "
		"languages."
	)
)

(set #help-install-font
	(cat
		"    The font ' no font' is a small font that ReqChange needs in "
		"order to be able to fully emulate the ASL font requester. When "
		"this font is selected, then ReqChange will act as if the user had "
		"cleared the font name field in the normal ASL font requester, and "
		"then selected Ok. This will return an empty font name field to "
		"the program, or, if you prefer, no font."
	)
)

(set #install-end
	(cat
		"\n\n"
		"Please have a look at the documentation to learn about how to use "
		"and configure ReqChange.\n\n"
		"Finally: Remember that ReqChange is shareware!\n\n"
		"Enjoy!"
	)
)

; == Danish strings =========================================================

(if (= @language "dansk")
  (
    (set default-lang 2)

    (set #bad-kick
      "Du skal mindst have kickstart 2.04+ for at kunne installere ReqChange"
    )

    (set #install-msg
      (cat
	"\nVelkommen til Installer.\n\nDette program tillader dig at "
	"installere ReqChange på din Amiga.\n\nSe filen ReadMe for information "
	"om hvordan ReqChange distribueres.\n\nReqChange © 1992-1995  Magnus "
	"Holmgren.\nAlle rettigheder reserveret."
      )
    )

    (set #copy-reqchange-library
	"Kopierer reqchange.library til LIBS:..."
    )

    (set #copy-reqtools-library
	"Kopierer reqtools.library til LIBS:..."
    )

    (set #copy-reqchange-prefs
	"Kopierer ReqChange's præferenceeditor..."
    )

    (set #copy-reqtools-prefs
	"Kopierer ReqTools' præferenceeditor..."
    )

    (set #copy-reqchange-guide
	"Kopierer ReqChange.guide..."
    )

    (set #copy-startrc
	"Kopierer StartRC..."
    )

    (set #where-prefs "Hvor ønsker du at placere præferenceeditorerne?")

    (set #help-where-prefs
      (cat
	"Præferenceeditorerne lader dig ændre den måde hvormed ReqChange "
	"og ReqTools opfører sig. Det er normalt at placere denne type "
	"programmer i SYS:Prefs."
      )
    )

    (set #where-reqchange-guide "Hvor ønsker du at installere ReqChange.guide?")

    (set #help-where-reqchange-guide
      (cat
	"ReqChange.guide er manualen til ReqChange i det specielle "
	"AmigaGuide hypertekst format. Hvis du placerer ReqChange i "
	"samme skuffe som præferenceeditoren, eller i en af de skuffer "
	"der er angivet i environment variablen AmigaGuide/Path, så kan "
	"du få kontekst sensitiv onlinehjælp direkte i editoren, da "
	"AmigaGuide® angiveligt allerede er installeret på din Amiga."
      )
    )

    (set #where-startrc "Hvor ønsker du at installere StartRC?")

    (set #help-where-startrc
      (cat
	"StartRC er et lille program som starter og afslutter ReqChange. "
	"Hvis du placerer det i SYS:WBStartup, så bliver ReqChange "
	"automatisk installeret hver gang systemet starter op."
      )
    )

    (set #which-language "\nHvilke sprog ønsker du at installere?")

    (set #which-language-help
      (cat
	"  Amigaen kan arbejde i adskillige sprog. Hvis du ønsker at ReqChange "
	"skal anvende samme sprog som din Workbench, så skal en såkaldt "
	"katalogfil for det pågældende sprog kopieres til din systemdisk.\n"
	"  For at minimere diskforbruget for disse katalogfiler kan du vælge "
	"kun at kopiere filer i udvalgte sprog.\n"
	"  Obs: Der findes ikke sprogfiler for alle listede sprog."
      )
    )

    (set #help-install-font
      (cat
	"' no font' er en lille skrifttype som ReqChange har brug for "
	"for fuldt ud at kunne emulere ASL skrifttype requesteren. Når "
	"denne type er valgt vil ReqChange opføre sig som havde brugeren "
	"slettet skrifttype navnet i den normale ASL skrifttype requester, "
	"og valgt OK. Dette vil returnere et tomt skrifttype navn til "
	"programmet, og, om du vil, intet font."
      )
    )
  )
)


; == German strings =========================================================

(if (= @language "deutsch")
	(
		(set guide-language 0)
		(set default-lang 1)

		(set #bad-kick "Sie benötigen mindestens Kickstart 2.04 für ReqChange")

		(set #install-msg
			(cat
				"\nHerzlich Willkommen zum ReqChange-Installationsprogramm.\n"
				"Mit diesem Programm können Sie ReqChange auf Ihrem Amiga "
				"installieren.\n\n"
				"Bitte lesen Sie die ReadMe-Datei für Informationen über die "
				"Weitergabe von ReqChange.\n\n"
				"ReqChange © 1992-1995  Magnus Holmgren.\n"
				"Alle Rechte vorbehalten."
			)
		)

		(set #copy-reqchange-library "Ich kopiere reqchange.library nach Libs:...")

		(set #copy-reqtools-library "Ich kopiere reqtools.library nach Libs:...")

		(set #copy-reqchange-prefs "Ich kopiere den ReqChange-Voreinsteller...")

		(set #copy-reqtools-prefs "Ich kopiere den ReqTools-Voreinsteller...")

		(set #convert-guide "Ich konvertiere ReqChange.guide...")

		(set #copy-reqchange-guide "Ich kopiere ReqChange.guide...")

		(set #copy-reqchange-pics "Ich kopiere Fenster-Vorschaubilder...")

		(set #copy-startrc "Ich kopiere StartRC...")

		(set #copy-font "Ich kopiere ' no font' nach Fonts:...")

		(set #install-parts
			(cat
				"Bitte wählen Sie die Teile von ReqChange aus, die Sie "
				"installieren möchten:"
			)
		)

		(set #item-reqchange-prefs "ReqChange-Voreinsteller")

		(set #item-reqtools-prefs "ReqTools-Voreinsteller")

		(set #item-no-font "' no font'")

		(set #item-reqchange-guide "ReqChange.guide")

		(set #item-reqchange-pics "Fenster-Vorschau")

		(set #item-magicwb "MagicWB-Piktogramme")

		(set #item-translations "Übersetzungen")

		(set #install-parts-help
			(cat
				"    Hier können Sie die Teile von ReqChange auswählen, die Sie "
				"installieren möchten. Danach nehmen Sie Feineinstellungen vor "
				"(z.B. das Auswählen der Verzeichnisse, in die die einzelnen Teile "
				"installiert werden sollen, oder welche Sprachen Sie installieren "
				"möchten). Sie können folgende Teile installieren:\n\n"
				"    ReqChange-Voreinsteller: Damit können Sie das Verhalten von "
				"ReqChange ändern. Sie sollten dieses Programm aus jeden Fall "
				"installieren.\n\n"
				"    ReqTools-Voreinsteller: Hiermit stellen Sie das Verhalten "
				"von ReqTools-Requestern ein. Weniger wichtig als der ReqChange-Voreinsteller, "
				"aber Sie sollten auch dieses Programm installieren. Wenn ReqTools "
				"bereits installiert ist, wird dieses Programm nurkopiert, wenn "
				"Sie noch eine ältere Version installiert haben.\n\n"
				"    ' no font': Die ist ein spezieller 'leerer'Zeichensatz, der "
				"für eine vollständige Emulation des ASL-Zeichensatzrequesters benötigt "
				"wird. Wenn Sie diesen Zeichensatz auswählen, wird ReqChange sich so "
				"verhalten, als hätten Sie in einem ASL-Requester überhaupt keinen "
				"Zeichensatz ausgewählt. Für eine gute Emulation durch ReqChange sollten "
				"Sie diesen Zeichensatz installieren, aber sie können auch ohne ihn "
				"auskommen.\n\n"
				"    ReqChange.guide: Die AmigaGuide®-Datei mit der Anleitung für "
				"ReqChange. Diese erklärt alle Einzelheiten über das Programm, die "
				"sonst schwierig herauszufinden sind. Sie sollten sie installieren. "
				"Wenn sie im selben Verzeichnis wie der Voreinsteller oder im AmigaGuide-Suchpfad "
				"(in der Variable AmigaGuide/Path definiert) liegt, steht ihnen im "
				"Voreinsteller Online-Hilfe zur Verfügung (unter der Voraussetzung, daß "
				"Sie AmigaGuide korrekt installiert haben).\n\n"
				"    Fenster-Vorschau: Bilder, die das Aussehen des ReqChange-Voreinstellers "
				"zeigen. Unter OS3.0 oder höher können Sie diese aus dem ReqChange.guide "
				"heraus ansehen. Ansonsten benötigen Sie ein Bildanzeigeprogramm dafür.\n\n"
				"    MagicWB-Piktogramme: Piktogramme für die Programme und die Anleitung "
				"im sogenannten MagicWB-Look. Wenn Sie diese nicht installieren lassen, "
				"bekommen Sie entweder die Standard-Icons oder NewIcons (wenn NewIcons "
				"installiert ist).\n\n"
				"    Übersetzungen: Ab OS2.1 können Sie ReqChange in einer anderen Sprache "
				"als Englisch (eingebaut) betreiben. Dafür müssen einige zusätzliche Dateien "
				"installiert werden. Der Installer kann diese Dateien nur installieren, wenn "
				"Sie unter OS2.1 oder höher arbeiten.\n\n"
				"    Die Vorgaben wurden anhand Ihrer Systemeinstellungen gewählt. "
				"Normalerweise müssen Sie diese nicht ändern."
			)
		)

		; This is used for the intermediate users.
		(set #where-prefs "Wohin möchten Sie die ReqChange- und ReqTools-Voreinsteller installieren?")

		; And these two are used for the expert user
		(set #where-reqchange-prefs "Wohin möchten Sie den ReqChange-Voreinsteller installieren?")

		(set #where-reqtools-prefs "Wohin möchten Sie den ReqTools-Voreinsteller installieren?")

		(set #help-where-prefs
			(cat
				"    Mit den Voreinstellern können Sie das Verhalten von "
				"ReqChange und ReqTools an Ihre Wünsche anpassen. Sie sollten "
				"die Voreinsteller in Sys:Prefs installieren, weil sich dort "
				"schon die systemeigenen Einstellungsprogramme befinden."
			)
		)

		(set #where-startrc "Wo wollen Sie StartRC installieren?")

		(set #help-where-startrc
			(cat
				"    StartRC ist ein kleines Programm, mit dem Sie ReqChange "
				"initialisieren und entfernen können. Wenn Sie es in "
				"Sys:WBStartup installieren, wird ReqChange jedes Mal beim "
				"Hochfahren des Systems automatisch gestartet."
			)
		)

		(set #guide-language "In welcher Sprache wünschen Sie die Anleitung?")

		(set #help-guide-language
			(cat
				"Die ReqChange-Anleitung ist z.Z. in zwei Sprachen, Englisch "
				"und Schwedisch, verfügbar. Bitte wählen Sie ihre bevorzugte "
				"Sprache aus."
			)
		)

		(set #where-reqchange-guide
			"Wo wollen Sie ReqChange.guide installieren?"
		)

		(set #help-where-reqchange-guide
			(cat
				"    ReqChange.guide ist die Anleitung für ReqChange im "
				"AmigaGuide®-Hypertextformat. Wenn Sie ReqChange.guide entweder "
				"im gleichen Verzeichnis wie den Voreinsteller oder in einem Verzeichnis "
				"aus dem AmigaGuide®-Suchpfad (in der Umgebungsvariable "
				"AmigaGuide/Path angegeben) installieren, können Sie (wenn "
				"AmigaGuide richtig installiert ist) im Voreinsteller die "
				"Online-Hilfe benutzen."
			)
		)

		(set #pic-language "In welcher Sprache wünschen Sie die Bilder?")

		(set #where-reqchange-pics
			"Wohin möchten Sie die Fenster-Vorschaubilder installieren?"
		)

		(set #help-where-reqchange-pics
			(cat
				"    Wenn Sie OS3.0 oder höher haben, können diese Bilder von der "
				"Online-Hilfe benutzt werden. Dazu müssen Sie im Verzeichnis 'Pictures' "
				"liegen, das sich im selben Verzeichnis wie ReqChange.guide befinden muß. "
				"Dieses Bild-Verzeichnis darf sich auch in einem Verzeichnis befinden, das "
				"im AmigaGuide®-Suchpfad (in der Umgebungsvariable AmigaGuide/Path) "
				"befindet.\n"
				"    Bitte beachten Sie, daß Sie hier auswählen, wohin das Verzeichnis "
				"'Pictures' installiert werden soll.\n"
				"    Wenn Sie nicht OS3.0 oder höher benutzen, können Sie diese Bilder "
				"einfach mit einem Bildanzeigeprogramm betrachten."
			)
		)

		(set #which-language "\nWelche Sprachen wollen Sie installieren?")

		(set #which-language-help
			(cat
				"    Der Amiga kann mit vielen verschiedenen Sprachen benutzt "
				"werden. Wenn ReqChange die selbe Sprache wie die Workbench "
				"benutzen soll, müssen Sie für jede unterstützte Sprache die "
				"Katalog-Datei installieren.\n"
				"    Um den benötigten Platz klein zu halten, haben Sie die "
				"Möglichkeit, nur einzelne Sprachen zu installieren.\n"
				"    Haken Sie bitte die Sprachen, die Sie installieren möchten, "
				"ab.\n"
				"    Nicht für alle aufgezählten Sprachen existieren auch "
				"tatsächlich Katalog-Dateien."
			)
		)

		(set #help-install-font
			(cat
				"    Der kleine Zeichensatz 'no font' wird von ReqChange "
				"benötigt, um den ASL-Zeichensatzrequester vollständig "
				"nachbilden zu können. Wenn dieser Zeichensatz angewählt wird, "
				"verhält sich ReqChange so, als hätte der Benutzer das "
				"Zeichensatz-Eingabefeld in einem ASL-Requester geleert und "
				"dann den Requester bestätigt. Dadurch wird ein leerer "
				"Zeichensatzname an das Programm übergeben, oder - wenn Ihnen "
				"das lieber ist - überhaupt kein Zeichensatz ('no font')."
			)
		)

		(set #install-end
			(cat
				"\n\n"
				"Bitte werfen Sie einen Blick in die Anleitung, um sich über die Benutzung "
				"und Konfiguration von ReqChange zu informieren.\n\n"
				"Und schließlich: Denken Sie daran, daß ReqChange Shareware ist!\n\n"
				"Viel Spaß!"
			)
		)

  	)
)

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

(if (= @language "español")
  (
    (set default-lang 8)
  )
)


; == French strings =========================================================

(if (= @language "français")
  (
    (set default-lang 16)

    (set #bad-kick "Vous devez utiliser le Kickstart 2.04+ pour ReqChange")

    (set #install-msg
      (cat
        "\nBienvenue dans le systême d'installation de ReqChange.\n\n"
        "Ce programme vous permet d'installer ReqChange sur votre Amiga.\n\n"
        "Voyez le fichier ReadMe pour des informations sur la distribution "
        "de ReqChange.\n\n"
        "ReqChange © 1992-1994  Magnus Holmgren.\n"
        "Tous droits réservés."
      )
    )

    (set #copy-reqchange-library "Copie de la reqchange.library dans Libs:...")

    (set #copy-reqtools-library "Copie de la reqtools.library dans Libs:...")

    (set #copy-reqchange-prefs "Copie de l'éditeur de préférences de ReqChange...")

    (set #copy-reqtools-prefs "Copie de l'éditeur de préférences de ReqTools...")

    (set #copy-reqchange-guide "Copie de ReqChange.guide...")

    (set #copy-startrc "Copie de StartRC...")

    (set #copy-font "Copie de la Fonte ' no font' dans Fonts:...")

    (set #where-prefs
      (cat
        "Où souhaitez-vous installer les éditeurs de préférences pour "
        "ReqChange et ReqTools ?"
      )
    )

    (set #help-where-prefs
      (cat
        "    Les programmes de préférences vous permettent de modifier "
        "le comportement de ReqChange et ReqTools. Une place recommandée "
        "pour installer ces programmes est dans Sys:Prefs, car il y a "
        "déjà d'autres éditeurs de préférences dans ce tiroir. "
      )
    )

    (set #where-reqchange-guide
      "Où souhaitez-vous installer ReqChange.guide?"
    )

    (set #help-where-reqchange-guide
      (cat
        "    ReqChange.guide est le manuel dans le format special "
        "HyperTexte AmigaGuide®. Si vous installez ReqChange.guide dans "
        "le même tiroir que l'éditeur de préférences ReqChange, où "
        "n'importe quel tiroir spécifié dans la variable d'environnement "
        "AmigaGuide/Path, vous pourrer bénéficier une aide sensible au "
        "contexte dans l'éditeur de préférences car AmigaGuide® est "
        "installé sur votre Amiga."
      )
    )

    (set #where-startrc "Où souhaitez-vous installer le programme StartRC?")

    (set #help-where-startrc
      (cat
        "    StartRC est un petit programme utilisé pour démarrer "
        "et stopper ReqChange. Si vous le placez dans Sys:WBStartup, "
        "il démarrera à chaque boot de votre machine."
      )
    )

    (set #which-language "\nQuelles langues doivent être installées?")

    (set #which-language-help
      (cat
        "    L'Amiga peut être utilisé dans différentes langues. Si vous "
        "voulez que ReqChange utilise la même langue que votre Workbench, "
        "un catalogue doit alors être copié dans votre disque dur pour "
        "chaque langue supportée.\n"
        "    Pour réduire la place consommée par les fichiers de langue, "
        "vous pouvez ne copier que des fichiers de langue spécifique. "
        "    Cochez simplement les langues que vous souhaitez avoir "
        "disponibles dans votre systême.\n"
        "    Notez qu'il n'y a pas de autant de fichiers de langues "
        "disponibles que la liste le propose."
      )
    )

    (set #help-install-font
      (cat
        "    La Fonte ' no font' est un petite Fonte dont ReqChange a "
        "besoin pour émuler complètement la requête de Fontes ASL. Quand "
        "cette Fonte est sélectionnée, ReqChange réagira comme si "
        "l'utilisateur avait éffacé le nom de la Fonte dans la requête ASL "
        "normale et sélectionné Ok. Cela retournera un champs de Fonte vide "
        "au programme, ou, si vous préférez, pas de Fonte."
      )
    )
  )
)


; == Italian strings =========================================================

(if (= @language "italiano")
	(
		(set default-lang 32)

		(set #bad-kick "Per installare ReqChange è necessario utilizzare il Kickstart 2.04+")

		(set #install-msg
			(cat
				"\nBenvenuti nel programma di installazione di ReqChange.\n\n"
				"Questo programma vi permette di installare ReqChange nel vostro Amiga.\n\n"
				"Leggete il file ReadMe per avere informazioni sulla distribuzione di "
				"ReqChange.\n\n"
				"ReqChange © 1992-1994  Magnus Holmgren.\n"
				"Tutti i diritti riservati."
			)
		)

		(set #copy-reqchange-library "Copia di reqchange.library in Libs:...")

		(set #copy-reqtools-library "Copia di reqtools.library in Libs:...")

		(set #copy-reqchange-prefs "Copia dell'editor di preferenze ReqChange...")

		(set #copy-reqtools-prefs "Copia dell'editor di preferenze ReqTools...")

		(set #convert-guide "Conversione di ReqChange.guide...")

		(set #copy-reqchange-guide "Copia di ReqChange.guide...")

		(set #copy-reqchange-pics "Copia delle immagini di anteprima...")

		(set #copy-startrc "Copia di StartRC...")

		(set #copy-font "Copia di ' no font' in Fonts:...")

		(set #install-parts
			(cat
				"Per favore seleziona le parti di ReqChange che "
				"vorresti installare:"
			)
		)

		(set #item-reqchange-prefs "Preferenze ReqChange")

		(set #item-reqtools-prefs "Preferenze ReqTools")

		(set #item-no-font "' no font'")

		(set #item-reqchange-guide "ReqChange.guide")

		(set #item-reqchange-pics "Anteprime")

		(set #item-magicwb "Icone MagicWB")

		(set #item-translations "Traduzioni")

		(set #install-parts-help
			(cat
				"    Puoi selezionare le diverse parti di ReqChange che vorresti "
				"installare. Puoi inoltre modificare i parametri di installazione "
				"come, ad esempio, la directory in cui le varie parti di ReqChange "
				"devono essere installate, oppure quali lingue vuoi che siano "
				"supportate. Puoi scegliere di installare le seguenti parti:\n\n"
				"    Preferenze ReqChange: Con questo programma puoi modificare il "
				"comportamento di ReqChange. Dovresti installarlo sempre.\n\n"
				"    Preferenze ReqTools: Con questo programma puoi modificare il "
				"comportamento dei requester di ReqTools. Non è così importante come "
				"l'editor di preferenze per ReqChange, ma dovresti installarlo "
				"comunque. Se già hai installato ReqTools, questo programma verrà "
				"copiato solamente se la sua versione è più nuova rispetto a quella "
				"attualmente installata sul tuo sistema.\n\n"
				"    ' no font': Questo è uno speciale font 'vuoto' che è necessario "
				"per emulare con ReqChange tutte le funzionalità del requester per "
				"font di Asl. Quando questo font viene selezionato, ReqChange si "
				"comporterà come se l'utente avesse cancellato il gadget del nome del "
				"font e avesse selezionato 'Ok'. Ciò farà in modo che il requester "
				"ritorni al programma un nome di font vuoto o, se preferisci, nessun "
				"font. Ti raccomando di installare questo font in modo da rendere quanto "
				"migliore possibile il comportamento di ReqChange, anche se la presenza "
				"di questo font non è poi così importante.\n\n"
				"    ReqChange.guide: Il file in formato AmigaGuide® che contiene la "
				"documentazione di ReqChange. Ci trovi tutti quei dettagli sul programma "
				"che sarebbero altrimenti difficili da scovare, quindi dovresti installare "
				"questo file. Inoltre, se lo installi nella stessa directory dell'editor di "
				"preferenze, o in una directory inserita nel percorso di ricerca dei file "
				"AmigaGuide (definito dalla variabile di ambiente AmigaGuide/Path) lo stesso "
				"file potrà fornire un aiuto in linea anche per l'editor di preferenze "
				"(ammesso che AmigaGuide sia stato installato correttamente).\n\n"
				"    Anteprime: Sono immagini che mostrano come potrebbero presentarsi le "
				"finestre dell'editor preferenze. Se disponi almeno della versione 3.0 del "
				"sistema operativo puoi visualizzare queste immagini direttamente all'interno "
				"del file ReqChange.guide; in caso contrario puoi utilizzare un semplice "
				"visualizzatore di immagini.\n\n"
				"    Icone MagicWB: Sono icone per i programmi e la documentazione disegnate "
				"in stile MagicWB. Se non selezioni questa opzione, verranno installate le "
				"icone normali oppure quelle in formato NewIcons, se quest ultimo è stato "
				"preventivamente installato.\n\n"
				"    Traduzioni: Se hai la versione di sistema operativo 2.1 o successiva, e "
				"vuoi che ReqChange e ReqTools operino in una lingua diversa dall'inglese, "
				"allora devono essere installati un paio di file aggiuntivi. Fai attenzione "
				"che la versione di sistema operativo che hai deve essere stata installata "
				"correttamente affinché l'Installer copi sul tuo sistema i file aggiuntivi.\n\n"
				"    I valori predefiniti sono stati scelti con cura basandosi sulla tua "
				"attuale configurazione di sistema. Normalmente non dovresti aver bisogno di "
				"cambiare nulla."
			)
		)

		; This is used for the intermediate users.
		(set #where-prefs
			(cat
				"Dove vorresti installare gli editor di preferenze per ReqChange "
				"e ReqTools?"
			)
		)

		; And these two are used for the expert user
		(set #where-reqchange-prefs "Dove vorresti installare l'editor di preferenze per ReqChange?")

		(set #where-reqtools-prefs "Dove vorresti installare l'editor di preferenze per ReqTools?")

		(set #help-where-prefs
			(cat
				"    Gli editor di preferenze ti permettono di modificare il comportamento "
				"di ReqChange e ReqTools. Il posto consigliato per installare questi programmi "
				"è in Sys:Prefs, dal momento che già altri editor di preferenze sono posizionati "
				"in questo cassetto."
			)
		)

		(set #where-startrc "Dove vuoi installare il programma StartRC?")

		(set #help-where-startrc
			(cat
				"    StartRC è un piccolo programma che è utilizzato per avviare e interrompere "
				"il funzionamento di ReqChange. Se lo installate nel cassetto Sys:WBStartup, "
				"avvierà automaticamente ReqChange ad ogni bootstrap."
			)
		)

		(set #guide-language "In quale lingua vorresti avere la documentazione?")

		(set #where-reqchange-guide
			"Dove vuoi installare ReqChange.guide?"
		)

		(set #help-guide-language
			(cat
				"La documentazione di ReqChange è attualmente disponibile in due "
				"differenti lingue, inglese e svedese. Seleziona la lingua che "
				"preferisci."
			)
		)

		(set #help-where-reqchange-guide
			(cat
				"    ReqChange.guide è il manuale di ReqChange nello speciale "
				"formato ipertesto AmigaGuide®. Se installi il file ReqChange.guide "
				"nello stesso cassetto del programma di preferenze ReqChange, o in "
				"qualsiasi altro cassetto specificato nel percorso di ricerca di "
				"AmigaGuide (nella variabile di ambiente AmigaGuide/Path), sarai in"
				"grado di richiedere l'aiuto in linea anche nell'editor di preferenze "
				"(ammesso che AmigaGuide sia stato correttamente installato sul tuo "
				"sistema)."
			)
		)

		(set #pic-language "In quale lingua vorresti avere le immagini?")

		(set #where-reqchange-pics "Dove vorresti installare le immagini di anteprima?")

		(set #help-where-reqchange-pics
			(cat
				"    Queste immagini possono essere utilizzate dall'aiuto in linea se "
				"disponi della versione 3.0 o successiva del sistema operativo. Per "
				"fare in modo che l'aiuto in linea sia in grado di trovarle, queste "
				"immagini devono risiedere nel cassetto chiamato Pictures che si trova "
				"nello stesso cassetto del file ReqChange.guide. Il cassetto Pictures "
				"può anche essere spostato in uno dei cassetti inseriti nel percorso di "
				"ricerca di AmigaGuide® (specificato dalla variabile di ambiente "
				"AmigaGuide/Path).\n"
				"    Nota che hai scelto tu dove dovrebbe essere creato il cassetto Pictures.\n"
				"    Se non disponi della versione 3.0 o successiva del sistema operativo, "
				"puoi sempre utilizzare un normale visualizzatore di immagini per mostrare le "
				"anteprime."
			)
		)

		(set #which-language "\nQuali lingue devono essere installate?")

		(set #which-language-help
			(cat
				"    Amiga può lavorare con diverse lingue. Se vuoi che ReqChange utilizzi "
				"la stessa lingua adottata per il Workbench di Amiga allora bisogna copiare "
				"nel tuo hard disk un file per ogni lingua che intendi utilizzare.\n"
				"    Per ridurre la quantità di spazio su disco consumato dai file delle "
				"lingue, puoi selezionare la copia di un numero ristretto di lingue\n"
				"    Per farlo, seleziona i pulsanti relativi alle lingue di cui "
				"intendi disporre nel tuo sistema.\n"
				"    Nota che non tutte le lingue elencate sono attualmente supportate."
			)
		)

		(set #help-install-font
			(cat
				"    Il carattere ' no font' è un piccolo file necessario affinché ReqChange "
				"sia in grado di emulare pienamente il requester dei caratteri di ASL. "
				"Quando viene selezionato questo carattere ReqChange si comporterà come se "
				"l'utente avesse cancellato il nome del carattere nell'apposito campo del "
				"requester di caratteri di ASL e abbia premuto Ok. In questo modo ReqChange "
				"ritornerà al programma un nome di carattere nullo oppure, se preferisci, "
				"nessun carattere."
			)
		)

		(set #install-end
			(cat
				"\n\n"
				"Per cortesia consulta la documentazione per imparare ad usare e a configurare "
				"ReqChange.\n\n"
				"Ricorda: ReqChange è un programma shareware!\n\n"
				"Divertiti!"
			)
		)
	)
)

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

(if (= @language "nederlands")
  (
    (set default-lang 64)
  )
)

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

(if (= @language "norsk")
  (
    (set default-lang 128)
  )
)

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

(if (= @language "português")
  (
    (set default-lang 256)
  )
)

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

(if (= @language "suomi")
  (
    (set default-lang 512)

      (set #bad-kick "Tarvitset Kickstart V2.04+ käyttääksesi ReqChange ohjelmaa")

      (set #install-msg
        (cat
          "\nTervetuloa ReqChange asennus ohjelmaan.\n\n"
          "Tämä ohjelma asentaa ReqChange ohjelman Amigaasi.\n\n"
          "Katso ReadMe tiedostoa saadaksesi tietoa ReqChange ohjelman "
          "kopiointiehdoista.\n\n"
          "ReqChange © 1992-1994  Magnus Holmgren.\n"
          "All rights reserved."
        )
      )

      (set #copy-reqchange-library
        "Kopioidaan reqchange.library Libs:... hakemistoon"
      )

      (set #copy-reqtools-library
        "Kopioidaan reqtools.library Libs:... hakemistoon"
      )

      (set #copy-reqchange-prefs "Kopioidaan ReqChange asetus editori...")

      (set #copy-reqtools-prefs "Kopioidaan ReqTools asetus editori...")

      (set #copy-reqchange-guide "Kopioidaan ReqChange.guide...")

      (set #copy-startrc "Kopioidaan StartRC...")

      (set #copy-font "Kopioidaan ' no font' Fonts:... hakemistoon")

      (set #where-prefs
        (cat
          "Mihin haluaisit asentaa ReqChange ja ReqTools ohjelmien asetus "
          "editorit?"
        )
      )

      (set #help-where-prefs
        (cat
          "    Asetus ohjelmat mahdollistavat ReqChange ja ReqTools ohjelmien "
          "käytöksen muuttamisen. Suositeltava paikka johon nämä ohjelmat "
          "kannattaa asentaa on Sys:Prefs hakemisto, koska siellä on muitakin"
          "vastaavia ohjelmia."
        )
      )

      (set #where-reqchange-guide
        "Mihin ReqChange.guide asennetaan?"
      )

      (set #help-where-reqchange-guide
        (cat
          "    ReqChange.guide on ReqChange ohjelman dokumentti AmigaGuide® "
          "hyperteksti muodossa. Jos asennat ReqChange.guide tiedoston joko "
          "samaan hakemistoon kuin ReqChange asetus ohjelman tai johonkin "
          "AmigaGuide/Path ympäristömuuttujassa mainittuun hakemistoon voit "
          "käyttää asia-riippuvia ohjeita asetus editorista, sillä Amigaasi "
          "on asennettu AmigaGuide."
        )
      )

      (set #where-startrc "Mihin StartRC ohjelma asennetaan?")

      (set #help-where-startrc
        (cat
          "    StartRC on pieni ohjelma, jota käytetään ReqChange ohjelman "
          "käynnistämiseen ja lopetukseen. Jos asennat sen Sys:WBStartup "
          "hakemistoon se ajetaan sieltä joka kerta kun käynnistät Amigasi."
        )
      )

      (set #which-language "\nMitkä kielet asennetaan?")

      (set #which-language-help
	(cat
        "    Amiga voi toimia useilla eri kielillä. Jos haluat käyttää "
        "ReqChange ohjelmaa samalla kielellä kuin Amigan Workbenchiä niin "
        "vastaava catalog tiedosto on kopioitava kovalevyllesi jokaista "
        "tuettua kieltä varten.\n"
        "    Vähentääksesi käännös tiedostojen levyltä viemää tilaa voit "
        "valita kopioitavaksi vain tietyt käännös tiedostot.\n"
        "    Valitse vain ne laatikot joiden käännös tiedostot haluat "
        "kopioida Amiga systeemiisi.\n"
        "    Huomaa, että kaikkia listattuja kieliä varten ei ole vastaavaa "
        "käännös tiedostoa."
      )
    )

    (set #help-install-font
      (cat
	"     Kirjasin ' no font' on pieni kirjasin tyyppi jota "
	"ReqChange ohjelma tarvitsee emuloidessa ASL kirjasin "
	"requesteria. Jos tämä kirjasin on valittu niin ReqChange "
	"käyttäytyy samalla tavoin kuin jos käyttäjä olisi poistanut "
	"kirjasimen nimi kentän normaalissa ASL kirjasin requesterissa, "
	"ja valinnut Ok:n. Tällöin palautetaan tyhjä kirjasin nimi "
	"ohjelmalle - tai kuten olet valinnut - ei kirjasinta."
      )
    )
  )
)

; == Swedish strings =========================================================

(if (= @language "svenska")
	(
		(set guide-language 1)
		(set default-lang 1024)

		(set #bad-kick
			"Du måste använda Kickstart 2.04+ för att installera ReqChange"
		)

		(set #install-msg
			(cat
				"\n"
				"Välkommen till Installeraren.\n\n"
				"Det här programmet låter dig installera ReqChange "
				"i din Amiga.\n\n"
				"Se filen ReadMe för information om hur ReqChange "
				"får distribueras.\n\n"
				"ReqChange © 1992-1995  Magnus Holmgren.\n"
				"Alla rättigheter reserverade."
			)
		)

		(set #copy-reqchange-library
			"Kopierar reqchange.library till Libs:..."
		)

		(set #copy-reqtools-library
			"Kopierar reqtools.library till Libs:..."
		)

		(set #copy-reqchange-prefs
			"Kopierar inställningsredigeraren för ReqChange..."
		)

		(set #copy-reqtools-prefs
			"Kopierar inställningsredigeraren för ReqTools..."
		)

		(set #convert-guide "Konverterar ReqChange.guide...")

		(set #copy-reqchange-guide "Kopierar ReqChange.guide...")

		(set #copy-reqchange-pics "Kopierar fönsterbilder...")

		(set #copy-startrc "Kopierar StartRC...")

		(set #copy-font "Kopierar ' no font' till Fonts:...")

		(set #install-parts
			(cat
				"Var god välj vilka delar av ReqChange som du vill "
				"installera:"
			)
		)

		(set #item-reqchange-prefs "ReqChange inställningar")

		(set #item-reqtools-prefs "ReqTools inställningar")

		(set #item-no-font "' no font'")

		(set #item-reqchange-guide "ReqChange.guide")

		(set #item-reqchange-pics "Fönsterbilder")

		(set #item-magicwb "MagicWB-symboler")

		(set #item-translations "Översättningar")

		(set #install-parts-help
			(cat
				"  Här kan du välja de olika delar av ReqChange "
				"som du vill ha installerade. Efter det så får du "
				"ange detaljer om installationen, som var de olika "
				"delarna ska installeras, eller vilka språk du vill "
				"ha installerade (om några). Du kan välja mellan "
				"följande delar:\n\n"
				"  ReqChange inställningar: Med det här programmet "
				"kan du justera hur ReqChange ska uppföra sig. Du "
				"bör definitivt installera det här programmet.\n\n"
				"  ReqTools inställningar: Med det här programmet "
				"kan du justera hur ReqTools dialogrutor ska "
				"uppföra sig. Inte lika viktigt som "
				"inställningsredigeraren för ReqChange, men du bör "
				"installera det här programmet också. Om du redan "
				"har ReqTools installerat, så kommer bara den "
				"inkluderade versionen att kopieras om den är "
				"nyare än den installerade.\n\n"
				"  ' no font': Det här är ett speciellt 'tomt' "
				"teckensnitt som behövs för att ReqChange ska "
				"kunna göra en komplett emulering av Asl:s "
				"teckensnittsväljare. När det här teckensnittet "
				"har valts så kommer ReqChange att uppföra sig som "
				"om användaren har rensat fältet för "
				"teckensnittsnamnet, och sedan tryckt 'Ok'. Det "
				"här kommer att returnera ett tomt teckensnittsnamn "
				"till det anropade programmet, eller om du föredrar, "
				"inget teckensnitt (no font). Det rekommenderas att "
				"du installerar det här teckensnittet så att "
				"ReqChange kan fungera så bra som möjligt, även om "
				"det inte är så väldigt viktigt.\n\n"
				"  ReqChange.guide: AmigaGuide®-filen som innehåller "
				"dokumentationen till ReqChange. Den förklarar alla "
				"detlajer om programmet som annars kan vara svåra "
				"att komma på, så du bör definitivt installera den "
				"här filen. Om du placerar den i samma låda som "
				"inställningsredigeraren för ReqChange, eller i "
				"sökvägen för AmigaGuide (definierad i "
				"miljövariabeln AmigaGuide/Path) så kan du ha "
				"direkthjälp i inställningsredigeraren (under "
				"förutsättning att AmigaGuide har installerats "
				"på ett korrekt sätt).\n\n"
				"  Fönsterbilder: Bilder som visar hur fönstrena "
				"i inställningsredigeraren för ReqChange ser ut. "
				"Om du har OS 3.0 eller högre så kan du titta på de "
				"här bilderna från ReqChange.guide-filen. Annars så "
				"kan du använda en enkel bildvisare för att se på "
				"dem.\n\n"
				"  MagicWB-symboler: Symboler för programmen och "
				"dokumentationen i den så kallade MagicWB-looken. "
				"Om du inte valt den här, så kommer du att antingen "
				"få normala symboler, eller NewIcons-symboler, om "
				"NewIcons är installerat.\n\n"
				"  Översättningar: Om du har OS 2.1 eller högre, "
				"och vill att ReqChange och ReqTools ska använda "
				"ett annat språk än den inbyggda engelskan, så "
				"måste några extra filer installeras. Observera att "
				"OS 2.1+ måste vara korrekt installerad för att, för "
				"att Installeraren ska installera de här filerna.\n\n"
				"  De förvalda värdena här har valts med hänsyn "
				"till hur ditt system är konfigurerat. Normalt sett "
				"bör du inte behöva ändra dem."
			)
		)

		(set #where-prefs "Var vill du placera inställningseditorerna?")

		; This is used for the intermediate users.
		(set #where-prefs
			(cat
				"Var vill du installera inställningsredigerarna för "
				"ReqChange och ReqTools?"
			)
		)

		; And these two are used for the expert user
		(set #where-reqchange-prefs
			(cat
				"Var vill du installera inställningsredigeraren för "
				"ReqChange?"
			)
		)

		(set #where-reqtools-prefs
			(cat
				"Var vill du installera inställningsredigeraren för "
				"ReqTools?"
			)
		)

		(set #help-where-prefs
			(cat
				"  Inställningsredigerarna låter dig ändra hur "
				"ReqChange och ReqTools beter sig. Ett lämpligt "
				"ställe för de här programmen är Sys:Prefs, "
				"eftersom det redan finns flera andra "
				"inställningsredigerare i den lådan."
			)
		)

		(set #where-startrc "Var vill du installera StartRC?")

		(set #help-where-startrc
			(cat
				"  StartRC är ett litet program för att starta och "
				"avsluta ReqChange. Om du placerar det i "
				"Sys:WBStartup, så kommer det att automatiskt "
				"starta ReqChange varje systemstart."
			)
		)

		(set #guide-language "Vilket språk vill du ha dokumentationen i?")

		(set #where-reqchange-guide "Var vill du installera ReqChange.guide?")

		(set #help-guide-language
			(cat
				"  Dokumentationen för ReqChange finns för närvarande "
				"i två olika språk, engelska och svenska. Välj helt "
				"enkelt det språk du föredrar."
			)
		)

		(set #help-where-reqchange-guide
			(cat
				"  ReqChange.guide är dokumentationen till "
				"ReqChange i AmigaGuides speciella hypertextformat. "
				"Om du placerar ReqChange.guide i samma låda som "
				"inställningsredigeraren, eller i någon av de lådor "
				"som anges av AmigaGuides sökväg (definierad i "
				"miljövariabeln AmigaGuide/Path) så kan du få "
				"direkthjälp i inställningsredigeraren (under "
				"förutsättning att AmigaGuide är ordentligt "
				"installerat i din Amiga)."
			)
		)

		(set #pic-language "Vilket språk ska bilderna var i?")

		(set #where-reqchange-pics
			"Var vill du installera fönsterbilderna?"
		)

		(set #help-where-reqchange-pics
			(cat
				"  De här bilderna kan användas av direkthjälpen "
				"om du har OS 3.0 eller högre. För att "
				"direkthjälpen ska kunna hitta de här bilderna, "
				"så måste de vara placerade i lådan Pictures i "
				"samma låda som ReqChange.guide-filen. Den här "
				"lådan kan också placeras i någon av de lådor som "
				"anges i AmigaGuide®s sökväg (definierad i "
				"miljövariabeln AmigaGuide/Path).\n"
				"  Observera att du anger var lådan Pictures ska "
				"installeras.\n"
				"  Om du inte har OS 3.0 eller högre så kan du "
				"titta på de här bilderna med en enkel bildvisare."
			)
		)

		(set #which-language "\nVilka språk vill du installera?")

		(set #which-language-help
			(cat
				"  Amigan kan arbeta med flera olika språk. Om du "
				"vill att ReqChange ska använda samma språk som "
				"Amiga Workbench så måste en så kallad katalogfil "
				"kopieras till din systemdisk för varje språk.\n"
				"  För att minimera diskutrymmet för språkfiler kan "
				"du välja att bara installera filerna för vissa "
				"språk.\n"
				"  Markera bara rutorna för de språk du önskar "
				"installera i din dator.\n"
				"  Obs: Det finns inte språkfiler för alla visade "
				"språk."
			)
		)

		(set #install-end
			(cat
				"\n\n"
				"Se manualen för få reda på hur du använder och "
				"konfigurerar ReqChange.\n\n"
				"Slutligen: Kom ihåg att ReqChange är shareware!\n\n"
				"Mycket nöje!"
			)
		)
	)
)

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


; Copy the info file _info to _destination
(procedure mycopyinfo
	(
    		(if (BITAND install-files 32)
      			(set infofile (tackon "/MagicWB/" (fileonly _info)))
      			(set infofile _info)
		)

		(copyfiles
			(source infofile)
			(dest   _destination)
		)
	)
)


(set @default-dest "")

; Check Kickstart version. Exit if not at least 2.0

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

(message #install-msg)

; Examine system and set defaults

(set install-default 7)

; AmigaGuide available?
(if (> (getversion "Libs:amigaguide.library") 0)
	(set install-default (BITOR install-default 8))
)

; Do we have OS 3.0+?
(if (>= (/ (getversion) 65536) 39)
	(set install-default (BITOR install-default 16))
)

; MagicWB 2.0+ installed?
(if (exists "Env:MagicWB" (noreq))
	(set install-default (BITOR install-default 32))
)

; Check for locale and current language
(set current-laguange "")

(if (exists "Locale:" (noreq))
	(set install-default (BITOR install-default 64))
)

(welcome)

(set install-files
	(askoptions
		(prompt	#install-parts)
		(help	#install-parts-help "\n\n" @askoptions-help)
		(choices
			#item-reqchange-prefs
			#item-reqtools-prefs
			#item-no-font
			#item-reqchange-guide
			#item-reqchange-pics
			#item-magicwb
			#item-translations
		)
		(default install-default)
	)
)

; StartRC
(set startrc-dest
	(askdir
		(prompt	#where-startrc)
		(help	#help-where-startrc "\n\n" @askdir-help)
		(default "Sys:WBStartup")
	)
)

(if (= @user-level 2)
	(
		(if (BITAND install-files 1)
			(set reqchange-prefs-dest
				(askdir
					(prompt	#where-reqchange-prefs)
					(help	#help-where-prefs "\n\n" @askdir-help)
					(default "Sys:Prefs")
				)
			)
		)

		(if (BITAND install-files 2)
			(set reqtools-prefs-dest
				(askdir
					(prompt	#where-reqtools-prefs)
					(help	#help-where-prefs "\n\n" @askdir-help)
					(default "Sys:Prefs")
				)
			)
		)
	)
	(
		(if (BITAND install-files 3)
			(
				(set reqchange-prefs-dest
					(askdir
						(prompt	#where-prefs)
						(help	#help-where-prefs "\n\n" @askdir-help)
						(default "Sys:Prefs")
					)
				)
				(set reqtools-prefs-dest reqchange-prefs-dest)
			)
		)
	)
)

(set guide-dest "Work:")

(if (exists "Text:" (noreq))
	(set guide-dest "Text:")
)

(if (exists "Man:" (noreq))
	(set guide-dest "Man:")
)

(if (exists "Guide:" (noreq))
	(set guide-dest "Guide:")
)

; ReqChange.guide
(if (BITAND install-files 8)
	(
		(set guide-language
			(askchoice
				(prompt	#guide-language)
				(help	#help-guide-language "\n\n" @askchoice-help)
				(choices
					"English"
					"Svenska"
				)
				(default guide-language)
			)
		)

		(set guide-dest
			(askdir
				(prompt	#where-reqchange-guide)
				(help	#help-where-reqchange-guide "\n\n" @askdir-help)
				(default guide-dest)
			)
		)
	)
)

; ReqChange pics
(if (BITAND install-files 16)
	(
		(set pic-language 0)

		(if (= @user-level 2)
			(set pic-language
				(askchoice
					(prompt	#pic-language)
					(help	#help-guide-language "\n\n" @askchoice-help)
					(choices
						"English"
						"Svenska"
					)
					(default guide-language)
				)
			)
		)

		(set pic-dest
			(askdir
				(prompt	#where-reqchange-pics)
				(help	#help-where-reqchange-pics "\n\n" @askdir-help)
				(default guide-dest)
			)
		)
)

(if (and (BITAND install-files 64) (= (exists "Locale:") 2))
	(set lang
		(askoptions
			(prompt	#which-language)
			(help	#which-language-help "\n\n" @askoptions-help)
			(choices
				"Dansk"
				"Deutsch"
				"English"
				"Español"
				"Français"
				"Italiano"
				"Nederlands"
				"Norsk"
				"Português"
				"Suomi"
				"Svenska"
			)
			(default default-lang)
		)
	)
)


; Copy reqchange.library to Libs:

(copylib
	(prompt	#copy-reqchange-library)
	(source	"/Libs/reqchange.library")
	(dest	"Libs:")
)

(complete 12)

; Copy reqtools.library to Libs:

(copylib
	(prompt #copy-reqtools-library)
	(source "/Libs/reqtools.library")
	(dest   "Libs:")
)

(complete 25)

(copylib
	(prompt	#copy-startrc)
	(source	"/StartRC")
	(dest	destination)
)

(set _info "/StartRC.info")
(set _destination destination)
(mycopyinfo)

(if (AND (BITAND install-files 4) (NOT (exists "Fonts: no font"))))
	(copyfiles
		(prompt	#copy-font)
		(source	"/Fonts")
		(dest	"Fonts:")
		(all)
	)
)

(complete 37)

; Copy ReqChange and ReqTools preferences programs

(if (BITAND install-files 1)
	(
		(copylib
			(prompt #copy-reqchange-prefs)
			(source "/Prefs/ReqChange")
			(dest   reqchange-prefs-dest)
		)

		(set _info "/Prefs/ReqChange.info")
		(set _destination reqchange-prefs-dest)
		(mycopyinfo)
	)
)

(complete 50)

(if (BITAND install-files 2)
	(
		(copylib
			(prompt	#copy-reqtools-prefs)
			(source	"/Prefs/ReqTools")
			(dest	reqtools-prefs-dest)
		)

		(set _info "/Prefs/ReqTools.info")
		(set _destination reqtools-prefs-dest)
		(mycopyinfo)
	)
)

(complete 62)

; ReqChange.guide

(if (BITAND install-files 8)
	(
		(set guide-source
			("/Docs/%s/ReqChange.guide"
				(select guide-language
					"English"
					"Svenska"
				)
			)
		)

		(if (< (/ (getversion) 65536) 39)
			(
				(copylib
					(prompt	#copy-reqchange-guide)
					(source	guide-source)
					(dest	guide-dest)
				)
			)

			(
				(working #convert-guide)
				(run "/C/FixAG" guide-source "T:ReqChange.guide" (safe))

				(copylib
					(prompt	#copy-reqchange-guide)
					(source	"T:ReqChange.guide")
					(dest	guide-dest)
				)

				(delete "T:ReqChange.guide" (safe))
			)

			(set _info "/ReqChange.guide.info")
			(set _destination guide-dest)
			(mycopyinfo)

			; Modify tooltypes of ReqChange.guide if this is needed

			(if (< (/ (getversion) 65536) 39)
				(tooltype
					(dest (tackon guide-dest "ReqChange.guide"))
					(setdefaulttool "AmigaGuide")
				)
			)
		)
	)
)

(complete 75)

; Copy pictures

(if (BITAND install-files 16)
	(
		(set pic-source
			("/Docs/%s/Pictures"
	        		(select pic-language
	        			"English"
	        			"Svenska"
	        		)
	        	)
	        )

		(copyfiles
			(source	pic-source)
			(dest	(tackon pic-dest "Pictures"))
			(all)
		)
	)
)

(complete 87)

; Copy catalog files

(if (and (BITAND install-files 64) (= (exists "Locale:") 2))
	(
		(set n 0)

		(while
			(set language
				(select n
					"Dansk"
					"Deutsch"
					"English"
					"Español"
					"Français"
					"Italiano"
					"Nederlands"
					"Norsk"
					"Português"
					"Suomi"
					"Svenska"
					""
				)
			)

			(
				(if (IN lang n)
					(if (<> 2 n)   ; No catalog for english strings...
						(
							(set catalogs (tackon "/Catalogs" language))
							(set destination (tackon "Locale:Catalogs" language))
							(makedir destination)

							(if (exists (tackon catalogs "reqchangelib.catalog"))
								(copylib
									(source (tackon catalogs "reqchangelib.catalog"))
									(dest destination)
								)
							)

							(if (exists (tackon catalogs "reqchangeprefs.catalog"))
								(copylib
									(source (tackon catalogs "reqchangeprefs.catalog"))
									(dest destination)
								)
							)

							(if (exists (tackon catalogs "reqtools.catalog"))
								(copylib
									(source (tackon catalogs "reqtools.catalog"))
									(dest destination)
								)
							)

							(if (exists (tackon catalogs "reqtoolsprefs.catalog"))
								(copylib
									(source (tackon catalogs "reqtoolsprefs.catalog"))
									(dest destination)
								)
							)
						)
					)
				)

				(set n (+ n 1))
			)
		)
	)
)

(complete 100)

(exit #install-end)

; End of Installer script
