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

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

(if (< #wbversion 38)
  (abort "\n\nAmigaDOS 2.1 or better is needed for this software.")
)

;************************************************
;
; 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 "Please choose your favorite language for the installation")
        (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."
       )
    )
  )
)
;/**/

;************************************************
;
; spanisch
;
;************************************************
;/**/

(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
          "He 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"
          "crearé allí el cajón MetaView, si éste aún no existe."
       )
    )
    (set #text_drawer
       (cat
          "Estoy creando un cajón llamado 'MetaView'."
       )
    )
    (set #text_library
       (cat
          "Ahora instalaré la biblioteca 'amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "\nEsta  biblioteca es necesaria para el programa... "
          "¡así que es muy importante su instalación!"
       )
    )
    (set #text_driver
       (cat
          "Ahora instalaré 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 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 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 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 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 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 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 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 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 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 instalaré el módulo auxiliar JMF de la biblioteca 'amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "\nMódulo para la creación de fichero WMF\n"
       )
    )
    (set #text_wmf
       (cat
          "Ahora 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 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 procederé a copiar el programa."
       )
    )
    (set #text_doc
       (cat
          "Copiar documentación"
       )
    )
    (set #help_doc
       (cat
          "\nAhora procederé a copiar la documentación "
          "(este fichero de texto está obsoleto, utilice "
          "el fichero guía en su lugar)."
       )
    )
    (set #text_guide
       (cat
          "Ahora procederé a copiar la documentación\n"
          "de MetaView. ¿Qué idioma prefiere?"
       )
    )
    (set #text_english_guide
       (cat
          "Copiar guía de MetaView (inglés)"
       )
    )
    (set #help_english_guide
       (cat
          "\nAhora copiaré la versión inglesa del fichero de documentación 'MetaView.guide'."
       )
    )
    (set #text_german_guide
       (cat
          "Copiar guía de MetaView (alemán)"
       )
    )
    (set #help_german_guide
       (cat
          "\nAhora copiaré la versión alemana del fichero de documentación 'MetaView.guide'."
       )
    )
    (set #text_spanish_guide
       (cat
          "Copiar guía de MetaView (español)"
       )
    )
    (set #help_spanish_guide
       (cat
          "\nAhora copiaré la versión española del fichero de documentación 'MetaView.guide'."
       )
    )
    (set #text_polish_guide
       (cat
          "Copiar guía de MetaView (polaco)"
       )
    )
    (set #help_polish_guide
       (cat
          "\nAhora copiaré la versión poloca del fichero de documentación 'MetaView.guide'."
       )
    )
    (set #text_czech_guide
       (cat
          "Copiar guía de MetaView (checo)"
       )
    )
    (set #help_czech_guide
       (cat
          "\nAhora copiaré la versión checa del fichero de documentación 'MetaView.guide'."
       )
    )
    (set #text_catalan_guide
       (cat
          "Copiar guía de MetaView (catalá)"
       )
    )
    (set #help_catalan_guide
       (cat
          "\nAhora copiaré la versión catalá del fichero de documentación 'MetaView.guide'."
       )
    )
    (set #text_readme
       (cat
          "Copiar el fichero 'amigametaformat.readme'"
       )
    )
    (set #help_readme
       (cat
          "\nAhora copiaré el fichero 'amigametaformat.readme'."
       )
    )
    (set #text_arexx
       (cat
          "Copiar ejemplos ARexx"
       )
    )
    (set #help_arexx
       (cat
          "\nAhora copiaré 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 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
          "\nMe ha pedido instalar un par de guiones ARexx para que el programa "
          "DrawStudio pueda importar/exportar gráficos ayudado de MetaView... "
          "y para ello  necesito que me 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 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
          "\nMe ha pedido instalar un guión ARexx para que el programa PageStream "
          "pueda importar gráficos ayudado de MetaView... y para ello "
          "necesito que me 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 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
          "\nMe he pedido instalar un guión ARexx para que el programa WordWorth "
          "pueda importar gráficos ayudado de MetaView... y para ello "
          "necesito que me 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 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
          "\nMe ha pedido instalar un guión ARexx para que el programa FinalWriter "
          "pueda importar gráficos ayudado de MetaView... y para ello "
          "necesito que me 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 voy a copiar algunos ejemplos en el directorio 'Examples'."
       )
    )
    (set #text_setpatch
       (cat
          "Ahora procederé a copiar una nueva versión de 'SetPatch' (43.6) en su "
          "directorio 'c:' (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' "
          "y '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 actualizar 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
          "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
          "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 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)
)

(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 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)
        )
      )
  )
)

(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)

(if (= 1 (exists ("envarc:MetaView.path")))
  (if (= 1 (askbool
              (prompt #text_variable)
              (choices #text_update #text_skip)
              (help #help_variable)
              (default 1)
           )
      )
    (
      (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)