;
; $VER: Install_Visage 39.12 (26.3.97)
;
; Installer script for Visage.
;


(set #german-lang        1)
(set #english-lang       2)
(set #spanish-lang       4)
(set #french-lang        8)
(set #italian-lang      16)
(set #dutch-lang        32)
(set #norwegian-lang    64)
(set #russian-lang     128)
(set #serbian-lang     256)
(set #finnish-lang     512)
(set #swedish-lang    1024)

; Get current language (no need for lots of silly icons! ;). However, this
; won't properly work for all versions of the Installer. Some doesn't
; understand the language "default". :/

(if (= (exists "Env:Language") 1)
	; GetEnv reports "String too long" if the variable doesn't exist! :(
	; Dunno if this is fixed in V43... But we need the check anyway.
	(set @language (getenv "language"))
)

;**************************************************************************
;
; English strings
;


(set #default-lang #english-lang)

(set #bad-kick
	"You must have AmigaOS Release 3.0 or newer to use Visage."
)

(set #welcome
	(cat
		"\n\n\nWelcome to the Visage installation utility.\n\n"
		"This program lets you install Visage on your Amiga.\n\n\n"
		"Visage � 1995-97 by Magnus Holmgren."
	)
)

(set #install-parts "Please select the parts you wish to install")

(set #item-visage "Visage")

(set #item-visage-guide "Visage.guide")

(set #item-locale "Translations")

; The following four strings are program names. Normally, these shouldn't
; be translated, though one could consider appending some locale-specific
; text after the names.

(set #item-getmodeid "GetModeID")

(set #item-kill "Kill")

(set #item-makelink "MakeLink")

(set #item-deletelink "DeleteLink")

(set #item-unpackilbm "UnpackILBM")

(set #install-parts-help
	(cat
		"    Here you select the different parts of Visage that you would like to "
		"install. After that, you select the details of the installation (such as "
		"where the different files should be installed). You may choose to install "
		"the following items:\n"
		"    Visage: The actual picture viewer.\n"
		"    Visage.guide: The manual, in AmigaGuide� format. If you install it "
		"using the installer, the text will reflow to fit the current window size. "
		"If you do a manual installation, the text is fixed to 76 columns.\n"
		"    Translations: If you install a translation, then Visage can operate in "
		"the language(s) you select.\n"
		"    GetModeID: A program that shows a screen mode requester, and prints "
		"a decimal number that represents the selected screen mode.\n"
		"    Kill: A program that can stop another program (sending \"break\" "
		"signals). Similar to Break.\n"
		"    MakeLink: A replacement for the MakeLink command that supports "
		"soft links.\n"
		"    DeleteLink: A simple Delete-clone that also deletes soft links "
		"without a target.\n"
		"    UnpackILBM: A program that unpacks the picture data in an IFF ILBM "
		"picture (the BODY chunk).\n"
		"    For more information about these parts, please read the manual.\n"
	)
)

(set #where-visage "Where would you like to install Visage?\nA drawer will NOT be created!")

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

(set #copy-guide-icon "Should I copy the icon for Visage.guide?")

; (set #convert-guide "Converting Visage.guide...")

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

(set #which-language-help
	(cat
		"    The Amiga can be operated in many different languages. If you "
		"want Visage to use the same language as your 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"
	)
)

(set #where-language
	(cat
		"Where do you want to install the language files?\n\n"
		"You can install them in either the same drawer as the program "
		"itself (select \"Program\") or in the 'global' volume "
		"\"Locale:\" (select \"Locale:\")."
	)
)

; These two strings must match the strings used in above in #where-language.
; The words in question are the quoted ones after "select" in the parentheses.
(set #lang-progdir "Program")

(set #lang-locale  "Locale:")

(set #where-language-help
	(cat
		"    If you install the language files in the same drawer as Visage "
		"itself (or rather, in subdirectories within that drawer), then you "
		"need to move these files as well, if you move Visage to some other "
		"drawer. If you install the language files in \"Locale:\" you don't "
		"need to worry about them if you move Visage. On the other hand, you "
		"will not have all Visage-related files in the same drawer."
	)
)

(set #builtin-lang "(default)")

(set #where-tools "Where would you like to install the extra programs?")

(set #where-tools-help
	(cat
		"    Here you specify where the programs GetModeID, Kill, MakeLink, "
		"DeleteLink and UnpackILBM will be installed. Only the programs you "
		"selected will be installed. Since these programs are Shell-only, "
		"the default location is C:, where the systems Shell-only programs "
		"can be found.\n"
		"    It is recommended that you install these programs somewhere in "
		"your command search path.\n"
	)
)

(set #copy "Copying %s to %s...")

(set #program-update "How do you want to update the tooltypes in the icon?")

(set #update-none "No update")

(set #update-all "Add all")

(set #update-since "Add new since %s")

(set #program-update-help
	(cat
		"    Since this installation updates an older version of Visage, "
		"the icon will not be copied over. This to maintain any changes "
		"you may have made to it. However, new tooltypes may have been added. "
		"Here you can decide if you want to:\n"
		"    No update: Skip this part.\n"
		"    Add all tooltypes: existing tooltypes will not be changed "
		"Any tooltypes you may have removed will be added again. The new "
		"tooltypes will be added as well.\n "
		"    Add new since 39.x: Only add the new tooltypes since that version. "
		"Any existing tooltype not be changed.\n"
	)
)

;**************************************************************************
;
; German strings
;

(if (= @language "deutsch")
	(
		(set #default-lang #german-lang)

		(set #bad-kick
			"Visage ben�tigt AmigaOS Version 3.0 oder h�her."
		)

		(set #welcome
			(cat
				"\n\n\nWillkommen zur Installation von Visage.\n\n"
				"Dieses Programm erm�glicht die Installation von Visage auf Ihrem Amiga.\n\n\n"
				"Visage � 1995-97  Magnus Holmgren."
			)
		)

		(set #install-parts "Bitte die zu installierenden Teile ausw�hlen")

		(set #item-visage "Visage")

		(set #item-visage-guide "Visage.guide")

		(set #item-locale "�bersetzungen")

		(set #item-getmodeid "GetModeID")

		(set #item-kill "Kill")

		(set #item-makelink "MakeLink")

		(set #item-deletelink "DeleteLink")

		(set #item-unpackilbm "UnpackILBM")

		(set #install-parts-help
			(cat
				"    Hier w�hlen Sie die verschiedenen Teile von Visage aus, die Sie "
				"installieren m�chten. Danach w�hlen Sie die Details der Installation "
				"aus (wo z.B. die einzelnen Dateien installiert werden sollen). "
				"Sie k�nnen die Installation folgender Dinge vornehmen:\n"
				"    Visage: Der Bildanzeiger.\n"
				"    Visage.guide: Die Dokumentation, im AmigaGuide� Format. Wenn sie "
				"mit Hilfe des Installer Programms installiert wird, wird der Text an die "
				"aktuelle Bildschirmaufl�sung angepa�t. Wenn Sie die Installation von Hand "
				"vornehmen, ist der Text auf 76 Zeichen formatiert.\n"
				"    �bersetzungen: Wenn Sie eine �bersetzung installieren, dann kann "
				"Visage in dieser (diesen) Sprache(n) ablaufen.\n"
				"    GetModeID: Ein Programm, das ein Bildschirmmodus-Auswahlfenster "
				"anzeigt und eine Dezimalzahl ausdruckt, die den ausgew�hlten "
				"Bildschirmmodus repr�sentiert.\n"
				"    Kill: Ein Programm, das ein anderes Programm stoppen kann "
				"(durch Senden eines \"Break\" Signals). �hnlich wie Break.\n"
				"    MakeLink: Ein Ersatz f�r das MakeLink Kommando, das auch "
				"soft links unterst�tzt.\n"
				"    DeleteLink: Ein einfacher Ersatz f�r Delete, das auch soft links "
				"ohne Ziel l�schen kann.\n"
				"    UnpackILBM: Ein Programm, das die Bilddaten in einem IFF ILBM "
				"Bild entpackt (den BODY chunk).\n"
				"    F�r weitere Informationen �ber diese Teile lesen Sie bitte in "
				"der Dokumentation nach.\n"
			)
		)

		(set #where-visage "Wo w�rden Sie Visage gern installieren?\nEs wird KEIN Verzeichnis angelegt!")

		(set #where-visage-guide "Wo w�rden Sie gern Visage.guide installieren?")

		(set #copy-guide-icon "Soll das Piktogramm f�r Visage.guide kopiert werden?")

		; (set #convert-guide "Konvertierung von Visage.guide...")

		(set #which-language "Welche �bersetzungen sollen installiert werden?")

		(set #which-language-help
			(cat
				"    Der Amiga kann in verschiedenen Sprachen benutzt werden. "
				"Wenn Sie w�nschen, Visage in der Sprache Ihrer Workbench zu "
				"benutzen, m�ssen einige Dateien f�r die unterst�tzten Sprachen "
				"auf Ihre Festplatte kopiert werden.\n"
				"    Um den ben�tigten Raum f�r die �bersetzungsdateien zu "
				"verringern, k�nnen Sie ausw�hlen, nur Dateien f�r bestimmte "
				"Sprachen zu kopieren.\n"
				"    W�hlen Sie einfach die K�stchen neben den Sprachen aus, die "
				"Sie auf Ihrem System verf�gbar haben wollen.\n"
			)
		)

		(set #where-language
			(cat
				"Wo w�rden Sie die �bersetzungen gern installieren?\n\n"
				"Sie k�nnen Sie entweder im gleichen Verzeichnis wie das Programm "
				"selbst (Knopf \"Programm\") oder in das 'globale' Verzeichnis "
				"\"Locale:\" (Knopf \"Locale:\") installieren."
			)
		)

		(set #lang-progdir "Programm")

		(set #lang-locale  "Locale:")

		(set #where-language-help
			(cat
				"    Wenn Sie die �bersetzungsdateien in das gleiche Verzeichnis wie "
				"Visage selbst (oder besser, in Unterverzeichnisse in diesem Verzeichnis) "
				"installieren, m�ssen Sie diese Dateien auch verschieben, wenn Sie "
				"Visage in ein anderes Verzeichnis verschieben. Wenn die �bersetzungen "
				"in \"Locale:\" kopiert werden, brauchen Sie sich keine Sorgen zu "
				"machen, wenn Sie Visage verschieben. Auf der anderen Seite sind dann "
				"allerdings auch nicht alle Dateien von Visage im gleichen Verzeichnis."
			)
		)

		(set #builtin-lang "(eingebaut)")

		(set #where-tools "Wo w�rden Sie gern die Extra-Programme installieren?")

		(set #where-tools-help
			(cat
				"    Hier geben Sie an, wo die Programme GetModeID, Kill, MakeLink, "
				"DeleteLink und UnpackILBM installiert werden sollen. Nur die von Ihnen "
				"ausgew�hlten Programme werden installiert. Da die Programme nur "
				"f�r die Benutzung in der Shell gedacht sind, ist das voreingestellte "
				"Ziel das C: Verzeichnis, wo sich die Shell-Programme des Systems "
				"normalerweise befinden.\n"
				"    Es wird empfohlen, diese Programme irgendwo im Kommando-"
				"Suchpfad zu installieren.\n"
			)
		)

		(set #copy "%s wird nach %s kopiert...")

		(set #program-update "Wie sollen die Piktogrammerkmale ge�ndert werden?")

		(set #update-none "Keine �nderung")

		(set #update-all "Alle hinzuf�gen")

		(set #update-since "Alle seit %s neuen hinzuf�gen")

		(set #program-update-help
			(cat
				"    Da diese Installation eine �ltere Version von Visage ersetzt, "
				"wird das Piktogramm nicht �berkopiert. Dies erh�lt die �nderungen, die "
				"Sie daran vorgenommen haben. Es k�nnen jedoch neue Merkmale hinzugef�gt "
				"werden. Hier w�hlen Sie aus:\n"
				"    Keine �nderung: Dieser Teil wird �bersprungen.\n"
				"    Alle hinzuf�gen: existierende Merkmale werden nicht ge�ndert. "
				"Alle Merkmale, die Sie vielleicht entfernt haben, werden wieder "
				"hinzugef�gt, alle neuen auch.\n "
				"    Alle seit 39.x hinzuf�gen: Nur die neuen Merkmale seit dieser "
				"Version hinzuf�gen. Existierende Merkmale bleiben unver�ndert.\n"
			)
		)
	)
)


;**************************************************************************
;
; Spanish strings
;

(if (= @language "espa�ol")
	(
		(set #default-lang #spanish-lang)

		(set #bad-kick "Imprescindible SO 3.0 o superior para usar Visage.")

		(set #welcome
			(cat
				"\n\n\n Bienvenido al instalador del programa Visage.\n\n"
				"Este programa le permite�instalar el visor de im�genes "
				"Visage en su Amiga.\n\n\n"
				"Visage � 1995-97  Magnus Holmgren."
			)
		)

		(set #install-parts "Por favor, elija qu� partes desea instalar")

		(set #item-visage "Visage")

		(set #item-visage-guide "Visage.guide")

		(set #item-locale "Idiomas")

		(set #item-getmodeid "GetModeID")

		(set #item-kill "Kill")

		(set #item-makelink "MakeLink")

		(set #item-unpackilbm "UnpackILBM")

		(set #install-parts-help
			(cat
				"\n   Aqu� usted puede elegir las diferentes partes de "
				"Visage que deben ser instaladas; a continuaci�n, "
				"deber� seleccionar los detalles de la instalaci�n "
				"(como el lugar donde deben ser instalados p. ej.). "
				"Puede elegir qu� elementos desea instalar o no de "
				"entre los siguientes:\n\n"
				"   Visage (el programa visualizador de im�genes).\n\n"
				"   Visage.guide (manual en formato AmigaGuide�; "
				"si lo instala desde aqu�, el texto se redistribuir� "
				"para caber en el actual tama�o de ventana, mientras "
				"que si lo hace manualmente el ancho ser� de 76 "
				"columnas.\n\n"
				"   Cat�logos (permite a Visage expresarse en el idioma "
				"que usted seleccione --de entre los disponibles-- tanto "
				"en la instalaci�n como desde las preferencias del WB).\n\n"
				"   GetModeID (este programa muestra una petici�n de "
				"modos de pantalla para que se elija uno, e imprime el n� "
				"decimal que lo representa.\n\n"
				"   Kill (permite detener otro programa, enviando una se�al "
				"\"break\": similar al comando Break del AmigaDOS.\n\n"
				"   MakeLink (sustituto del comando MakeLink del AmigaDOS "
				"que soporta vinculaciones o enlaces soft --'soft "
				"links'--).\n\n"
				"    DeleteLink: A simple Delete-clone that also deletes "
				"soft links without a target.\n\n"
				"   UnpackILBM (descomprime los datos, o sea el cuerpo o "
				"bloque BODY, de la imagen IFF ILBM se�alada.\n\n"
				"   Para m�s informaci�n sobre lo anterior, consulte el "
				"manual.\n\n"
			)
		)

		(set #where-visage "�D�nde desea instalar Visage?")

		(set #where-visage-guide "�D�nde desea instalar la documentaci�n Visage.guide?")

		(set #copy-guide-icon "�Quiere que copie el icono de Visage.guide?")

		; (set #convert-guide "Convirtiendo Visage.guide...")

		(set #which-language "�Qu� idiomas desea instalar?")

		(set #which-language-help
			(cat
				"\n    El Amiga puede trabajar con diferentes idiomas, as� que "
				"si desea que Visage pueda emplear el mismo definido para su "
				"Amiga Workbench, tendr�n que ser copiados los ficheros "
				"cat�logo que correspondan a su disco duro (uno por cada "
				"lengua soportada).\n\n"
				"    Para reducir la cantidad de espacio consumido por estos "
				"ficheros idiom�ticos, puede seleccionar �nicamente los de "
				"las lenguas que desee copiar y/o instalar, bastando para "
				"ello que s�lo active el interruptor de aquellos de los que "
				"quiera disponer en su sistema.\n"
			)
		)

		(set #where-tools "�Desea que se instalen las herramientas auxiliares?")

		(set #where-tools-help
			(cat
				"\n   Aqu� ha de especificar cu�l(es) de los programas "
				"GetModeID, Kill, MakeLink, DeleteLink y/o UnpackILBM "
				"desea instalar: s�lo los programas que usted seleccione "
				"ser�n copiados. Como estas utilidades son para utilizar "
				"�nicamente desde el Shell, el directorio destino por "
				"defecto es C:, que es el lugar habitual donde encontrar "
				"este tipo de programas.\n\n"
				"   Es recomendable que instale estos programas en alg�n "
				"lugar accesible por el sistema de forma autom�tica (use "
				"en tal caso el comando Path del AmigaDOS).\n"
			)
		)

		(set #copy "Copiando %s a %s...")

		(set #program-update "�Quiere actualizar los tipos de herramienta del icono?")

		(set #update-none "No actualizar")

		(set #update-all "A�adir todo")

		(set #update-since "A�adir nuevo hasta %s")

		(set #program-update-help
			(cat
				"\n   Hasta esta actualizaci�n de la instalaci�n en "
				"una versi�n antigua de Visage, el icono no pod�a "
				"ser copiado encima: esto era para mantener cualquier "
				"cambio que hubiese hecho usted en �l. Sin embargo, "
				"nuevos tipos de herramienta pueden ser a�adidos, as� "
				"que aqu� ha de decidir lo que hacer:\n\n"
				"   No actualizar: Salta esta parte.\n\n"
				"   A�adir todos los tipos de herramienta (los tipos de "
				"herramienta no se modifican; cualquiera que usted "
				"elimine, podr� ser a�adido de nuevo y los nuevos tipos "
				"de herramienta pueden ser a�adidos sin problemas.\n\n"
				"   A�adir nuevo hasta 39.x (s�lo a�ade los nuevos "
				"tipos de herramienta hasta esa versi�n; cualquier tipo "
				"de herramienta existente no ser� modificado.\n"
			)
		)
	)
)


;**************************************************************************
;
; French strings
;

(if (= @language "francais")
	(
		(set #default-lang #french-lang)

		(set #bad-kick
			(cat
				"Vous devez avoir la version 3.0 d'AmigaOS ou plus r�cente "
				"pour utiliser Visage."
			)
		)

		(set #welcome
			(cat
				"\n\n\nBienvenue dans l'utilitaire d'installation de Visage.\n\n"
				"Ce programme vous permet d'installer Visage sur votre Amiga.\n\n\n"
				"Visage � 1995-97  Magnus Holmgren."
			)
		)

		(set #install-parts "S�lectionnez les �l�ments que vous d�sirez installer S.V.P.�:")

		(set #item-visage "Visage")

		(set #item-visage-guide "Visage.guide")

		(set #item-locale "Traductions")

		(set #item-getmodeid "GetModeID")

		(set #item-kill "Kill")

		(set #item-makelink "MakeLink")

		(set #item-deletelink "DeleteLink")

		(set #item-unpackilbm "UnpackILBM")

		(set #install-parts-help
			(cat
				"   Ici vous s�lectionnez les diff�rentes parties de Visage que "
				"vous d�sirez installer.�Ensuite,�vous s�lectionnez les d�tails "
				"de l'installation (tel que l'endroit o� les diff�rents fichiers "
				"devront �tre install�s).�Vous pouvez choisir d'installer les "
				"�l�ments suivants :\n"
				"    Visage�:�l'afficheur d'image actuel.\n"
				"    Visage.guide�:�le manuel,�de format AmigaGuide�.�Si vous "
				"l'installez en utilisant installer,�Le texte sera remis en forme "
				"afin d'�tre adapt� � la taille de la fen�tre courante.�Si vous "
				"fa�tes une installation manuelle,�Le texte sera fix� � 76 colonnes.\n"
				"    Traductions�:�si vous installez une traduction,�alors Visage "
				"fonctionnera dans le(s) language(s) s�lectionn�(s).\n"
				"    GetModeID�:�un programme qui affiche une requ�te de mode "
				"d'affichage,�et retourne un nombre d�cimal qui repr�sente le mode "
				"d'affichage s�lectionn�.\n"
				"    Kill�:�un programme qui peut stopper un autre programme "
				"(en envoyant un signal���break��).�Similaire � Break.\n"
				"    MakeLink�:�en remplacement de la commande MakeLink et qui "
				"supporte les liens symboliques.\n"
				"    DeleteLink�:�un cl�ne de la commande Delete qui efface "
				"�galement les liens symboliques sans destination.\n"
				"    UnpackILBM�:�un programme qui d�compacte les donn�es d'une "
				"images (le BODY chunk) dans un fichier au format IFF ILBM.\n"
				"    Pour plus d'information sur cette partie,�lisez le manuel "
				"S.V.P..\n"
			)
		)

		(set #where-visage
			(cat
				"O� d�sirez vous installer Visage�?\n"
				"AUCUN r�pertoire ne sera cr��!"
			)
		)

		(set #where-visage-guide "O� d�sirez vous installer Visage.guide�?")

		(set #copy-guide-icon "L'ic�ne de Visage.guide doit-il �tre copi�?")

		; (set #convert-guide "Conversion de Visage.guide...")

		(set #which-language "Quelle(s) langue(s) faut-il installer�?")

		(set #which-language-help
			(cat
				"    L'Amiga peut utiliser diff�rentes langues.�Si vous voulez que"
				"Visage utilise la m�me langue que le Workbench de votre Amiga,�"
				"alors un certain nombre de fichiers���catalog���doivent �tre copi�s "
				"sur votre disque dur pour chaque langue support�e.\n"
				"    Afin de r�duire la place utilis�e par les fichiers de langues,�"
				"vous pouvez ne s�lectionner que les fichiers en rapport avec la "
				"langue utilis�e.\n"
				"    V�rifiez simplement les options de langues que vous d�sirez "
				"voir disponible sur votre syst�me.\n"
			)
		)

		(set #where-language
			(cat
				"O� voulez-vous installer les fichiers de langues�?\n\n"
				"Vous pouvez les installer dans le m�me r�pertoire que le "
				"programme lui-m�me�(s�lectionner���Programme��)�ou bien dans�"
				"��Locale:���(s�lectionner���Locale:��)�dans le volume principal."
			)
		)

		(set #lang-progdir "Programme")

		(set #lang-locale  "Locale:")

		(set #where-language-help
			(cat
				"    Si vous installez les fichiers de langues dans le m�me "
				"r�pertoire que Visage (ou plut�t dans un sous r�pertoire de "
				"celui-ci),�alors vous devrez �galement d�placer ces fichiers si "
				"vous d�placez Visage dans un autre r�pertoire.�Si vous installez "
				"les fichiers de langues dans���Locale:��,�vous n'aurez pas besoin "
				"de vous en pr�occuper si vous d�placer Visage.�Par contre vous "
				"n'aurez pas tous les fichiers relatifs � Visage dans le m�me "
				"r�pertoire."
			)
		)

		(set #builtin-lang "(default)")

		(set #where-tools "O� d�sirez-vous installer les utilitaires suppl�mentaires�? ")

		(set #where-tools-help
			(cat
				"    Vous sp�cifiez ici o� doivent �tre install�s les programmes "
				"GetModeID,�Kill,�MakeLink,�DeleteLink et UnpackILBM.�Seuls les "
				"programmes que vous avez s�lectionn�s seront install�s.�Comme ces "
				"programmes ne sont ex�cutables que sous Shell,�l'emplacement par "
				"d�faut est C:�,�l� o� se trouve tous les programmes qui ne peuvent "
				"s'ex�cuter que sous shell.\n"
				"    Il est recommand� d'installer ces programmes dans un endroit "
				"dont le chemin est connu du syst�me.\n"
			)
		)

		(set #copy "Copie de %s vers %s...")

		(set #program-update
			(cat
				"Comment voulez-vous mettre � jour les�param�tres d'outil�"
				"(��ToolTypes��)�de l'ic�ne�?"
			)
		)

		(set #update-none "Pas de mise � jour")

		(set #update-all "Tout ajouter")

		(set #update-since "Ajouter les nouveaux depuis la V %s")

		(set #program-update-help
			(cat
				"    Comme cette installation met � jour une ancienne version de "
				"Visage,�l'ic�ne d'origine ne sera pas �cras� afin de pr�server "
				"les modifications que vous pourriez avoir apport�es.�Sinon,�de "
				"nouveaux param�tres d'outil pourrait �tre ajout�s.�Ici vous "
				"pouvez d�cider si vous voulez�:\n"
				"    Pas de mise � jour�:�passer cette partie.\n"
				"    Ajouter tous les param�tres d'outil�:�ceux existants ne "
				"seront pas modifi�s.�Tous les param�tres d'outil que vous "
				"pourriez avoir retir�s seront rajout�s.�"
				"Les nouveaux param�tres d'outil seront �galement rajout�s.\n "
				"    Ajouter les nouveaux depuis la version 39.x�:�ajouter "
				"seulement les nouveaux param�tres d'outil depuis cette version. "
				"Aucun param�tre d'outil existant ne sera modifi�.\n"
			)
		)
	)
)


;**************************************************************************
;
; Italian strings
;

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


;**************************************************************************
;
; Dutch strings
;

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


;**************************************************************************
;
; Norwegian strings
;

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


;**************************************************************************
;
; Russian strings
;

(if (= @language "russian")
	(
		(set default-lang #russian-lang)

		(set #welcome
			(cat
				"\n\n\n����� ���a���a�� � ����a����� �����a��� Visage.\n\n"
				"��a �����a��a �������� �a� ���a������ Visage �a �a�� A����.\n\n\n"
				"Visage � 1995-97  Magnus Holmgren."
			)
		)

		(set #install-parts
			"���a�����a, �������� ����������, ������� �� ���a��� ����a�����a��"
		)

		(set #item-visage "Visage")

		(set #item-visage-guide "Visage.guide")

		(set #item-locale "Translations")

		(set #item-getmodeid "GetModeID")

		(set #item-kill "Kill")

		(set #item-makelink "MakeLink")

		(set #item-unpackilbm "UnpackILBM")

		(set #install-parts-help
			(cat
				"    ����� �� ������ ����a�� �a������� ���������� Visage ��� ��������� �� "
				"����a�����. ����� ����� �� ������� �������� �a������� ���a�� (�a������, "
				"���a ��������� ����� ��������a�� �a������� �a���). �� ������ ����a�� "
				"��������� �a���:\n"
				"    Visage: ���������� �����a��a ��������a �a������.\n"
				"    Visage.guide: ��������a��� � ���-����a��. ���� �� �a������ � ���a������ "
				"� ���������a���� ����a�����a, �� ����� ����� a����a������� ����a�����a���� "
				"��� ������� ������ ���a. � ����a� "������" ����a�����  �����a ����� 76 �������.\n"
				"    Translations: ��� ����a����� ����a���� Visage ����� �a���a�� "
				"�a ����a���� �a�� ����� (����a�).\n"
				"    GetModeID: �����a��a, ���a���a��a� ��������� ���a���� ������� � ���a�a��a� "
				"���������� �����, ��������������� ����a����� ������.\n"
				"    Kill: �����a��a, �����a� ����� �����a�� ���������� ������ �����a��, ����a� "
				"�� ����a� ���a���a (�������� �� ��, ��� �  Break.)\n"
				"    MakeLink: �a���a ��a��a����� ���a���, ���������a��a� \"��a���\" "
				"�����.\n"
				"    DeleteLink: A simple Delete-clone that also deletes soft links "
				"without a target.\n"
				"    UnpackILBM: �a��a�����a�� \"����\" IFF ILBM �a���� "
				"(BODY chunk).\n"
				"    ����� ��������� ������a��� ��. � ��������a��� � �����a���.\n"
			)
		)

		(set #where-visage "��a���� �a����� ��� ����a����� Visage")

		(set #where-visage-guide "���a �������a�� �a�� ��������a��� Visage.guide?")

		(set #copy-guide-icon "�a�� �� �������a�� ������ ��� Visage.guide?")

		; (set #convert-guide "������a��� Visage.guide...")

		(set #which-language "�a��� ����� �a�� ����a�����a��?")

		(set #which-language-help
			(cat
				"    A���a ����� �a���a�� �a ������ ����a�. ���� �� ������, ����� "
				"Visage ���������a� ��a��a����� ���� �a��� �������, �� ���������� "
				"��������a�� ��������������� �a�a���� �a �a� ������ ���� - �������� "
				"��� �a����� �� ������������ ������.\n"
				"    ����� ��������� �����, �a���a���� ��������� �a�a���a��, "
				"�� ������ �� �����a�� �a�a���� ��� ��� ������, ������� �a� � �������� "
				"�� �����������.\n"
				"    ������ ����a���� �a����� �a������ ��������� �a� ������ � ��.\n "
			)
		)

		(set #where-tools "���a ����a�����a�� �������������� �����a���?")

		(set #where-tools-help
			(cat
				"    ��a���� �a����� �������a��� �����a�� GetModeID, Kill, MakeLink, "
				"DeleteLink � UnpackILBM. ����� ��������a�� ������ ����a���� �a�� "
				"�����a���. ��������� �a����a�� ��� ��� �����a��� �������� ������ �� "
				"Shell, �� �������a�a���� ��������a�� �� � C:, ���, �a� ��a����, "
				"�a������� �������� �����a���.\n"
				"    � ����� ����a� ���a������, ����� ��� �����a��� �a�������� �� ������ "
				"�� ��������� �a������� �a��� �������.\n"
			)
		)

		(set #copy "������� %s � %s...")

		(set #program-update "�a� �� ������ �������� ����������a��� ������?")

		(set #update-none "�� ����")

		(set #update-all "���a���� ��")

		(set #update-since "���a����, �a���a� � %s")

		(set #program-update-help
			(cat
				"    ��������� �� ����a� ��������� ����� ��a��� ������ Visage, �� "
				"��a�a� �����a �� ���������a���� �a����. ��� ����a�� ��� ����, ����� "
				"����a���� �� ���������, ������� �� ����� ���������� �a���. ���a��, "
				"����� �� ���a�� �a� ���a���� ����� �a�a�����. ����� �� ������ "
				"������, ������ �� ��:\n"
				"    ������ �� ���������.\n"
				"    ���a���� ����� �a�a����� � ��� ������������. "
				"����� �������� ��a����� �a�� �a��� �a�a����� ����� ����a ���a�����, "
				"�a��� �a� � ����� �a�a�����.\n "
				"    ���a���� ����� 39.x: ���a���� ����� �a�a����� ������ ����� ���� ������ ���. "
				"������������ �a�a����� ���a����� �����������.\n"
			)
		)
	)
)


;**************************************************************************
;
; Serbian strings
;

(if (= @language "srpski")
	(
		(set #default-lang #serbian-lang)

		(set #bad-kick
			"Morate imati AmigaOS verzije 3.0 ili noviji da bi koristili Visage."
		)

		(set #welcome
			(cat
				"\n\n\nDobro do�li u instalaciju Visage-a.\n\n"
				"Ovaj program vam omogu�ava da instalirate Visage na va�oj Amigi.\n\n\n"
				"Visage � 1995-97  Magnus Holmgren."
			)
		)

		(set #install-parts "Odaberite delove koje �elite da instalirate")

		(set #item-visage "Visage")

		(set #item-visage-guide "Visage.guide")

		(set #item-locale "Prevodi")

		(set #item-getmodeid "GetModeID")

		(set #item-kill "Kill")

		(set #item-makelink "MakeLink")

		(set #item-deletelink "DeleteLink")

		(set #item-unpackilbm "UnpackILBM")

		(set #install-parts-help
			(cat
				"    Ovde birate razne delove Visage paketa koje �elite da instalirate "
				"Posle toga odre�ujete detalje instalacije kao �te je gde �e biti odre�eni"
				"fajlovi biti instalirani). Za instalaciju mo�ete odabrati slede�e "
				"elemente:\n"
				"    Visage: Sam program za gledanje slika.\n"
				"    Visage.guide: Uputstvo, u AmigaGuide� formatu (na engleskom). Ako ga "
				"ga instalirate uz pomo� ovog programa, tekst �e biti pode�en da ispunjava "
				"trenutnu veli�inu \"prozora\". Ako sami instalirate, tekst �e ostati "
				"�irok 76 kolona.\n"
				"    Prevodi: Ako instalirate prevod, onda �e Visage raditi na jeziku koji"
				"koji ste odabrali.\n"
				"    JPEG codec: Tower JPEG Codec klasa, koja treba Visage-u da bi mogao "
				"da prika�e JPEG slike (bez kori�enja datatajpova).\n"
				"    GetModeID: Program koji uz pomo� upitnika za skrin mod, prikazuje "
				"decimalni broj koji predstavlja odabrani skrin mod.\n"
				"    Kill: Program koji mo�e da zaustavi druge programe (�alju�i \"break\" "
				"signale). Sli�an sistemskom Break-u.\n"
				"    MakeLink: Zamena za MakeLink komandu koja podr�ava soft linkove.\n"
				"    DeleteLink: Prost Delete klon koji bri�e i soft linkove bez targeta.\n"
				"    UnpackILBM: Program koji raspakuje podatke u IFF ILBM slici (tzv."
				"BODY �ank).\n"
				"    Za vi�e informacija o elementima paketa pro�itajte uputstvo.\n"
			)
		)

		(set #where-visage "Gde �elite da instalirate Visage?\nNE�E biti napravljen direktorijum!")

		(set #where-visage-guide "Gde �elite da instalirate Visage.guide?")

		(set #copy-guide-icon "Da li �elite da kopiram i ikonu za Visage.guide?")

		; (set #convert-guide "Konvertujem Visage.guide...")

		(set #which-language "Koje jezike �elite da instalirate?")

		(set #which-language-help
			(cat
				"    Amiga mo�e da radi na razli�itim jezicima. Ako �elite da "
				"Visage koristi isti jezik kao va� Vorkben�, onda mora biti "
				"kopirano nekoliko katalog fajlova na hard disk za svaki "
				"podr�ani jezik.\n"
				"    Da bi se smanjilo mesto potrebno kataloge, mo�ete odabrati "
				"da se koriraju samo fajlovi odre�enog jezika.\n"
				"    Samo obele�ite koje jezike �elite da imate u va�em sistemu.\n"
			)
		)

		(set #where-language
			(cat
				"Gde �elite da instalirate katalog fajlove?\n\n"
				"Mo�ete ih instalirati ili u isti direktorijum "
				"gde je sam program (odaberite\"Program\") ili "
				"u 'globalni' direktorijum \"Locale:\" (odaberite "
				"\"Locale:\")."
			)
		)

		(set #lang-progdir "Program")

		(set #lang-locale  "Locale:")

		(set #where-language-help
			(cat
				"    Ako instalirate katalog fajlove u isti direktorijum kao Visage "
				"(tj, u poddirektorijume u to direktorijumu), onda morate preme�tati "
				"i te fajlove, ako preme�tate Visage u neki drugi direktorijum. Ako"
				"instalirate katalog fajlove u \"Locale:\" ne morate da brinete o "
				"tome gde preme�tate Visage. Sa druge strane sve fajlovi vezani za"
				"Visage ne�e biti u istom direktorijumu."
			)
		)

		(set #builtin-lang "(default)")

		(set #where-tools "Gde �elite da instalirate dodatne programe?")

		(set #where-tools-help
			(cat
				"    Ovde birate gde �e se intalirati GetModeID, Kill, MakeLink, "
				"DeleteLink and UnpackILBM. Samo programi koje ste odabrali bi�e "
				"instalirani. Po�to su ovo isklju�ivo �el programi, normalna "
				"lokacija je C: direktorijum, gde se nalaze isklju�ivo �el "
				"programi.\n"
				"    Preporu�eno je da programi budu instalirani negde gde ih "
				"mo�e na�i AmigaDOS (u tzv. path-u).\n"
			)
		)

		(set #copy "Kopiram %s u %s...")

		(set #program-update "Kako �elite da osve�ite tul tajpove ikone?")

		(set #update-none "Bez osve�avanja")

		(set #update-all "Dodaj sve")

		(set #update-since "Dodaj nove od %s")

		(set #program-update-help
			(cat
				"    Po�to ovaj skript osve�ava prethodne verzije Visage-a, nova "
				"ikona ne�e biti kopirana preko stare. Tako �e biti sa�uvane "
				"promene koje ste mo�da napravili. Me�utim mo�da su dodati novi "
				"tul tajpovi. Ovde mo�ete odabrati na�in osve�avanja:\n"
				"    Bez osve�avanja: Presko�i ovaj deo.\n"
				"    Dodaj sve: postoje�i tultajpovi ne�e biti promenjeni. Ako "
				"ste obrisali neke tul tajpove oni �e ponovo biti dodani kao i "
				"novi.\n "
				"    Dodaj nove od 39.x: Dodaj nove tul tajpove od odabrane "
				"verzije. "
				"Svi postoje�i tul tajpovi ne�e biti promenjeni.\n"
			)
		)
	)
)


;**************************************************************************
;
; Finnish strings
;

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

		(set #bad-kick
			"Tarvitset AmigaOS-version 3.0 tai uudemman k�ytt��ksesi Visagea."
		)

		(set #welcome
			(cat
				"\n\n\nTervetuloa Visagen asennusohjelmaan.\n\n"
				"T�m� ohjelma asentaa Visagen Amigaasi.\n\n\n"
				"Visage � 1995-97  Magnus Holmgren."
			)
		)

		(set #install-parts "Valitse osat, jotka haluat asentaa:")

		(set #item-visage "Visage")

		(set #item-visage-guide "Visage.guide")

		(set #item-locale "K��nn�kset")

		(set #item-codec "JPEG codec")

		(set #install-parts-help
			(cat
				"    T�ss� valitset ne osat Visagesta, jotka haluat asentaa. Sen j�lkeen "
				"m��rit�t asennuksen yksityiskohdat (kuten mihin eri tiedostot asennetaan). "
				"Voit valita asennettavaksi seuraavat osat:\n"
				"    Visage: Varsinainen kuvann�ytt�ohjelma.\n"
				"    Visage.guide: Ohjetiedosto AmigaGuide� -muodossa. Jos asennat t�m�n "
				"asennusohjelmalla, teksti sovitetaan mahtumaan nykyisen ikkunan leveyteen. "
				"Jos asennat ohjeet itse, teksti on sidottu 76 merkin leveyteen.\n"
				"    K��nn�kset: Jos asennat k��nn�kset, Visage voi toimia k�ytt�en "
				"valitsemiasi kieli�.\n"
				"    JPEG codec: \"The Tower JPEG Codec Class\". Visage tarvitsee t�m�n "
				"JPEG-kuvien n�ytt�miseen (k�ytt�m�tt� tietotyyppej�).\n"
				"    GetModeID: Ohjelma, joka avaa n�ytt�tilavalitsimen ja tulostaa "
				"valitun n�ytt�tilan tunnuksen desimaalilukuna.\n"
				"    Kill: Ohjelma, joka voi pys�ytt�� toisia ohjelmia (l�hett�m�ll� "
				"\"keskeytys\"-signaaleja). Toimii kuten Break-komento.\n"
				"    MakeLink: Korvaava komento MakeLinkille, joka tukee my�s "
				"symbolisia (soft) linkkej�.\n"
				"    DeleteLink: Yksinkertainen Delete-klooni, joka poistaa my�s ilman "
				"kohdetiedostoa olevia symbolisia (soft) linkkej�.\n"
				"    UnpackILBM: Ohjelma, joka purkaa kuvatiedon IFF ILBM -kuvasta "
				"(BODY-hunkin).\n"
				"    Lis�tietoja n�ist� osista saat lukemalla ohjetiedoston.\n"
			)
		)

		(set #where-visage "Mihin haluat asentaa Visagen?\nUutta hakemistoa EI luoda!")

		(set #where-visage-guide "Mihin haluat asentaa ohjetiedoston Visage.guide?")

		(set #copy-guide-icon "Kopioidaanko ikoni tiedostolle Visage.guide?")

		; (set #convert-guide "Muokkaan tiedostoa Visage.guide...")

		(set #which-language "Mitk� kielitiedostot asennetaan?")

		(set #which-language-help
			(cat
				"    Amigaa voidaan k�ytt�� monilla kielill�. Jos haluat Visagen "
				"k�ytt�v�n samaa kielt� kuin Workbench, muutama sanasto joudutaan "
				"kopioimaan kiintolevyllesi jokaista tuettua kielt� kohden.\n"
				"    V�hent��ksesi kielitiedostojen vaatimaa levytilaa, voit valita "
				"asennettavaksi vain tiettyjen kielten tiedostot.\n"
				"    Merkitse laatikot niiden kielten kohdalla, joiden haluat "
				"olevan k�ytett�viss� j�rjestelm�ss�si.\n"
			)
		)

		(set #where-language
			(cat
				"Mihin haluat asentaa kielitiedostot?\n\n"
				"Voit asentaa ne joko samaan hakemistoon ohjelman kanssa "
				"(valitse \"Ohjelma\") tai 'yleiseen' taltioon "
				"\"Locale:\" (valitse \"Locale:\")."
			)
		)

		(set #lang-progdir "Ohjelma")

		(set #lang-locale  "Locale:")

		(set #where-language-help
			(cat
				"    Jos asennat kielitiedostot samaan hakemistoon kuin Visagen "
				"(tai paremminkin tuon hakemiston alihakemistoon), joudut "
				"siirt�m��n my�s n�m� tiedostot, mik�li siirr�t Visagen johonkin "
				"toiseen hakemistoon. Jos asennat kielitiedostot taltioon "
				"\"Locale:\", sinun ei tarvitse v�litt�� niist� siirt�ess�si "
				"Visagen. Toisaalta sinulla ei silloin ole kaikkia Visageen "
				"liittyvi� tiedostoja k�tev�sti samassa hakemistossa."
			)
		)

		(set #builtin-lang "(oletus)")

		(set #where-tools "Mihin haluat asentaa apuohjelmat?")

		(set #where-tools-help
			(cat
				"    T�ss� m��rit�t, mihin ohjelmat GetModeID, Kill, MakeLink, "
				"DeleteLink ja UnpackILBM asennetaan. Vain valitsemasi ohjelmat "
				"asennetaan. Koska n�m� ohjelmat voi k�ynnist�� vain komentotulkista, "
				"oletuspaikka on taltio C:, jossa j�rjestelm�n komentotulkista "
				"k�ynnistett�v�t ohjelmat ovat.\n"
				"    On suositeltavaa, ett� asennat n�m� ohjelmat johonkin komentojen "
				"hakupolun varrella olevaan hakemistoon.\n"
			)
		)

		(set #copy "Kopioidaan %s nimelle %s...")

		(set #program-update "Miten haluat p�ivitt�� ikonin m��reet?")

		(set #update-none "�l� p�ivit�")

		(set #update-all "Lis�� kaikki")

		(set #update-since "Lis�� uudet version %s j�lkeen")

		(set #program-update-help
			(cat
				"    Koska t�m� asennus p�ivitt�� Visagen vanhemman version, "
				"ikonia ei kopioida uudelleen. T�m� s�ilytt�� siihen mahdollisesti "
				"tekem�si muutokset. Uusia m��reit� on kuitenkin ehk� lis�tty. "
				"T�ss� voit p��tt��, mit� haluat tehd�:\n"
				"    �l� p�ivit�: Ohita t�m� osa asennuksesta.\n"
				"    Lis�� kaikki m��reet: Olemassa olevia m��reit� ei muuteta. "
				"Kaikki poistamasi m��reet lis�t��n uudelleen. My�s t�ysin uudet "
				"m��reet lis�t��n.\n"
				"    Lis�� uudet 39.x:n j�lkeen: Lis�� vain kyseisen version "
				"j�lkeen lis�tyt m��reet. Olemassa olevia m��reit� ei muuteta.\n"
			)
		)
	)
)


;**************************************************************************
;
; Swedish strings
;

(if (= @language "svenska")
	(
		(set #default-lang #swedish-lang)

		(set #bad-kick
			"Du m�ste ha AmigaOS version 3.0 eller h�gre f�r att kunna anv�nda Visage."
		)

		(set #welcome
			(cat
				"\n\n\nV�lkommen till Installeraren.\n\n"
				"Det h�r programmet l�ter dig installera Visage i din Amiga.\n\n\n"
				"Visage � 1995-97 av Magnus Holmgren."
			)
		)

		(set #install-parts "V�lj de delar du vill installera")

		(set #item-visage "Visage")

		(set #item-visage-guide "Visage.guide")

		(set #item-locale "�vers�ttningar")

		(set #install-parts-help
			(cat
				"  H�r v�ljer du de olika delar av Visage som du vill installera. "
				"Efter det anger du detaljer om installationen (s�som var de olika "
				"filerna ska installeras). Du kan v�lja mellan f�ljande delar:\n"
				"  Visage: Sj�lva bildvisaren.\n"
				"  Visage.guide: Manualen, i AmigaGuide�-format. Om du installerar "
				"den med Installeraren, s� kommer texten att formateras om efter "
				"f�nstrets aktuella storlek. Om du installerar den manuellt, s� "
				"�r texten fixerad vid 76 kolumner.\n"
				"  �vers�ttningar: Om du installerar en �vers�ttning, s� kan "
				"Visage anv�nda det spr�ket.\n"
				"  GetModeID: Ett program som visar en sk�rml�gesv�ljare, och "
				"sedan skriver ut ett decimalt tal som motsvarar det valda "
				"sk�rml�get.\n"
				"  Kill: Ett program som kan stoppa andra program (genom att "
				"skicka \"break\"-signaler). Liknar Break.\n"
				"  MakeLink: En er�ttning f�r MakeLink, som st�djer s� kallade "
				"mjuka l�nkar.\n"
				"  DeleteLink: En enkel Delete-variant, som ocks� kan radera "
				"mjuka l�nkar d�r m�lfilen saknas.\n"
				"  UnpackILBM: Ett program som packar upp bilddatan i en IFF ILBM "
				"bild (BODY \"chunken\").\n"
				"    F�r mer information om de h�r sakerna, se manualen.\n"
			)
		)

		(set #where-visage "Var vill du installera Visage?\nEn l�da kommer INTE att skapas!")

		(set #where-visage-guide "Var vill du installera Visage.guide?")

		(set #copy-guide-icon "Ska jag kopiera ikonen f�r Visage.guide?")

		; (set #convert-guide "Konverterar Visage.guide...")

		(set #which-language "Vilka spr�k ska installeras?")

		(set #which-language-help
			(cat
				"  Amigan kan arbeta med flera olika spr�k. Om du vill att "
				"Visage 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"
			)
		)

		(set #where-language
			(cat
				"Var vill du installera katalogfilerna?\n\n"
				"Du kan antingen installera dem i samma l�da som programmet "
				"(v�lj \"Program\"), eller i den \"globala\" enheten "
				"\"Locale:\" (v�lj \"Locale:\")."
			)
		)

		(set #lang-progdir "Program")

		(set #lang-locale  "Locale:")

		(set #where-language-help
			(cat
				"  Om du installerar katalogfilerna i samma l�da som "
				"Visage (eller snarare i underl�dor i den l�dan), s� "
				"kommer du att beh�va flytta de h�r filerna, om du "
				"flyttar Visage till n�gon annan l�da. Om du installerar "
				"katalogfilerna i \"Locale:\" s� beh�ver du inte bekymra "
				"dig om dem ifall du flyttar Visage. � andra sidan, alla "
				"Visage-relaterade filer kommer inte att finnas i samma "
				"l�da."
			)
		)

		(set #builtin-lang "(inbyggt)")

		(set #where-tools "Var vill du installera de extra programmen?")

		(set #where-tools-help
			(cat
				"  H�r anger du var programmen GetModeID, Kill, MakeLink "
				"DeleteLink och UnpackILBM ska installeras n�gonstans. Bara "
				"de program som du valde tidigare kommer att kopieras. "
				"Eftersom de h�r programmen bara kan anv�ndas fr�n ett "
				"skal, s� �r den f�rvalda destinationen C:, eftersom "
				"systemets \"skalprogram\" finns d�r. Det rekommenderas "
				"att du installerar dessa program n�gonstans i s�kv�gen "
				"f�r kommandon.\n"
			)
		)

		(set #copy "Kopierar %s till %s...")

		(set #program-update "Hur vill du uppdatera verktygstyperna i ikonen?")

		(set #update-none "Uppdatera inte")

		(set #update-all "L�gg till alla")

		(set #update-since "L�gg till nya sedan %s")

		(set #program-update-help
			(cat
				"  Eftersom den h�r installationen uppdaterar en gammal version "
				"av Visage, s� kommer inte ikonen att kopieras. Detta f�r att "
				"bibeh�lla eventuella �ndringar som du kan ha gjort. Men nya "
				"verktygstyper kan ha tillkommit. H�r kan du avg�ra vad du "
				"vill g�ra:\n"
				"  Uppdatera inte: Hoppa �ver detta.\n"
				"  L�gg till alla: L�gg till alla verktygstyper. Existerande "
				"verktygstyper kommer inte att �ndras.\n"
				"  L�gg till nya sedan 39.x: L�gg bara till de nya "
				"verktytstyperna. Eventuella existerande verktygstyper "
				"kommer inte att �ndras.\n"
			)
		)
	)
)

;**************************************************************************
;
; The actual installaion script
;

; Check Kickstart version. Exit if not at least 3.0
(if (< (/ (getversion) 65536) 39)
        (abort #bad-kick)
)

; Since files probably are scatter installed, don't mention any specific location.
(set @default-dest "")

; Version of old program. This means no old program.
(set #visagever 0)
(set #visagerev 0)

; Request proportinal fonts, if supported. This string is
; prepended to the first askoptions choice.
(if (>= @installer-version 2752518)     ; 42 * 65536 + 6
	; At least version 42.6
	(set #propfont "")
	; Pre V42
	(set #propfont "")
)

; Greetings Mr. Falken...
(message #welcome)

(welcome)

; Ask the user what to install
(set #install-files
	(askoptions
		(prompt	#install-parts)
		(help	#install-parts-help "\n" @askoptions-help)
		(choices
			(cat #propfont #item-visage)
			#item-visage-guide
			#item-locale
			#item-getmodeid
			#item-kill
			#item-makelink
			#item-deletelink
			#item-unpackilbm
		)
		(default (if (= @user-level 2) 255 7))
	)
)

; Ask the user for the location of all parts

; Location for Visage
(if (BITAND #install-files 1)
	(
		(set #visage-dest
			(askdir
				(prompt  #where-visage)
				(help    @askdir-help)
				(default "Sys:Utilities")
			)
		)

		; Get the version of previously installed Visage
		(if (= (exists (tackon #visage-dest "Visage")) 1)
			(
				(set #vernum (getversion (tackon #visage-dest "Visage")))
				(set #visagever (/ #vernum 65536))
				(set #visagerev (- #vernum (* #visagever 65536)))

				; Just in case the above failed...
				(if (<= #visagever 38)
					(
						(set #visagever 39)
						(set #visagerev 0)
					)
				)
			)
		)

		(set #update-action 0)

		(if (AND #visagever (= (exists (tackon #visage-dest "Visage.info")) 1))
			(
				(set #defaction 0)

				(if (= #visagerev 0)
					(set #defaction 2)
				)

				(if (= #visagerev 1)
					(set #defaction 3)
				)

				(if (= #visagerev 2)
					(set #defaction 4)
				)

				(if (= #visagerev 5)
					(set #defaction 5)
				)

				(if (= #visagerev 10)
					(set #defaction 6)
				)

				(set #update-action
					(askchoice
						(prompt		#program-update)
						(choices	(cat #propfont #update-none)
								#update-all
								(#update-since "39.0")
								(#update-since "39.1")
								(#update-since "39.2")
								(#update-since "39.5")
								(#update-since "39.10")
								(#update-since "39.11")
						)
						(default	#defaction)
						(help		#program-update-help "\n" @askchoice-help)
					)
				)

				(set #tt39-1  "DITHER COMPACT TIME")
				(set #tt39-2  "COMMAND CYCLE NOCLICK NORMALNAMES RTG SORT TEST VCENTER")
				(set #tt39-3  "INFO SHOWINFO")
				(set #tt39-6  "NOICON NOFOREIGN")
				(set #tt39-11 "BORDERBLANK NOFILECHECK")
				(set #tt39-12 "COLOR DRAWER GAMMA NOPNG PATTERN")

				(set #icon-dest (tackon #visage-dest "Visage"))
				(set #tooltype-pattern
					(select #update-action
						""
						"#?"
						("%s %s %s %s %s %s" #tt39-12 #tt39-11 #tt39-6 #tt39-3 #tt39-2 #tt39-1)
						("%s %s %s %s %s"    #tt39-12 #tt39-11 #tt39-6 #tt39-3 #tt39-2)
						("%s %s %s %s"       #tt39-12 #tt39-11 #tt39-6 #tt39-3)
						("%s %s %s"          #tt39-12 #tt39-11 #tt39-6)
						("%s %s"             #tt39-12 #tt39-11)
						("%s"                #tt39-12 )
					)
				)
			)
		)
	)
)

; Location for Visage.guide
(if (BITAND #install-files 2)
	(
		(set #guide-dest #visage-dest)

		(if (exists "Help:")
			(set #guide-dest "Help:")
		)

		(set #guide-dest
			(askdir
				(prompt  #where-visage-guide)
				(help    @askdir-help)
				(default #guide-dest)
			)
		)

		(set #dest-guide-name (tackon #guide-dest "Visage.guide.info"))

		(set #guide-icon
			(if (AND (= @user-level 2 ) (= (exists #dest-guide-name) 0))
				(askbool
					(prompt #copy-guide-icon)
					(help	" ")
				)
				1	; Default is to copy the icon
			)
		)
	)
)

(set #languages 0)

; .ct
; Which languages that should be installed.
(if (BITAND #install-files 4)
	(set #lang
		(askoptions
			(prompt	#which-language)
			(help	#which-language-help "\n" @askoptions-help)
			(choices
				(cat #propfont "Deutsch")
				(cat "English  " #builtin-lang)
				"Espa�ol"
				"Fran�ais"
				"Italiano"
				"Nederlands"
				"Norsk"
				"Russian"
				"Srpski"
				"Suomi"
				"Svenska"
			)
			(default #default-lang)
		)
	)
)

; Default to install catalog files in the same drawer as Visage.
(set #catalog-dest (tackon #visage-dest "Catalogs"))

; Where should the catalogs be installed? Only do this if we have
; an expert user, and any non-english language was selected.
(if (AND (BITAND #install-files 1) (<> #lang 0) (<> #lang #english-lang) (= @user-level 2))
	(
		(set #choice
			(askbool
				(prompt  #where-language)
				(help    #where-language-help "\n" @askbool-help)
				(default 1)
				(choices #lang-progdir #lang-locale)
			)
		)

		(if (NOT #choice)
			(set #catalog-dest "Locale:Catalogs")
		)
	)
)

; Ask for location for extra tools
(if (BITAND #install-files 248)	; 8 + 16 + 32 + 64 + 128
	(set #tool-dest
		(askdir
			(prompt	#where-tools)
			(help	#where-tools-help "\n" @askdir-help)
			(default "C:")
		)
	)
)

; And now do the actual installation

(complete 0)

(if (BITAND #install-files 1)
	(
		(copylib
			(prompt	(#copy "Visage" #visage-dest))
			(source	"Visage")
			(dest	#visage-dest)
		)

		(if (= (exists (tackon #visage-dest "Visage.info")) 0)
			(copyfiles
				(source	"Visage.info")
				(dest	#visage-dest)
			)
			(if (> #update-action 0)
				(run ("C/UpdateTT Visage %s %s" #icon-dest #tooltype-pattern))
			)
		)
	)
)

(complete 25)

(if (BITAND #install-files 2)
	(
		; (working #convert-guide)

		; (run "C/FixAG Visage.guide T:Visage.Guide")

		; (if (not pretend)
			(copylib
				(prompt (#copy "Visage.guide" guide-dest))
				(source "Visage.guide")
				(dest   #guide-dest)
			)
		; )

		; (delete "T:Visage.guide" (safe))

		(if #guide-icon
			(copyfiles
				(source "Visage.guide.info")
				(dest   #guide-dest)
			)
		)
	)
)

(complete 50)

; .ct
(if (BITAND #install-files 4)
	(
		(if (= (exists #catalog-dest) 0)
			(makedir #catalog-dest)
		)

		(set #n 0)

		(while
			(set #language
				(select #n
					"Deutsch"
					"English"
					"Espa�ol"
					"Fran�ais"
					"Italiano"
					"Nederlands"
					"Norsk"
					"Russian"
					"Srpski"
					"Suomi"
					"Svenska"
					""
				)
			)

			(
				(if (AND (IN #lang #n) (<> #language "English"))
					(
						(set #catalog
							(tackon "Catalogs"
								(tackon #language "visage.catalog")
							)
						)

						(set #destination (tackon #catalog-dest #language))

						(copylib
							(prompt (#copy #catalog #destination))
							(source #catalog)
							(dest   #destination)
						)
					)
				)

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

(complete 75)

(if (BITAND #install-files 8)
	(copylib
		(prompt (#copy "GetModeID" #tool-dest))
		(source "C/GetModeID")
		(dest   #tool-dest)
	)
)

(complete 80)

(if (BITAND #install-files 16)
	(copylib
		(prompt (#copy "Kill" #tool-dest))
		(source "C/Kill")
		(dest   #tool-dest)
	)
)

(complete 85)

(if (BITAND #install-files 32)
	(copylib
		(prompt (#copy "MakeLink" #tool-dest))
		(source "C/MakeLink")
		(dest   #tool-dest)
	)
)

(complete 90)

(if (BITAND #install-files 64)
	(copylib
		(prompt (#copy "DeleteLink" #tool-dest))
		(source "C/DeleteLink")
		(dest   #tool-dest)
	)
)

(complete 95)

(if (BITAND #install-files 128)
	(copylib
		(prompt (#copy "UnpackILBM" #tool-dest))
		(source "C/UnpackILBM")
		(dest   #tool-dest)
	)
)

(complete 100)

(exit)