;************************************************
;$VER: MetaView Install 2.8 (12.12.1999)
;Copyright ©1996-99 Henk Jonas
;
;   English         by  Henk Jonas
;   Deutsch         by  Henk Jonas
;   Spanish         by  Dámaso D. Estévez (12.12.99)
;
;
;
;************************************************

(set @app-name "MetaView V2.8")
(set @sourcedir (pathonly @icon))
(set #wbversion (getversion "libs:version.library"))
(set #wbversion (/ #wbversion 65536))

(if (< #wbversion 38)
 (abort (cat "\n\nAmigaDOS 2.1 or better is needed for this software.\n"
             "Este programa necesita AmigaDOS 2.1 o versión superior.\n"
             "Dieses Programm braucht mindestens AmigaDOS 2.1."))
)

;************************************************
;
; which language should i use?
;
;************************************************

(set #language-number 0)
(if (= @language "deutsch")
  (set #language-number 1)
)
(if (= @language "español")
  (set #language-number 2)
)
(if (= @language "polski")
  (set #language-number 3)
)
(if (= @language "ceská")
  (set #language-number 4)
)
(if (= @language "catalá")
  (set #language-number 5)
)
(if (= 2 @user-level)
  (
    (set #language-number
      (askchoice
        (prompt (cat "Please choose your favorite language for the installation.\n"
                     "Por favor, elija el idioma del guión instalador.\n"
                     "Bitte wählen Sie die Sprache, in der die Installation ablaufen soll."))
        (choices "English" "Deutsch" "Español" "Polski" "Ceská" "Catalá")
        (default #language-number)
        (help @askchoice-help)
      )
    )
  )
)

;************************************************
;
; now the texts for the different languages
;
;************************************************
;
; english texts for the install script
;
;************************************************
;/**/

  (set #YES "Yes")
  (set #NO  "No")
  (set #text_copy "Copy")
  (set #text_skip "Skip")
  (set #text_update "Update")

  (set #text_present
     (cat
        "Henk Jonas\n present:\n\n MetaView\n\n"
        "This programm shows and converts gfx-metafile,\n"
        "uses the 'amigametaformat.library'\n and is SHAREWARE."
     )
  )
  (set #text_programm_update
     (cat
        "I found the MetaView drawer,\n"
        "leave the path in the parent directory\n"
        "of the MetaView drawer for\n"
        "updating an existing MetaView installation."
     )
  )
  (set #text_new
     (cat
        "Please choose the destination for MetaView.\n"
        "I will create a MetaView drawer there,\n"
        "if it does not exist."
     )
  )
  (set #text_drawer
     (cat
        "I am creating the drawer 'MetaView'."
     )
  )
  (set #text_library
     (cat
        "Now I will install the 'amigametaformat.library'."
     )
  )
  (set #help_library
     (cat
        "This library are needed for this programm.\n"
        "It is very importent to install this!"
     )
  )
  (set #text_driver
     (cat
        "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
     )
  )
  (set #help_driver
     (cat
        "the options:\n"
        "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
        "* AMF         : are for output as Amiga Metafile Format.\n"
        "* CGM         : are for output as Computer Graphics Metafile.\n"
        "* EPS         : are for output as Encapsulated PostScript.\n"
        "* GEM         : are for output as GEM Metafile.\n"
        "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
        "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
        "* HPGL        : are for output as HPGL (for Plotters)\n"
        "* AI          : are for output as AdobeIllustrator\n"
        "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
        "* WMF         : are for output as WindowsMetaFile\n"
        "* FIG         : are for output as XFIG file\n"
     )
  )
  (set #text_strip
     (cat
        "Now I will install the stripdriver for 'amigametaformat.library'."
     )
  )
  (set #help_strip
     (cat
        "strip for all renderings on screen, printer and ILBM-output\n"
     )
  )
  (set #text_file
     (cat
        "Now I will install the filedriver for 'amigametaformat.library'."
     )
  )
  (set #help_file
     (cat
        "file for saving as Amiga Meta Format Metafile\n"
     )
  )
  (set #text_cgm
     (cat
        "Now I will install the CGMdriver for 'amigametaformat.library'."
     )
  )
  (set #help_cgm
     (cat
        "CGM for saving as Computer Graphics Metafile\n"
     )
  )
  (set #text_eps
     (cat
        "Now I will install the EPSdriver for 'amigametaformat.library'."
     )
  )
  (set #help_eps
     (cat
        "EPS for saving as Encapsulated PostScript\n"
     )
  )
  (set #text_gem
     (cat
        "Now I will install the GEMdriver for 'amigametaformat.library'."
     )
  )
  (set #help_gem
     (cat
        "GEM for saving as GEM Metafile\n"
     )
  )
  (set #text_ww
     (cat
        "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
     )
  )
  (set #help_ww
     (cat
        "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
     )
  )
  (set #text_dr2d
     (cat
        "Now I will install the DR2D-driver for 'amigametaformat.library'."
     )
  )
  (set #help_dr2d
     (cat
        "DR2D-driver for creating DR2D-Output\n"
     )
  )
  (set #text_hpgl
     (cat
        "Now I will install the HPGL-driver for 'amigametaformat.library'."
     )
  )
  (set #help_hpgl
     (cat
        "HPGL-driver for creating HPGL-Output\n"
     )
  )
  (set #text_ai
     (cat
        "Now I will install the AI-driver for 'amigametaformat.library'."
     )
  )
  (set #help_ai
     (cat
        "AI-driver for creating AI-Output\n"
     )
  )
  (set #text_jmf
     (cat
        "Now I will install the JMF-driver for 'amigametaformat.library'."
     )
  )
  (set #help_jmf
     (cat
        "JMF-driver for creating JMF-Output\n"
     )
  )
  (set #text_wmf
     (cat
        "Now I will install the WMF-driver for 'amigametaformat.library'."
     )
  )
  (set #help_wmf
     (cat
        "WMF-driver for creating WMF-Output\n"
     )
  )
  (set #text_fig
     (cat
        "Now I will install the FIG-driver for 'amigametaformat.library'."
     )
  )
  (set #help_fig
     (cat
        "FIG-driver for creating FIG-Output\n"
     )
  )
  (set #text_programm
     (cat
        "copy programm"
     )
  )
  (set #help_programm
     (cat
        "Now, I will copy the programm."
     )
  )
  (set #text_doc
     (cat
        "copy documentation"
     )
  )
  (set #help_doc
     (cat
        "Now, I will copy the documentation.\n"
        "This textfile is obsolete, use the guide instead."
     )
  )
  (set #text_guide
     (cat
        "Now I will copy the guide for MetaView.\n"
        "What is your favorite language?"
     )
  )
  (set #text_english_guide
     (cat
        "copy English MetaView.guide"
     )
  )
  (set #help_english_guide
     (cat
        "Now, I will copy the English MetaView.guide."
     )
  )
  (set #text_german_guide
     (cat
        "copy German MetaView.guide"
     )
  )
  (set #help_german_guide
     (cat
        "Now, I will copy the German MetaView.guide."
     )
  )
  (set #text_spanish_guide
     (cat
        "copy Spanish MetaView.guide"
     )
  )
  (set #help_spanish_guide
     (cat
        "Now, I will copy the Spanish MetaView.guide."
     )
  )
  (set #text_polish_guide
     (cat
        "copy Polish MetaView.guide"
     )
  )
  (set #help_polish_guide
     (cat
        "Now, I will copy the Polish MetaView.guide."
     )
  )
  (set #text_czech_guide
     (cat
        "copy Czech MetaView.guide"
     )
  )
  (set #help_czech_guide
     (cat
        "Now, I will copy the Czech MetaView.guide."
     )
  )
    (set #text_catalan_guide
       (cat
          "copy Catalan MetaView.guide"
       )
    )
    (set #help_catalan_guide
       (cat
          "Now, I will copy the Catalan MetaView.guide."
       )
    )
  (set #text_readme
     (cat
        "copy amigametaformat.readme"
     )
  )
  (set #help_readme
     (cat
        "Now, I will copy the amigametaformat.readme."
     )
  )
  (set #text_arexx
     (cat
        "copy ARexx-Examples"
     )
  )
  (set #help_arexx
     (cat
        "Now, I will copy some ARexx-Examples."
     )
  )
  (set #text_ds
     (cat
        "Do you have DrawStudio installed,\n"
        "and want to im- and export gfx\n"
        "with MetaView?"
     )
  )
  (set #help_ds
     (cat
        "I want to install two ARexx scripts for import and export\n"
        "graphics in DrawStudio with MetaView."
     )
  )
  (set #text_ds_path
     (cat
        "Please choose the DrawStudio ARexx scripts drawer."
     )
  )
  (set #help_ds_path
     (cat
        "I want to install two ARexx scripts for import and export\n"
        "graphics in DrawStudio with MetaView."
     )
  )
  (set #text_ds_import
     (cat
        "copying DrawStudio import script"
     )
  )
  (set #text_ds_export
     (cat
        "copying DrawStudio export script"
     )
  )
  (set #text_pgs
     (cat
        "Do you have PageStream 3.x installed,\n"
        "and want to import gfx with MetaView?"
     )
  )
  (set #help_pgs
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in PageStream with MetaView."
     )
  )
  (set #text_pgs_path
     (cat
        "Please choose the PageStream ARexx scripts drawer."
     )
  )
  (set #help_pgs_path
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in PageStream with MetaView."
     )
  )
  (set #text_pgs_import
     (cat
        "copying PageStream import script"
     )
  )
  (set #text_ww
     (cat
        "Do you have WordWorth installed,\n"
        "and want to import gfx with MetaView?"
     )
  )
  (set #help_ww
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in WordWorth with MetaView."
     )
  )
  (set #text_ww_path
     (cat
        "Please choose the WordWorth ARexx scripts drawer."
     )
  )
  (set #help_ww_path
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in WordWorth with MetaView."
     )
  )
  (set #text_ww_import
     (cat
        "copying WordWorth import script"
     )
  )
  (set #text_fw
     (cat
        "Do you have FinalWriter installed,\n"
        "and want to import gfx with MetaView?"
     )
  )
  (set #help_fw
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in FinalWriter with MetaView."
     )
  )
  (set #text_fw_path
     (cat
        "Please choose the FinalWriter ARexx scripts drawer."
     )
  )
  (set #help_fw_path
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in FinalWriter with MetaView."
     )
  )
  (set #text_fw_import
     (cat
        "copying FinalWriter import script"
     )
  )
  (set #text_examples
     (cat
        "Should I copy the example files?"
     )
  )
  (set #text_examples_copy
     (cat
        "copy Examples"
     )
  )
  (set #help_examples_copy
     (cat
        "Now, I want to copy some Examples."
     )
  )
  (set #text_setpatch
     (cat
        "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
        "This Software are published from Amiga Technologie and\n"
        "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
        "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
     )
  )
  (set #help_setpatch
     (cat
        "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
        "You are advised to install this Patch.\n"
        "But if you get a GURU on MetaView-startup you must!"
     )
  )
  (set #text_setpatch_copy
     (cat
        "copy new SetPatch"
     )
  )
  (set #text_tabs_copy
     (cat
        "copy tabs.gadget"
     )
  )
  (set #text_variable
     (cat
        "Should I update the MetaView.path environment variable?"
     )
  )
  (set #help_variable
     (cat
        "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
     )
  )
  (set #text_envarc
     (cat
        "Create ENVARC: variable with path of MetaView"
     )
  )
  (set #help_envarc
     (cat
        "The variable will be stored resetproof in ENVARC:."
      )
  )
  (set #text_env
     (cat
        "Create ENV: variable with path of MetaView"
     )
  )
  (set #help_env
     (cat
        "The variable will be stored for instant use in ENV:."
     )
  )
  (set #text_keyfile
     (cat
        "copy keyfile"
     )
  )
  (set #help_keyfile
     (cat
        "Now I copy the keyfile."
     )
  )
  (set #text_register
     (cat
        "Don`t forget to register!\n\n"
        "Please send $20 or 30,- DM to me:\n\n"
        "Henk Jonas\n"
        "Zionskirchstr. 28\n"
        "10119 Berlin\n"
        "Germany"
     )
  )
  (set #help_register
     (cat
        "Look at MetaView.readme, MetaView.doc "
        "or MetaView.guide for register."
     )
  )
  (set #text_thanx
     (cat
        "Thank you for registering MetaView!"
     )
  )
;/**/

;************************************************
;
; deutsche Texte für die Installation
;
;************************************************
;/**/

(debug #language-number)
(if (= #language-number 1)
  (
    (set #YES "Ja")
    (set #NO  "Nein")
    (set #text_copy "Kopiere")
    (set #text_skip "Überspringe")
    (set #text_update "Erneuere")

    (set #text_present
       (cat
           "Henk Jonas\n presentiert:\n\n MetaView\n\n"
           "Dieses Programm zeigt Vektorgrafiken an\n"
           "und konvertiert diese,\n"
           "benutzt die 'amigametaformat.library'\n und ist SHAREWARE.\n"
           "\n*Die Texte der Installation wurden übersetzt von:*\n"
           "\n*Henk Jonas - subvcbhd@linux.zrz.tu-berlin.de*\n"
       )
    )
    (set #text_programm_update
       (cat
          "Es wurde die MetaView-Schublade gefunden. "
          "Belasse den Pfad im übergeordneten Verzeichnis der MetaView-Schublade, "
          "um die existierende MetaView-Installation "
          "auf den neusten Stand zu bringen."
       )
    )
    (set #text_new
       (cat
          "Bitte wähle das Zielverzeichnis für MetaView aus. "
          "Es wird eine Schublade mit dem Namen MetaView erzeugt, "
          "wenn in dem Verzeichnis noch keine vorhanden ist."
       )
    )
    (set #text_drawer
       (cat
          "Es wird die Schublade 'MetaView' erzeugt."
       )
    )
    (set #text_library
       (cat
          "Nun wird die 'amigametaformat.library' installiert."
       )
    )
    (set #help_library
       (cat
          "Diese Bibliothek wird von MetaView gebraucht. "
          "Es ist sehr wichtig, sie zu installieren!"
       )
    )
    (set #text_driver
       (cat
          "Nun werden die verschiedenen Ausgabetreiber für die 'amigametaformat.library' installiert."
       )
    )
    (set #help_driver
       (cat
          "Die Optionen:\n"
          "* Strip       : der Treiber für Bildschirm, Drucker und ILBM-Speicherung\n"
          "* AMF         : für die Ausgabe als Amiga Metafile Format.\n"
          "* CGM         : für die Ausgabe als Computer Graphics Metafile.\n"
          "* EPS         : für die Ausgabe als Encapsulated PostScript.\n"
          "* GEM         : für die Ausgabe als GEM Metafile.\n"
          "* WordWorth   : erzeugt ARexx-Skripte, um sie in WordWorth zu benutzen.\n"
          "* DR2D        : für die Ausgabe als DR2D (für PageStream, DrawStudio...)\n"
          "* HPGL        : für die Ausgabe als HPGL (für Plotter)\n"
          "* AI          : für die Ausgabe als AdobeIllustrator\n"
          "* JMF         : für die Ausgabe als JavaMetaFile (für WWW-Veröffentlichungen)\n"
          "* WMF         : für die Ausgabe als WindowsMetaFile\n"
          "* FIG         : für die Ausgabe als XFIG Datei\n"
       )
    )
    (set #text_strip
       (cat
          "Nun wird der strip-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_strip
       (cat
          "'strip' für alle Ausgaben auf dem Bildschirm, dem Drucker und Speichern als ILBM\n"
       )
    )
    (set #text_file
       (cat
          "Nun wird der file-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_file
       (cat
          "'file' zum Speichern als Amiga Meta Format Grafikdatei\n"
       )
    )
    (set #text_cgm
       (cat
          "Nun wird der CGM -Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_cgm
       (cat
          "'CGM' zum Speichern als Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Nun wird der EPS-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_eps
       (cat
          "'EPS' zum Speichern als Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Nun wird der GEM-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_gem
       (cat
          "'GEM' zum Speichern als GEM Grafikdatei\n"
       )
    )
    (set #text_ww
       (cat
          "Nun wird der WordWorth-ARexx-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-Treiber erzeugt WordWorth-ARexx-Skripte\n"
       )
    )
    (set #text_dr2d
       (cat
          "Nun wird der DR2D-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_dr2d
       (cat
          "'DR2D' zum Speichern als DR2D Grafikdatei\n"
       )
    )
    (set #text_hpgl
       (cat
          "Nun wird der HPGL-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_hpgl
       (cat
          "'HPGL' zum Speichern als HPGL Grafikdatei\n"
       )
    )
    (set #text_ai
       (cat
          "Nun wird der AI-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_ai
       (cat
          "'AI' zum Speichern von Adobe Illustrator Grafikdateien\n"
       )
    )
    (set #text_jmf
       (cat
          "Nun wird der JMF-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_jmf
       (cat
          "'JMF' zum Speichern von JMF Grafikdateien\n"
       )
    )
    (set #text_wmf
       (cat
          "Nun wird der WMF-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_wmf
       (cat
          "'WMF' zum Speichern von WMF Grafikdateien\n"
       )
    )
    (set #text_fig
       (cat
          "Nun wird der FIG-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_fig
       (cat
          "'FIG' zum Speichern von FIG Grafikdateien\n"
       )
    )
    (set #text_programm
       (cat
          "kopiere das Programm"
       )
    )
    (set #help_programm
       (cat
          "Nun wird das Programm kopiert."
       )
    )
    (set #text_doc
       (cat
          "kopiere Dokumentation"
       )
    )
    (set #help_doc
       (cat
          "Nun wird die Dokumentation kopiert.\n"
          "Diese Textdatei ist veraltet und es sollte statt dessen das Guide benutzt werden."
       )
    )
    (set #text_guide
       (cat
          "Nun wird die Hilfedatei (Guide) für MetaView kopiert. "
          "Was ist Deine bevorzugte Sprache?"
       )
    )
    (set #text_english_guide
       (cat
          "kopiere englisches MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Nun wird das englische MetaView.guide kopiert."
       )
    )
    (set #text_german_guide
       (cat
          "kopiere deutsches MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Nun wird das deutsche MetaView.guide kopiert."
       )
    )
    (set #text_spanish_guide
       (cat
          "kopiere spanisches MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Nun wird das spanische MetaView.guide kopiert."
       )
    )
    (set #text_polish_guide
       (cat
          "kopiere polnisches MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Nun wird das polnische MetaView.guide kopiert."
       )
    )
    (set #text_czech_guide
       (cat
          "kopiere tschechisches MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Nun wird das tschechische MetaView.guide kopiert."
       )
    )
    (set #text_catalan_guide
       (cat
          "kopiere katalonisches MetaView.guide"
       )
    )
    (set #help_catalan_guide
       (cat
          "Nun wird das katalonische MetaView.guide kopiert."
       )
    )
    (set #text_readme
       (cat
          "kopiere amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Nun wird die Datei 'amigametaformat.readme' kopiert."
       )
    )
    (set #text_arexx
       (cat
          "kopiere ARexx-Beispiele"
       )
    )
    (set #help_arexx
       (cat
          "Nun werden einige Beispiele für die Benutzung von MetaView und "
          "der Skriptsprache ARexx kopiert."
       )
    )
    (set #text_ds
       (cat
          "Hast Du DrawStudio installiert "
          "und möchtest Grafiken mittels "
          "MetaView importieren und exportieren?"
       )
    )
    (set #help_ds
       (cat
          "Zwei ARexx-Skripte zum Im- und Export von Grafiken"
          "in DrawStudio mittels MetaView sollen kopiert werden."
       )
    )
    (set #text_ds_path
       (cat
          "Bitte wähle das Verzeichnis, in dem DrawStudio seine ARexx-Skripte aufbewahrt."
       )
    )
    (set #help_ds_path
       (cat
          "Es werden zwei ARexx-Skripte zum Im- und Export von Grafiken "
          "in DrawStudio mittels MetaView kopiert."
       )
    )
    (set #text_ds_import
       (cat
          "kopiere DrawStudio Import-Skript"
       )
    )
    (set #text_ds_export
       (cat
          "kopiere DrawStudio Export-Skript"
       )
    )
    (set #text_pgs
       (cat
          "Hast Du PageStream 3.x installiert "
          "und möchtest Grafiken mittels MetaView importieren?"
       )
    )
    (set #help_pgs
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in PageStream mittels MetaView kopiert werden."
       )
    )
    (set #text_pgs_path
       (cat
          "Bitte wähle das Verzeichnis aus, in den PageStream seine ARexx-Skripte ablegt."
       )
    )
    (set #help_pgs_path
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in PageStream mittels MetaView kopiert werden."
       )
    )
    (set #text_pgs_import
       (cat
          "kopiere PageStream Import-Skript"
       )
    )
    (set #text_ww
       (cat
          "Hast Du WordWorth installiert "
          "und möchtest Grafiken mittels MetaView importieren?"
       )
    )
    (set #help_ww
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in WordWorth mittels MetaView kopiert werden."
       )
    )
    (set #text_ww_path
       (cat
          "Bitte wähle das Verzeichnis aus, in den WordWorth seine ARexx-Skripte ablegt."
       )
    )
    (set #help_ww_path
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in WordWorth mittels MetaView kopiert werden."
       )
    )
    (set #text_ww_import
       (cat
          "kopiere WordWorth Import-Skript"
       )
    )
    (set #text_fw
       (cat
          "Hast Du FinalWriter installiert "
          "und möchtest Grafiken mittels MetaView importieren?"
       )
    )
    (set #help_fw
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in FinalWriter mittels MetaView kopiert werden."
       )
    )
    (set #text_fw_path
       (cat
          "Bitte wähle das Verzeichnis aus, in den FinalWriter seine ARexx-Skripte ablegt."
       )
    )
    (set #help_fw_path
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in FinalWriter mittels MetaView kopiert werden."
       )
    )
    (set #text_fw_import
       (cat
          "kopiere FinalWriter Import-Skript"
       )
    )
    (set #text_examples
       (cat
          "Sollen einige Beispieldateien kopiert werden?"
       )
    )
    (set #text_examples_copy
       (cat
          "kopiere Beispieldateien"
       )
    )
    (set #help_examples_copy
       (cat
          "Es werden einige Beispieldateien kopiert."
       )
    )
    (set #text_setpatch
       (cat
          "Es soll ein neuer SetPatch-Befehl (43.6) in Dein 'c:' Verzeichnis kopiert werden.\n"
          "Dieser Befehl wurde von Amiga Technologie veröffentlicht und "
          "behebt unteranderem einen Fehler in der 'mathieeesingbas.library' in Kick 3.1.\n"
          "Der alte 'c:SetPatch' wird umbenannt nach 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Wähle 'Kopiere', um den neuen SetPatch-Befehl zu installieren, oder 'Überspringe', um ihn nicht zu installieren.\n"
          "Du solltest diesen Befehl installieren.\n"
          "Wenn direkt beim Starten von MetaView eine GURU erscheint, behebt dieser Befehl das Problem!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "kopiere neuen SetPatch-Befehl"
       )
    )
    (set #text_tabs_copy
       (cat
          "kopiere tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Soll die 'MetaView.path' Umgebungsvariable erneuert werden?"
       )
    )
    (set #help_variable
       (cat
          "Die ARexx-Skripte und der MetaView.datatype benutzen diese Variable, um das Programm 'MetaView' zu finden."
       )
    )
    (set #text_envarc
       (cat
          "erzeuge Variable in ENVARC: mit Pfad von MetaView"
       )
    )
    (set #help_envarc
       (cat
          "Die Variable wird resetfest in ENVARC: gespeichert."
        )
    )
    (set #text_env
       (cat
          "erzeuge Variable in ENV: mit Pfad von MetaView"
       )
    )
    (set #help_env
       (cat
          "Die Variable wird für sofortige Benutzung in ENV: gespeichert."
       )
    )
    (set #text_keyfile
       (cat
          "kopiere Keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Es wird das Keyfile kopiert."
       )
    )
    (set #text_register
       (cat
          "Bitte vergiß nicht Dich registrieren zu lassen, wenn Du das Programm öfter benutzt.\n\n"
          "Bitte sende dazu $20 oder 30,- DM an mich:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Deutschland"
       )
    )
    (set #help_register
       (cat
          "Siehe in die Dateien MetaView.readme, MetaView.doc "
          "oder MetaView.guide nach, wie Du Dich registrieren lassen kannst."
       )
    )
    (set #text_thanx
       (cat
          "Vielen Dank, daß Du Dich für MetaView registrieren lassen hast."
       )
    )
  )
)
;/**/

;************************************************
;
; spanish - español ;)
;
;************************************************
;/**/

(if (= #language-number 2)
  (
    (set #YES "Sí")
    (set #NO  "No")
    (set #text_copy "Copiar")
    (set #text_skip "Saltar esta parte")
    (set #text_update "Actualizar")

    (set #text_present
       (cat
          "Henk Jonas\n presenta:\n\n MetaView\n\n"
          "Este programa, que es SHAREWARE, muestra\n"
          "y convierte ficheros gráficos vectoriales,\n"
          "gracias a la biblioteca `amigametaformat.library'.\n\n"
          "\n*Guión instalador traducido al español por:*\n"
          "*Dámaso D. Estévez <amidde@arrakis.es>*\n"
       )
    )
    (set #text_programm_update
       (cat
          "Se ha encontrado el cajón MetaView: elija como camino\n"
          "de acceso el del directorio en el que se encuentra\n"
          "dicho cajón para actualizar la versión ya instalada."
       )
    )
    (set #text_new
       (cat
          "Por favor, elija el directorio de destino de MetaView:\n"
          "se creará allí el cajón MetaView, si éste aún no existe."
       )
    )
    (set #text_drawer
       (cat
          "Se está creando un cajón llamado `MetaView'."
       )
    )
    (set #text_library
       (cat
          "Ahora se instalará la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "\nEsta  biblioteca es necesaria para el programa... "
          "¡así que es básica su instalación!"
       )
    )
    (set #text_driver
       (cat
          "Ahora se instalarán los diferentes módulos de salida"
          "de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_driver
       (cat
          "\nMódulos disponibles:\n\n"
          "* Strip       : genera cualquier imagen, ya sea en pantalla, ILBM, impresora, etc.\n"
          "* AMF         : genera ficheros en formato `Amiga Metafile Format'.\n"
          "* CGM         : genera ficheros en formato `Computer Graphics Metafile'.\n"
          "* EPS         : genera ficheros en formato `Encapsulated PostScript'.\n"
          "* GEM         : genera ficheros en formato `GEM Metafile'.\n"
          "* WordWorth   : crear guiones ARexx, para usar con WordWorth.\n"
          "* DR2D        : genera ficheros en formato DR2D (PageStream, DrawStudio...)\n"
          "* HPGL        : genera ficheros en formato HPGL (trazadores)\n"
          "* AI          : genera ficheros en formato `AdobeIllustrator'\n"
          "* JMF         : genera ficheros en formato `JavaMetaFile' (autoedición HTML)\n"
          "* WMF         : genera ficheros en formato `WindowsMetaFile'\n"
          "* FIG         : genera ficheros en formato `XFIG'\n"
       )
    )
    (set #text_strip
       (cat
          "Ahora se instalará el módulo auxiliar de bandas de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_strip
       (cat
          "\nMódulo para dividir en bandas todas las imágenes enviada a pantalla, impresora o fichero ILBM\n"
       )
    )
    (set #text_file
       (cat
          "Ahora se instalará el módulo auxiliar de ficheros de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_file
       (cat
          "\nMódulo para guardar ficheros con formato Amiga Meta Format Metafile\n"
       )
    )
    (set #text_cgm
       (cat
          "Ahora se instalará el módulo auxiliar CGM de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_cgm
       (cat
          "\nMódulo para guardar ficheros con formato CGM\n"
       )
    )
    (set #text_eps
       (cat
          "Ahora se instalará el módulo auxiliar EPS de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_eps
       (cat
          "\nMódulo para guardar ficheros con formato EPS\n"
       )
    )
    (set #text_gem
       (cat
          "Ahora se instalará el módulo auxiliar GEM de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_gem
       (cat
          "\nMódulo para guardar ficheros con formato GEM\n"
       )
    )
    (set #text_ww
       (cat
          "Ahora se instalará el módulo auxiliar WordWorth-ARexx de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_ww
       (cat
          "\nMódulo para la creación de guiones WordWorth-ARexx\n"
       )
    )
    (set #text_dr2d
       (cat
          "Ahora se instalará el módulo auxiliar DR2D de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_dr2d
       (cat
          "\nMódulo para la creación de ficheros DR2D\n"
       )
    )
    (set #text_hpgl
       (cat
          "Ahora se instalará el módulo auxiliar HPGL de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_hpgl
       (cat
          "\nMódulo para la creación de ficheros HPGL\n"
       )
    )
    (set #text_ai
       (cat
          "Ahora se instalará el módulo auxiliar AI de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_ai
       (cat
          "\nMódulo para la creación de ficheros AI\n"
       )
    )
    (set #text_jmf
       (cat
          "Ahora se instalará el módulo auxiliar JMF de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "\nMódulo para la creación de fichero JMF\n"
       )
    )
    (set #text_wmf
       (cat
          "Ahora se instalará el módulo auxiliar WMF de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_wmf
       (cat
          "\nMódulo para la creación de ficheros WMF\n"
       )
    )
    (set #text_fig
       (cat
          "Ahora se instalará el módulo auxiliar FIG de la biblioteca `amigametaformat.library'."
       )
    )
    (set #help_fig
       (cat
          "\nMódulo para la creación de ficheros FIG\n"
       )
    )
    (set #text_programm
       (cat
          "Copiar programa"
       )
    )
    (set #help_programm
       (cat
          "\nAhora se procederá a copiar el programa."
       )
    )
    (set #text_doc
       (cat
          "Copiar documentación"
       )
    )
    (set #help_doc
       (cat
          "\nAhora se procederá a copiar la documentación "
          "(este fichero de texto ha quedado obsoleto, "
          "utilice el fichero guía en su lugar)."
       )
    )
    (set #text_guide
       (cat
          "Ahora se procederá a copiar la documentación\n"
          "de MetaView. ¿Qué idioma prefiere?"
       )
    )
    (set #text_english_guide
       (cat
          "Copiar MetaView.guide en inglés"
       )
    )
    (set #help_english_guide
       (cat
          "\nAhora se copiará la versión inglesa del fichero de documentación `MetaView.guide'."
       )
    )
    (set #text_german_guide
       (cat
          "Copiar MetaView.guide en alemán"
       )
    )
    (set #help_german_guide
       (cat
          "\nAhora se copiará la versión alemana del fichero de documentación `MetaView.guide'."
       )
    )
    (set #text_spanish_guide
       (cat
          "Copiar MetaView.guide en español"
       )
    )
    (set #help_spanish_guide
       (cat
          "\nAhora se copiaré la versión en español del fichero de documentación `MetaView.guide'."
       )
    )
    (set #text_polish_guide
       (cat
          "Copiar MetaView.guide en polaco"
       )
    )
    (set #help_polish_guide
       (cat
          "\nAhora se copiará la versión polaca del fichero de documentación `MetaView.guide'."
       )
    )
    (set #text_czech_guide
       (cat
          "Copiar MetaView.guide en checo"
       )
    )
    (set #help_czech_guide
       (cat
          "\nAhora se copiará la versión checa del fichero de documentación `MetaView.guide'."
       )
    )
    (set #text_catalan_guide
       (cat
          "Copiar MetaView.guide en catalán"
       )
    )
    (set #help_catalan_guide
       (cat
          "\nAhora se copiará la versión en catalán del fichero de documentación `MetaView.guide'."
       )
    )
    (set #text_readme
       (cat
          "Copiar el fichero `amigametaformat.readme'"
       )
    )
    (set #help_readme
       (cat
          "\nAhora se copiará el fichero 'amigametaformat.readme'."
       )
    )
    (set #text_arexx
       (cat
          "Copiar ejemplos ARexx"
       )
    )
    (set #help_arexx
       (cat
          "\nAhora se copiarán los ejemplos ARexx."
       )
    )
    (set #text_ds
       (cat
          "¿Tiene instalado el programa DrawStudio y quiere\n"
          "(im|ex)portar gráficos ayudado por MetaView?"
       )
    )
    (set #help_ds
       (cat
          "\nAhora se procederá a instalar un par de guiones ARexx para que el programa "
          "DrawStudio pueda importar/exportar gráficos ayudado de MetaView."
       )
    )
    (set #text_ds_path
       (cat
          "Por favor, elija el cajón donde residen\n"
          "los guiones ARexx de DrawStudio."
       )
    )
    (set #help_ds_path
       (cat
          "\nHa solicitado instalar un par de guiones ARexx para que el programa "
          "DrawStudio pueda importar/exportar gráficos ayudado de MetaView... "
          "y para ello se necesita que indique el camino de acceso correspondiente."
       )
    )
    (set #text_ds_import
       (cat
          "Copiar guión de importación para DrawStudio"
       )
    )
    (set #text_ds_export
       (cat
          "Copiar guión de exportación para DrawStudio"
       )
    )
    (set #text_pgs
       (cat
          "¿Tiene instalado el programa PageStream 3.x y\n"
          "quiere importar gráficos ayudado por MetaView?"
       )
    )
    (set #help_pgs
       (cat
          "\nAhora se procederá a instalar un guión ARexx para que el programa PageStream "
          "pueda importar gráficos ayudado de MetaView."
       )
    )
    (set #text_pgs_path
       (cat
          "Por favor, elija el cajón donde residen\n"
          "los guiones ARexx de PageStream."
       )
    )
    (set #help_pgs_path
       (cat
          "\nHa solicitado instalar un guión ARexx para que el programa PageStream "
          "pueda importar gráficos ayudado de MetaView... y para ello "
          "se necesita que indique el camino de acceso correspondiente."
       )
    )
    (set #text_pgs_import
       (cat
          "Copiar guión de importación para PageStream"
       )
    )
    (set #text_ww
       (cat
          "¿Tiene instalado el programa WordWorth y\n"
          "quiere importar gráficos ayudado por MetaView?"
       )
    )
    (set #help_ww
       (cat
          "\nAhora se procederá a instalar un guión ARexx para que el programa WordWorth "
          "pueda importar gráficos ayudado de MetaView."
       )
    )
    (set #text_ww_path
       (cat
          "Por favor, elija el cajón donde residen\n"
          "los guiones ARexx de WordWorth."
       )
    )
    (set #help_ww_path
       (cat
          "\nHa solicitado instalar un guión ARexx para que el programa WordWorth "
          "pueda importar gráficos ayudado de MetaView... y para ello "
          "se necesita que indique el camino de acceso correspondiente."
       )
    )
    (set #text_ww_import
       (cat
          "Copiar guión de importación para WordWorth"
       )
    )
    (set #text_fw
       (cat
          "¿Tiene instalado el programa FinalWriter y\n"
          "quiere importar gráficos ayudado por MetaView?"
       )
    )
    (set #help_fw
       (cat
          "\nAhora se procederá a instalar un guión ARexx para que el programa FinalWriter "
          "pueda importar gráficos ayudado de MetaView."
       )
    )
    (set #text_fw_path
       (cat
          "Por favor, elija el cajón donde residen\n"
          "los guiones ARexx de FinalWriter."
       )
    )
    (set #help_fw_path
       (cat
          "\nHa solicitado instalar un guión ARexx para que el programa FinalWriter "
          "pueda importar gráficos ayudado de MetaView... y para ello "
          "se necesita que indique el camino de acceso correspondiente."
       )
    )
    (set #text_fw_import
       (cat
          "Copiar guión de importación para FinalWriter"
       )
    )
    (set #text_examples
       (cat
          "¿Quiere que copie los ficheros de ejemplo?"
       )
    )
    (set #text_examples_copy
       (cat
          "Copiar ficheros de ejemplo"
       )
    )
    (set #help_examples_copy
       (cat
          "\nAhora se van a copiar algunos ejemplos en el directorio `Examples'."
       )
    )
    (set #text_setpatch
       (cat
          "Ahora se procederá a copiar una nueva versión de `SetPatch' (43.6) en el "
          "directorio `c:' de su sistema (este programa ha sido publicado por Amiga "
          "Technologies y corrige algunos errores de la biblioteca "
          "`mathieeesingbas.library' disponible con la Kickstart 3.1): "
          "la versión antigua `c:SetPatch' será renombrada como `c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "\nPresione el botón `Copiar'/`Copy' para instalar el nuevo `SetPatch' "
          "o `Saltar esta parte' para no hacerlo.\nPersonalmente, le recomiendo "
          "que lo instale, pero si al poner en marcha MetaView se produce un gurú, "
          "¡tendrá que instalarlo forzosamente!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "Copiar nueva versión de `SetPatch'"
       )
    )
    (set #text_tabs_copy
       (cat
          "Copiar elemento de la\ninterfaz gráfica `tabs.gadget'"
       )
    )
    (set #text_variable
       (cat
          "¿Debería ser actualizada la variable de entorno `MetaView.path'?"
       )
    )
    (set #help_variable
       (cat
          "\nLos guiones ARexx y el módulo "MetaView.datatype" utilizarán la variable de entorno para localizar el ejecutable."
       )
    )
    (set #text_envarc
       (cat
          "Se crearé una variable en `ENVARC:' que contiene el camino de acceso a MetaView"
       )
    )
    (set #help_envarc
       (cat
          "\nLa variable de entorno será almacenada en `ENVARC:' de manera que sus contenidos se conservarán aunque se reinicie el sistema."
        )
    )
    (set #text_env
       (cat
          "Se creará una variable en `ENV:' que contiene el camino de acceso a MetaView."
       )
    )
    (set #help_env
       (cat
          "\nLa variable de entorno será almacenada en `ENV:' para que sea utilizada en la sesión actual."
       )
    )
    (set #text_keyfile
       (cat
          "Copiar fichero llave"
       )
    )
    (set #help_keyfile
       (cat
          "\nAhora se copiará el fichero llave (¡recuerde que éste es personal e instranferible!)."
       )
    )
    (set #text_register
       (cat
          "¡No olvide registrarse!\n\n"
          "Por favor, envíe\n20 dólares EE.UU. o\n30 marcos alemanes a:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Germany"
       )
    )
    (set #help_register
       (cat
          "\nConsulte los ficheros `MetaView.readme', `MetaView.doc' "
          "o `MetaView.guide' para obtener (más) información de cómo registrarse."
       )
    )
    (set #text_thanx
       (cat
          "¡Gracias por registrar MetaView!"
       )
    )
  )
)
;/**/

;************************************************
;
; polnisch
;
;************************************************
;/**/

(if (= #language-number 3)
  (
    (set #YES "Yes")
    (set #NO  "No")
    (set #text_copy "Copy")
    (set #text_skip "Skip")
    (set #text_update "Update")

    (set #text_present
       (cat
          "Henk Jonas\n present:\n\n MetaView\n\n"
          "This programm shows and converts gfx-metafile,\n"
          "uses the 'amigametaformat.library'\n and is SHAREWARE."
           ;"\n*Translated bla,bla,bla:*\n"
           ;"*Your Name - Your EMail*\n"
       )
    )
    (set #text_programm_update
       (cat
          "I found the MetaView drawer,\n"
          "leave the path in the parent directory\n"
          "of the MetaView drawer for\n"
          "updating an existing MetaView installation."
       )
    )
    (set #text_new
       (cat
          "Please choose the destination for MetaView.\n"
          "I will create a MetaView drawer there,\n"
          "if it does not exist."
       )
    )
    (set #text_drawer
       (cat
          "I am creating the drawer 'MetaView'."
       )
    )
    (set #text_library
       (cat
          "Now I will install the 'amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "This library are needed for this programm.\n"
          "It is very importent to install this!"
       )
    )
    (set #text_driver
       (cat
          "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
       )
    )
    (set #help_driver
       (cat
          "the options:\n"
          "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
          "* AMF         : are for output as Amiga Metafile Format.\n"
          "* CGM         : are for output as Computer Graphics Metafile.\n"
          "* EPS         : are for output as Encapsulated PostScript.\n"
          "* GEM         : are for output as GEM Metafile.\n"
          "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
          "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
          "* HPGL        : are for output as HPGL (for Plotters)\n"
          "* AI          : are for output as AdobeIllustrator\n"
          "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
          "* WMF         : are for output as WindowsMetaFile\n"
          "* FIG         : are for output as XFIG file\n"
       )
    )
    (set #text_strip
       (cat
          "Now I will install the stripdriver for 'amigametaformat.library'."
       )
    )
    (set #help_strip
       (cat
          "strip for all renderings on screen, printer and ILBM-output\n"
       )
    )
    (set #text_file
       (cat
          "Now I will install the filedriver for 'amigametaformat.library'."
       )
    )
    (set #help_file
       (cat
          "file for saving as Amiga Meta Format Metafile\n"
       )
    )
    (set #text_cgm
       (cat
          "Now I will install the CGMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_cgm
       (cat
          "CGM for saving as Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Now I will install the EPSdriver for 'amigametaformat.library'."
       )
    )
    (set #help_eps
       (cat
          "EPS for saving as Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Now I will install the GEMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_gem
       (cat
          "GEM for saving as GEM Metafile\n"
       )
    )
    (set #text_ww
       (cat
          "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
       )
    )
    (set #text_dr2d
       (cat
          "Now I will install the DR2D-driver for 'amigametaformat.library'."
       )
    )
    (set #help_dr2d
       (cat
          "DR2D-driver for creating DR2D-Output\n"
       )
    )
    (set #text_hpgl
       (cat
          "Now I will install the HPGL-driver for 'amigametaformat.library'."
       )
    )
    (set #help_hpgl
       (cat
          "HPGL-driver for creating HPGL-Output\n"
       )
    )
    (set #text_ai
       (cat
          "Now I will install the AI-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ai
       (cat
          "AI-driver for creating AI-Output\n"
       )
    )
    (set #text_jmf
       (cat
          "Now I will install the JMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "JMF-driver for creating JMF-Output\n"
       )
    )
    (set #text_wmf
       (cat
          "Now I will install the WMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_wmf
       (cat
          "WMF-driver for creating WMF-Output\n"
       )
    )
    (set #text_fig
       (cat
          "Now I will install the FIG-driver for 'amigametaformat.library'."
       )
    )
    (set #help_fig
       (cat
          "FIG-driver for creating FIG-Output\n"
       )
    )
    (set #text_programm
       (cat
          "copy programm"
       )
    )
    (set #help_programm
       (cat
          "Now, I will copy the programm."
       )
    )
    (set #text_doc
       (cat
          "copy documentation"
       )
    )
    (set #help_doc
       (cat
          "Now, I will copy the documentation.\n"
          "This textfile is obsolete, use the guide instead."
       )
    )
    (set #text_guide
       (cat
          "Now I will copy the guide for MetaView.\n"
          "What is your favorite language?"
       )
    )
    (set #text_english_guide
       (cat
          "copy English MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Now, I will copy the English MetaView.guide."
       )
    )
    (set #text_german_guide
       (cat
          "copy German MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Now, I will copy the German MetaView.guide."
       )
    )
    (set #text_spanish_guide
       (cat
          "copy Spanish MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Now, I will copy the Spanish MetaView.guide."
       )
    )
    (set #text_polish_guide
       (cat
          "copy Polish MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Now, I will copy the Polish MetaView.guide."
       )
    )
    (set #text_czech_guide
       (cat
          "copy Czech MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Now, I will copy the Czech MetaView.guide."
       )
    )
    (set #text_catalan_guide
       (cat
          "copy Catalan MetaView.guide"
       )
    )
    (set #help_catalan_guide
       (cat
          "Now, I will copy the Catalan MetaView.guide."
       )
    )
    (set #text_readme
       (cat
          "copy amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Now, I will copy the amigametaformat.readme."
       )
    )
    (set #text_arexx
       (cat
          "copy ARexx-Examples"
       )
    )
    (set #help_arexx
       (cat
          "Now, I will copy some ARexx-Examples."
       )
    )
    (set #text_ds
       (cat
          "Do you have DrawStudio installed,\n"
          "and want to im- and export gfx\n"
          "with MetaView?"
       )
    )
    (set #help_ds
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_path
       (cat
          "Please choose the DrawStudio ARexx scripts drawer."
       )
    )
    (set #help_ds_path
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_import
       (cat
          "copying DrawStudio import script"
       )
    )
    (set #text_ds_export
       (cat
          "copying DrawStudio export script"
       )
    )
    (set #text_pgs
       (cat
          "Do you have PageStream 3.x installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_pgs
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_path
       (cat
          "Please choose the PageStream ARexx scripts drawer."
       )
    )
    (set #help_pgs_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_import
       (cat
          "copying PageStream import script"
       )
    )
    (set #text_ww
       (cat
          "Do you have WordWorth installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_ww
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_path
       (cat
          "Please choose the WordWorth ARexx scripts drawer."
       )
    )
    (set #help_ww_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_import
       (cat
          "copying WordWorth import script"
       )
    )
    (set #text_fw
       (cat
          "Do you have FinalWriter installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_fw
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_path
       (cat
          "Please choose the FinalWriter ARexx scripts drawer."
       )
    )
    (set #help_fw_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_import
       (cat
          "copying FinalWriter import script"
       )
    )
    (set #text_examples
       (cat
          "Should I copy the example files?"
       )
    )
    (set #text_examples_copy
       (cat
          "copy Examples"
       )
    )
    (set #help_examples_copy
       (cat
          "Now, I want to copy some Examples."
       )
    )
    (set #text_setpatch
       (cat
          "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
          "This Software are published from Amiga Technologie and\n"
          "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
          "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
          "You are advised to install this Patch.\n"
          "But if you get a GURU on MetaView-startup you must!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "copy new SetPatch"
       )
    )
    (set #text_tabs_copy
       (cat
          "copy tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Should I update the MetaView.path environment variable?"
       )
    )
    (set #help_variable
       (cat
          "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
       )
    )
    (set #text_envarc
       (cat
          "Create ENVARC: variable with path of MetaView"
       )
    )
    (set #help_envarc
       (cat
          "The variable will be stored resetproof in ENVARC:."
        )
    )
    (set #text_env
       (cat
          "Create ENV: variable with path of MetaView"
       )
    )
    (set #help_env
       (cat
          "The variable will be stored for instant use in ENV:."
       )
    )
    (set #text_keyfile
       (cat
          "copy keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Now I copy the keyfile."
       )
    )
    (set #text_register
       (cat
          "Don`t forget to register!\n\n"
          "Please send $20 or 30,- DM to me:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Germany"
       )
    )
    (set #help_register
       (cat
          "Look at MetaView.readme, MetaView.doc "
          "or MetaView.guide for register."
       )
    )
    (set #text_thanx
       (cat
          "Thank you for registering MetaView!"
       )
    )
  )
)
;/**/

;************************************************
;
; tschechisch
;
;************************************************
;/**/

(if (= #language-number 4)
  (
    (set #YES "Yes")
    (set #NO  "No")
    (set #text_copy "Copy")
    (set #text_skip "Skip")
    (set #text_update "Update")

    (set #text_present
       (cat
          "Henk Jonas\n present:\n\n MetaView\n\n"
          "This programm shows and converts gfx-metafile,\n"
          "uses the 'amigametaformat.library'\n and is SHAREWARE."
           ;"\n*Translated bla,bla,bla:*\n"
           ;"*Your Name - Your EMail*\n"
       )
    )
    (set #text_programm_update
       (cat
          "I found the MetaView drawer,\n"
          "leave the path in the parent directory\n"
          "of the MetaView drawer for\n"
          "updating an existing MetaView installation."
       )
    )
    (set #text_new
       (cat
          "Please choose the destination for MetaView.\n"
          "I will create a MetaView drawer there,\n"
          "if it does not exist."
       )
    )
    (set #text_drawer
       (cat
          "I am creating the drawer 'MetaView'."
       )
    )
    (set #text_library
       (cat
          "Now I will install the 'amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "This library are needed for this programm.\n"
          "It is very importent to install this!"
       )
    )
    (set #text_driver
       (cat
          "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
       )
    )
    (set #help_driver
       (cat
          "the options:\n"
          "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
          "* AMF         : are for output as Amiga Metafile Format.\n"
          "* CGM         : are for output as Computer Graphics Metafile.\n"
          "* EPS         : are for output as Encapsulated PostScript.\n"
          "* GEM         : are for output as GEM Metafile.\n"
          "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
          "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
          "* HPGL        : are for output as HPGL (for Plotters)\n"
          "* AI          : are for output as AdobeIllustrator\n"
          "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
          "* WMF         : are for output as WindowsMetaFile\n"
          "* FIG         : are for output as XFIG file\n"
       )
    )
    (set #text_strip
       (cat
          "Now I will install the stripdriver for 'amigametaformat.library'."
       )
    )
    (set #help_strip
       (cat
          "strip for all renderings on screen, printer and ILBM-output\n"
       )
    )
    (set #text_file
       (cat
          "Now I will install the filedriver for 'amigametaformat.library'."
       )
    )
    (set #help_file
       (cat
          "file for saving as Amiga Meta Format Metafile\n"
       )
    )
    (set #text_cgm
       (cat
          "Now I will install the CGMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_cgm
       (cat
          "CGM for saving as Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Now I will install the EPSdriver for 'amigametaformat.library'."
       )
    )
    (set #help_eps
       (cat
          "EPS for saving as Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Now I will install the GEMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_gem
       (cat
          "GEM for saving as GEM Metafile\n"
       )
    )
    (set #text_ww
       (cat
          "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
       )
    )
    (set #text_dr2d
       (cat
          "Now I will install the DR2D-driver for 'amigametaformat.library'."
       )
    )
    (set #help_dr2d
       (cat
          "DR2D-driver for creating DR2D-Output\n"
       )
    )
    (set #text_hpgl
       (cat
          "Now I will install the HPGL-driver for 'amigametaformat.library'."
       )
    )
    (set #help_hpgl
       (cat
          "HPGL-driver for creating HPGL-Output\n"
       )
    )
    (set #text_ai
       (cat
          "Now I will install the AI-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ai
       (cat
          "AI-driver for creating AI-Output\n"
       )
    )
    (set #text_jmf
       (cat
          "Now I will install the JMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "JMF-driver for creating JMF-Output\n"
       )
    )
    (set #text_wmf
       (cat
          "Now I will install the WMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_wmf
       (cat
          "WMF-driver for creating WMF-Output\n"
       )
    )
    (set #text_fig
       (cat
          "Now I will install the FIG-driver for 'amigametaformat.library'."
       )
    )
    (set #help_fig
       (cat
          "FIG-driver for creating FIG-Output\n"
       )
    )
    (set #text_programm
       (cat
          "copy programm"
       )
    )
    (set #help_programm
       (cat
          "Now, I will copy the programm."
       )
    )
    (set #text_doc
       (cat
          "copy documentation"
       )
    )
    (set #help_doc
       (cat
          "Now, I will copy the documentation.\n"
          "This textfile is obsolete, use the guide instead."
       )
    )
    (set #text_guide
       (cat
          "Now I will copy the guide for MetaView.\n"
          "What is your favorite language?"
       )
    )
    (set #text_english_guide
       (cat
          "copy English MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Now, I will copy the English MetaView.guide."
       )
    )
    (set #text_german_guide
       (cat
          "copy German MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Now, I will copy the German MetaView.guide."
       )
    )
    (set #text_spanish_guide
       (cat
          "copy Spanish MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Now, I will copy the Spanish MetaView.guide."
       )
    )
    (set #text_polish_guide
       (cat
          "copy Polish MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Now, I will copy the Polish MetaView.guide."
       )
    )
    (set #text_czech_guide
       (cat
          "copy Czech MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Now, I will copy the Czech MetaView.guide."
       )
    )
    (set #text_catalan_guide
       (cat
          "copy Catalan MetaView.guide"
       )
    )
    (set #help_catalan_guide
       (cat
          "Now, I will copy the Catalan MetaView.guide."
       )
    )
    (set #text_readme
       (cat
          "copy amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Now, I will copy the amigametaformat.readme."
       )
    )
    (set #text_arexx
       (cat
          "copy ARexx-Examples"
       )
    )
    (set #help_arexx
       (cat
          "Now, I will copy some ARexx-Examples."
       )
    )
    (set #text_ds
       (cat
          "Do you have DrawStudio installed,\n"
          "and want to im- and export gfx\n"
          "with MetaView?"
       )
    )
    (set #help_ds
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_path
       (cat
          "Please choose the DrawStudio ARexx scripts drawer."
       )
    )
    (set #help_ds_path
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_import
       (cat
          "copying DrawStudio import script"
       )
    )
    (set #text_ds_export
       (cat
          "copying DrawStudio export script"
       )
    )
    (set #text_pgs
       (cat
          "Do you have PageStream 3.x installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_pgs
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_path
       (cat
          "Please choose the PageStream ARexx scripts drawer."
       )
    )
    (set #help_pgs_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_import
       (cat
          "copying PageStream import script"
       )
    )
    (set #text_ww
       (cat
          "Do you have WordWorth installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_ww
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_path
       (cat
          "Please choose the WordWorth ARexx scripts drawer."
       )
    )
    (set #help_ww_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_import
       (cat
          "copying WordWorth import script"
       )
    )
    (set #text_fw
       (cat
          "Do you have FinalWriter installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_fw
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_path
       (cat
          "Please choose the FinalWriter ARexx scripts drawer."
       )
    )
    (set #help_fw_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_import
       (cat
          "copying FinalWriter import script"
       )
    )
    (set #text_examples
       (cat
          "Should I copy the example files?"
       )
    )
    (set #text_examples_copy
       (cat
          "copy Examples"
       )
    )
    (set #help_examples_copy
       (cat
          "Now, I want to copy some Examples."
       )
    )
    (set #text_setpatch
       (cat
          "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
          "This Software are published from Amiga Technologie and\n"
          "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
          "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
          "You are advised to install this Patch.\n"
          "But if you get a GURU on MetaView-startup you must!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "copy new SetPatch"
       )
    )
    (set #text_tabs_copy
       (cat
          "copy tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Should I update the MetaView.path environment variable?"
       )
    )
    (set #help_variable
       (cat
          "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
       )
    )
    (set #text_envarc
       (cat
          "Create ENVARC: variable with path of MetaView"
       )
    )
    (set #help_envarc
       (cat
          "The variable will be stored resetproof in ENVARC:."
        )
    )
    (set #text_env
       (cat
          "Create ENV: variable with path of MetaView"
       )
    )
    (set #help_env
       (cat
          "The variable will be stored for instant use in ENV:."
       )
    )
    (set #text_keyfile
       (cat
          "copy keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Now I copy the keyfile."
       )
    )
    (set #text_register
       (cat
          "Don`t forget to register!\n\n"
          "Please send $20 or 30,- DM to me:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Germany"
       )
    )
    (set #help_register
       (cat
          "Look at MetaView.readme, MetaView.doc "
          "or MetaView.guide for register."
       )
    )
    (set #text_thanx
       (cat
          "Thank you for registering MetaView!"
       )
    )
  )
)
;/**/

;************************************************
;
; catalanisch
;
;************************************************
;/**/

(if (= #language-number 4)
  (
    (set #YES "Yes")
    (set #NO  "No")
    (set #text_copy "Copy")
    (set #text_skip "Skip")
    (set #text_update "Update")

    (set #text_present
       (cat
          "Henk Jonas\n present:\n\n MetaView\n\n"
          "This programm shows and converts gfx-metafile,\n"
          "uses the 'amigametaformat.library'\n and is SHAREWARE."
           ;"\n*Translated bla,bla,bla:*\n"
           ;"*Your Name - Your EMail*\n"
       )
    )
    (set #text_programm_update
       (cat
          "I found the MetaView drawer,\n"
          "leave the path in the parent directory\n"
          "of the MetaView drawer for\n"
          "updating an existing MetaView installation."
       )
    )
    (set #text_new
       (cat
          "Please choose the destination for MetaView.\n"
          "I will create a MetaView drawer there,\n"
          "if it does not exist."
       )
    )
    (set #text_drawer
       (cat
          "I am creating the drawer 'MetaView'."
       )
    )
    (set #text_library
       (cat
          "Now I will install the 'amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "This library are needed for this programm.\n"
          "It is very importent to install this!"
       )
    )
    (set #text_driver
       (cat
          "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
       )
    )
    (set #help_driver
       (cat
          "the options:\n"
          "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
          "* AMF         : are for output as Amiga Metafile Format.\n"
          "* CGM         : are for output as Computer Graphics Metafile.\n"
          "* EPS         : are for output as Encapsulated PostScript.\n"
          "* GEM         : are for output as GEM Metafile.\n"
          "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
          "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
          "* HPGL        : are for output as HPGL (for Plotters)\n"
          "* AI          : are for output as AdobeIllustrator\n"
          "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
          "* WMF         : are for output as WindowsMetaFile\n"
          "* FIG         : are for output as XFIG file\n"
       )
    )
    (set #text_strip
       (cat
          "Now I will install the stripdriver for 'amigametaformat.library'."
       )
    )
    (set #help_strip
       (cat
          "strip for all renderings on screen, printer and ILBM-output\n"
       )
    )
    (set #text_file
       (cat
          "Now I will install the filedriver for 'amigametaformat.library'."
       )
    )
    (set #help_file
       (cat
          "file for saving as Amiga Meta Format Metafile\n"
       )
    )
    (set #text_cgm
       (cat
          "Now I will install the CGMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_cgm
       (cat
          "CGM for saving as Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Now I will install the EPSdriver for 'amigametaformat.library'."
       )
    )
    (set #help_eps
       (cat
          "EPS for saving as Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Now I will install the GEMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_gem
       (cat
          "GEM for saving as GEM Metafile\n"
       )
    )
    (set #text_ww
       (cat
          "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
       )
    )
    (set #text_dr2d
       (cat
          "Now I will install the DR2D-driver for 'amigametaformat.library'."
       )
    )
    (set #help_dr2d
       (cat
          "DR2D-driver for creating DR2D-Output\n"
       )
    )
    (set #text_hpgl
       (cat
          "Now I will install the HPGL-driver for 'amigametaformat.library'."
       )
    )
    (set #help_hpgl
       (cat
          "HPGL-driver for creating HPGL-Output\n"
       )
    )
    (set #text_ai
       (cat
          "Now I will install the AI-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ai
       (cat
          "AI-driver for creating AI-Output\n"
       )
    )
    (set #text_jmf
       (cat
          "Now I will install the JMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "JMF-driver for creating JMF-Output\n"
       )
    )
    (set #text_wmf
       (cat
          "Now I will install the WMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_wmf
       (cat
          "WMF-driver for creating WMF-Output\n"
       )
    )
    (set #text_fig
       (cat
          "Now I will install the FIG-driver for 'amigametaformat.library'."
       )
    )
    (set #help_fig
       (cat
          "FIG-driver for creating FIG-Output\n"
       )
    )
    (set #text_programm
       (cat
          "copy programm"
       )
    )
    (set #help_programm
       (cat
          "Now, I will copy the programm."
       )
    )
    (set #text_doc
       (cat
          "copy documentation"
       )
    )
    (set #help_doc
       (cat
          "Now, I will copy the documentation.\n"
          "This textfile is obsolete, use the guide instead."
       )
    )
    (set #text_guide
       (cat
          "Now I will copy the guide for MetaView.\n"
          "What is your favorite language?"
       )
    )
    (set #text_english_guide
       (cat
          "copy English MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Now, I will copy the English MetaView.guide."
       )
    )
    (set #text_german_guide
       (cat
          "copy German MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Now, I will copy the German MetaView.guide."
       )
    )
    (set #text_spanish_guide
       (cat
          "copy Spanish MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Now, I will copy the Spanish MetaView.guide."
       )
    )
    (set #text_polish_guide
       (cat
          "copy Polish MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Now, I will copy the Polish MetaView.guide."
       )
    )
    (set #text_czech_guide
       (cat
          "copy Czech MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Now, I will copy the Czech MetaView.guide."
       )
    )
    (set #text_catalan_guide
       (cat
          "copy Catalan MetaView.guide"
       )
    )
    (set #help_catalan_guide
       (cat
          "Now, I will copy the Catalan MetaView.guide."
       )
    )
    (set #text_readme
       (cat
          "copy amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Now, I will copy the amigametaformat.readme."
       )
    )
    (set #text_arexx
       (cat
          "copy ARexx-Examples"
       )
    )
    (set #help_arexx
       (cat
          "Now, I will copy some ARexx-Examples."
       )
    )
    (set #text_ds
       (cat
          "Do you have DrawStudio installed,\n"
          "and want to im- and export gfx\n"
          "with MetaView?"
       )
    )
    (set #help_ds
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_path
       (cat
          "Please choose the DrawStudio ARexx scripts drawer."
       )
    )
    (set #help_ds_path
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_import
       (cat
          "copying DrawStudio import script"
       )
    )
    (set #text_ds_export
       (cat
          "copying DrawStudio export script"
       )
    )
    (set #text_pgs
       (cat
          "Do you have PageStream 3.x installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_pgs
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_path
       (cat
          "Please choose the PageStream ARexx scripts drawer."
       )
    )
    (set #help_pgs_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_import
       (cat
          "copying PageStream import script"
       )
    )
    (set #text_ww
       (cat
          "Do you have WordWorth installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_ww
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_path
       (cat
          "Please choose the WordWorth ARexx scripts drawer."
       )
    )
    (set #help_ww_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_import
       (cat
          "copying WordWorth import script"
       )
    )
    (set #text_fw
       (cat
          "Do you have FinalWriter installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_fw
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_path
       (cat
          "Please choose the FinalWriter ARexx scripts drawer."
       )
    )
    (set #help_fw_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_import
       (cat
          "copying FinalWriter import script"
       )
    )
    (set #text_examples
       (cat
          "Should I copy the example files?"
       )
    )
    (set #text_examples_copy
       (cat
          "copy Examples"
       )
    )
    (set #help_examples_copy
       (cat
          "Now, I want to copy some Examples."
       )
    )
    (set #text_setpatch
       (cat
          "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
          "This Software are published from Amiga Technologie and\n"
          "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
          "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
          "You are advised to install this Patch.\n"
          "But if you get a GURU on MetaView-startup you must!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "copy new SetPatch"
       )
    )
    (set #text_tabs_copy
       (cat
          "copy tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Should I update the MetaView.path environment variable?"
       )
    )
    (set #help_variable
       (cat
          "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
       )
    )
    (set #text_envarc
       (cat
          "Create ENVARC: variable with path of MetaView"
       )
    )
    (set #help_envarc
       (cat
          "The variable will be stored resetproof in ENVARC:."
        )
    )
    (set #text_env
       (cat
          "Create ENV: variable with path of MetaView"
       )
    )
    (set #help_env
       (cat
          "The variable will be stored for instant use in ENV:."
       )
    )
    (set #text_keyfile
       (cat
          "copy keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Now I copy the keyfile."
       )
    )
    (set #text_register
       (cat
          "Don`t forget to register!\n\n"
          "Please send $20 or 30,- DM to me:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Germany"
       )
    )
    (set #help_register
       (cat
          "Look at MetaView.readme, MetaView.doc "
          "or MetaView.guide for register."
       )
    )
    (set #text_thanx
       (cat
          "Thank you for registering MetaView!"
       )
    )
  )
)
;/**/

;************************************************
;
; now starts the installation
;
;************************************************

(message #text_present)
(set #user-level @user-level)
(set #defaultdir "ram:")
(if (= 1 (exists ("envarc:MetaView.path")))
  (
    (set #defaultdir (expandpath (tackon (pathonly (getenv "MetaView.path")) "/")))
    (set @parentdir
      (askdir
        (prompt #text_programm_update)
        (help @askdir-help)
        (default #defaultdir)
      )
    )
  )
  (
    (user 2)
    (set @parentdir
      (askdir
        (prompt #text_new)
        (help @askdir-help)
        (default #defaultdir)
      )
    )
    (user #user-level)
  )
)

(set @default-dest (tackon @parentdir "MetaView"))

(makedir @default-dest
  (prompt #text_drawer)
  (help @makedir-help)
  (infos)
)

(complete 5)

(copylib 
  (prompt #text_library)
  (source (tackon @sourcedir "libs/amigametaformat.library"))
  (dest  "libs:")
  (optional "nofail" "force" "askuser")
  (help #help_library)
)

(complete 10)

(set #driver
  (askoptions
    (prompt #text_driver)
    (choices "Strip" "AMF" "CGM" "EPS" "GEM" "WordWorth" "DR2D" "HPGL" "AI" "JMF" "WMF" "FIG")
    (help #help_driver)
  )
)

(complete 20)

(makedir "libs:AMF")

(if (IN #driver 0)
  (copylib 
    (prompt #text_strip)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-strip.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_strip)
  )
)

(complete 21)

(if (IN #driver 1)
  (copylib 
    (prompt #text_file)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-file.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_file)
  )
)

(complete 22)

(if (IN #driver 2)
  (copylib 
    (prompt #text_cgm)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-cgm.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_cgm)
  )
)

(complete 23)

(if (IN #driver 3)
  (copylib 
    (prompt #text_eps)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-eps.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_eps)
  )
)

(complete 24)

(if (IN #driver 4)
  (copylib 
    (prompt #text_gem)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-gem.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_gem)
  )
)

(complete 25)

(if (IN #driver 5)
  (copylib 
    (prompt #text_ww)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-ww.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_ww)
  )
)

(complete 26)

(if (IN #driver 6)
  (copylib 
    (prompt #text_dr2d)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-dr2d.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_dr2d)
  )
)

(complete 27)

(if (IN #driver 7)
  (copylib 
    (prompt #text_hpgl)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-hpgl.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_hpgl)
  )
)

(complete 28)

(if (IN #driver 8)
  (copylib 
    (prompt #text_ai)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-ai.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_ai)
  )
)

(complete 29)

(if (IN #driver 9)
  (copylib 
    (prompt #text_jmf)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-jmf.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_jmf)
  )
)

(complete 30)

(if (IN #driver 10)
  (copylib 
    (prompt #text_wmf)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-wmf.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_wmf)
  )
)

(complete 31)

(if (IN #driver 11)
  (copylib 
    (prompt #text_fig)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-xfig.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_fig)
  )
)

(complete 40)

(copyfiles
  (prompt #text_programm)
  (source (tackon @sourcedir "MetaView"))
  (dest @default-dest)
  (infos)
  (confirm)
  (help #help_programm)
)

(protect
  (tackon @default-dest "MetaView") "+e"
)

(complete 50)

(copyfiles
  (prompt #text_doc)
  (source (tackon @sourcedir "MetaView.doc"))
  (dest @default-dest)
  (infos)
  (confirm)
  (help #help_doc)
)

(complete 60)

(set #language
  (askoptions
    (prompt #text_guide)
    (choices "English" "Deutsch" "Español" "Polski" "Ceská" "Catalá")
    (default (shiftleft 1 #language-number))
    (help @askoptions-help)
  )
)

(complete 61)

(if (IN #language 0)
  (copyfiles
    (prompt #text_english_guide)
    (source (tackon @sourcedir "MetaView.guide"))
    (dest @default-dest)
    (infos)
    (help #help_english_guide)
  )
)

(complete 62)

(if (IN #language 1)
  (copyfiles
    (prompt #text_german_guide)
    (source (tackon @sourcedir "translations/MetaView_deutsch.guide"))
    (dest @default-dest)
    (infos)
    (help #help_german_guide)
  )
)

(complete 63)

(if (IN #language 2)
  (copyfiles
    (prompt #text_spanish_guide)
    (source (tackon @sourcedir "translations/MetaView_espanol.guide"))
    (dest @default-dest)
    (infos)
    (help #help_spanish_guide)
  )
)

(complete 64)

(if (IN #language 3)
  (copyfiles
    (prompt #text_polish_guide)
    (source (tackon @sourcedir "translations/MetaView_polski.guide"))
    (dest @default-dest)
    (infos)
    (help #help_polish_guide)
  )
)

(complete 65)

(if (IN #language 4)
  (copyfiles
    (prompt #text_czech_guide)
    (source (tackon @sourcedir "translations/MetaView_ceska.guide"))
    (dest @default-dest)
    (infos)
    (help #help_czech_guide)
  )
)

(complete 66)

(if (IN #language 5)
  (copyfiles
    (prompt #text_catalan_guide)
    (source (tackon @sourcedir "translations/MetaView_catalá.guide"))
    (dest @default-dest)
    (infos)
    (help #help_catalan_guide)
  )
)

(complete 67)

(copyfiles
  (source (tackon @sourcedir "MetaView_Main.ilbm"))
  (dest @default-dest)
)

(copyfiles
  (source (tackon @sourcedir "MetaView_Font.ilbm"))
  (dest @default-dest)
)

(complete 68)

(copyfiles
  (source (tackon @sourcedir "MetaView_ILBM.ilbm"))
  (dest @default-dest)
)

(copyfiles
  (source (tackon @sourcedir "MetaView_Print.ilbm"))
  (dest @default-dest)
)

(complete 69)

(copyfiles
  (source (tackon @sourcedir "MetaView_Plot.ilbm"))
  (dest @default-dest)
)

(copyfiles
  (source (tackon @sourcedir "MetaView_PS.ilbm"))
  (dest @default-dest)
)

(copyfiles
  (source (tackon @sourcedir "MetaView_Settings.ilbm"))
  (dest @default-dest)
)

(complete 70)

(copyfiles
  (prompt #text_readme)
  (source (tackon @sourcedir "libs/amigametaformat.readme"))
  (dest @default-dest)
  (infos)
  (confirm)
  (help #help_readme)
)

(copyfiles
  (source (tackon @sourcedir "gadgets"))
  (dest (tackon @default-dest "gadgets"))
  (files)
  (all)
  (infos)
)

(complete 75)

(copyfiles
  (source (tackon @sourcedir "SlideShowMV"))
  (dest @default-dest)
  (infos)
)

(protect
  (tackon @default-dest "SlideShowMV") "+e"
)

(complete 80)

(copyfiles
  (prompt #text_arexx)
  (source (tackon @sourcedir "ARexx-Examples"))
  (dest (tackon @default-dest "ARexx-Examples"))
  (files)
  (all)
  (infos)
  (confirm)
  (help #help_arexx)
)

(user 2)
(if (= 1 (askbool
            (prompt #text_ds)
            (choices #YES #NO)
            (help #help_ds)
         )
    )
    (
       (set #dspath
          (askdir
            (prompt #text_ds_path)
            (help #help_ds_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_ds_import)
         (source (tackon @sourcedir "ARexx-Examples/DrawStudio_Import.dsrx"))
         (dest #dspath)
       )
       (copyfiles
         (prompt #text_ds_export)
         (source (tackon @sourcedir "ARexx-Examples/DrawStudio_Export.dsrx"))
         (dest #dspath)
       )
    )
)

(if (= 1 (askbool
            (prompt #text_pgs)
            (choices #YES #NO)
            (help #help_pgs)
         )
    )
    (
       (set #pspath
          (askdir
            (prompt #text_pgs_path)
            (help #help_pgs_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_pgs_import)
         (source (tackon @sourcedir "ARexx-Examples/PageStream_Import.rexx"))
         (dest #pspath)
       )
    )
)

(if (= 1 (askbool
            (prompt #text_ww)
            (choices #YES #NO)
            (help #help_ww)
         )
    )
    (
       (set #wwpath
          (askdir
            (prompt #text_ww_path)
            (help #help_ww_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_ww_import)
         (source (tackon @sourcedir "ARexx-Examples/WordWorth_Import_gfx.rexx"))
         (dest #wwpath)
       )
    )
)

(if (= 1 (askbool
            (prompt #text_fw)
            (choices #YES #NO)
            (help #help_fw)
         )
    )
    (
       (set #fwpath
          (askdir
            (prompt #text_fw_path)
            (help #help_fw_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_fw_import)
         (source (tackon @sourcedir "ARexx-Examples/FinalWriter_Import.rexx"))
         (dest #fwpath)
       )
    )
)
(user #user-level)


(if (= 1 (askbool
            (prompt #text_examples)
            (choices #text_copy #text_skip)
            (help @askbool-help)
            (default 1)
         )
    )
    (copyfiles
      (prompt #text_examples_copy)
      (source (tackon @sourcedir "Examples"))
      (dest (tackon @default-dest "Examples"))
      (files)
      (all)
      (infos)
      (help #help_examples_copy)
    )
)

(complete 85)

(set #osvernum (getversion))
(set #osver (/ #osvernum 65536))
(set #osrev (- #osvernum (* #osver 65536) ) )
(set #oldpatchvernum (getversion "c:SetPatch"))
(set #newpatchvernum (getversion (tackon @sourcedir "SetPatch43_6/SetPatch")))

(if (AND (> #osver 39) (< #oldpatchvernum #newpatchvernum))
  (if (= 1 (askbool
              (prompt #text_setpatch)
              (choices #text_copy #text_skip)
              (help #help_setpatch)
              (default 1)
           )
      )
      (
        (rename "c:SetPatch" "c:SetPatch.old")
        (copylib
          (prompt #text_setpatch_copy)
          (source (tackon @sourcedir "SetPatch43_6/SetPatch"))
          (dest  "c:")
          (optional "nofail" "force" "askuser")
          (help @copylib-help)
        )
      )
      (protect
        "c:SetPatch" "+e"
      )
  )
)

(if (> #osver 38)
  (copylib
     (prompt #text_tabs_copy)
     (source (tackon @sourcedir "libs/gadgets/tabs.gadget"))
     (dest  "libs:gadgets/")
     (optional "nofail" "force" "askuser")
     (help @copylib-help)
  )
)

(complete 90)

(set #result 1)

(if (= 1 (exists ("envarc:MetaView.path")))
  (set #result (askbool
              (prompt #text_variable)
              (choices #text_update #text_skip)
              (help #help_variable)
              (default 1)
          )
  )
)

(if (= 1 #result)
    (
      (textfile
        (prompt #text_envarc)
        (dest "envarc:MetaView.path")
        (append (tackon @default-dest "Metaview"))
        (confirm)
        (help #help_envarc)
      )
      (textfile
        (prompt #text_env)
        (dest "env:MetaView.path")
        (append (tackon @default-dest "Metaview"))
        (confirm)
        (help #help_env)
      )
    )
)

(complete 95)

(user 2)
(if (= 1 (exists (tackon @sourcedir "keyfile.metaview")))
    (copyfiles
      (prompt #text_keyfile)
      (source (tackon @sourcedir "keyfile.metaview"))
      (dest @default-dest)
      (infos)
      (help #help_keyfile)
    )
)
(if (= 0 (exists (tackon @default-dest "keyfile.metaview")))
    (message #text_register
       (help #help_register)
    )
)
(if (= 1 (exists (tackon @default-dest "keyfile.metaview")))
    (message
       #text_thanx
    )
)

(complete 100)