home *** CD-ROM | disk | FTP | other *** search
/ MACD 9 / MACD9.iso / Polminet / BlaBla / 2b_mv_os2.lha / MultiView / Install < prev    next >
Encoding:
Text File  |  1998-08-09  |  42.8 KB  |  1,429 lines
  1. ;
  2. ; $VER: Install MultiView 4.4 (09.08.98)
  3. ;
  4. ; Installer script for MultiView.
  5. ;
  6.  
  7. (set #english-lang    1)
  8. (set #polish-lang     2)
  9. (set #german-lang     4)
  10. (set #norsk-lang      8)
  11. (set #russian-lang   16)
  12. (set #dansk-lang     32)
  13. (set #svenska-lang   64)
  14. (set #italiano-lang 128)
  15. (set #français-lang 256)
  16.  
  17.  
  18. ; Get current language (no need for lots of silly icons! ;). However, this
  19. ; won't properly work for all versions of the Installer. Some don't
  20. ; understand the language "default" in the tool types... :/
  21.  
  22. (if (= (exists "Env:Language") 1)
  23.   ; GetEnv reports "String too long" if the variable doesn't exist! :/
  24.   ; Dunno if this is fixed in V43... But we need to check anyway.
  25.   (set @language (getenv "language"))
  26. )
  27.  
  28.  
  29. ;**************************************************************************
  30. ;
  31. ; English strings
  32. ;
  33.  
  34. (set #default-lang #english-lang)
  35.  
  36. (set #builtin-lang      "(built in)")
  37. (set #bad-kick          "You must have AmigaOS Release 2.04 or higher to use MultiView.")
  38. (set #install-parts     "Please select the parts you wish to install")
  39.  
  40. (set #item-program      "MultiView")
  41. (set #item-library      "FileID.library")
  42. (set #item-guide        "MultiView.guide")
  43. (set #item-locale       "Translations")
  44. (set #item-prefs        "MultiViewPrefs")
  45. (set #item-prefsguide   "MultiViewPrefs.guide")
  46.  
  47. (set #parts-header-help
  48.   (cat
  49.     "    Here you select the different parts of MultiView that you would like to "
  50.     "install. After that, you select the details of the installation (such as "
  51.     "where the different files should be installed). You may choose to install "
  52.     "the following items:\n"
  53.   )
  54. )
  55.  
  56. (set #item-program-help
  57.   (cat
  58.     "    MultiView: This program is a relacement for C= MultiView and should be "
  59.     "installed in SYS:Utilities/ directory.\n"
  60.   )
  61. )
  62.  
  63. (set #item-library-help
  64.   (cat
  65.     "    FileID.library: This library contains filetype recognizing functions.\n"
  66.   )
  67. )
  68.  
  69. (set #item-guide-help
  70.   (cat
  71.     "    MultiView.guide: The manual, in AmigaGuide® format. It contains "
  72.     "some general information about MultiView.\n"
  73.   )
  74. )
  75.  
  76. (set #item-local-help
  77.   (cat
  78.     "    Translations: If you install a translation, then MultiView  "
  79.     "and FileID.library can operate in the language(s) you select.\n"
  80.   )
  81. )
  82.  
  83. (set #item-prefs-help
  84.   (cat
  85.     "    MultiViewPrefs: This program is a configuration program for my MultiView"
  86.     "and should be installed in SYS:Prefs/ directory.\n"
  87.   )
  88. )
  89.  
  90. (set #item-prefsguide-help
  91.   (cat
  92.     "    MultiViewPrefs.guide: The manual, in AmigaGuide® format. It contains "
  93.     "some general information about MultiView Preferences.\n"
  94.   )
  95. )
  96.  
  97. (set #parts-footer-help
  98.   (cat
  99.     "    For more information about these items, please see the manual.\n"
  100.   )
  101. )
  102.  
  103. ; Only for expert users
  104. (set #where-program "Where would you like to install Main program?")
  105. (set #where-program-help
  106.   (cat
  107.     "    MultiView: This program is a replacement for old Multiview written "
  108.     "by Commodore programmers. You should install it in SYS:Utilities.\n"
  109.   )
  110. )
  111. (set #where-library "Where would you like to install FileID.library?")
  112.  
  113. (set #where-library-help
  114.   (cat
  115.     "    FileID.library is a shared library. As such, MultiView"
  116.     "(and applications using it) expects this file to be "
  117.     "avilable via the \"Libs:\"-assign, so please install this "
  118.     "file into the \"Libs:\" drawer, or make sure that the "
  119.     "drawer you install it in will be a part of your "
  120.     "\"Libs:\"-assign.\n"
  121.   )
  122. )
  123.  
  124. (set #where-guide "Where would you like to install documentations?")
  125.  
  126. (set #where-guide-help
  127.   (cat
  128.     "    Documentations are files in the standard AmigaGuide® format. "
  129.     "As MultiView currently makes specific use of this file, you can install "
  130.     "it whereever you find convenient. If you have OS 3.0 or higher, "
  131.     "one such place is \"Help:\", as this is where other AmigaGuide® "
  132.     "files often are installed.\n"
  133.   )
  134. )
  135.  
  136. ; Only for expert users, and an icon wasn't found
  137. (set #copy-guide-icon "Do you want to install the icon for documentation?")
  138.  
  139. (set #copy-guide-icon-help
  140.   (cat
  141.     "    Since you stated that you are an expert user, and there currently "
  142.     "is no icon for documentation where you selected to install it, "
  143.     "you get a chance to decide if the icon should be installed as well.\n"
  144.   )
  145. )
  146.  
  147. (set #where-prefs "Where would you like to install prefs program?")
  148. (set #where-prefs-help
  149.   (cat
  150.     "    MultiViewPrefs: This program is a configuration program for my MultiView"
  151.     "and should be installed in SYS:Prefs/ directory.\n"
  152.   )
  153. )
  154.  
  155. (set #which-language "Which languages should be installed?")
  156.  
  157. (set #which-language-help
  158.   (cat
  159.     "    The Amiga can be operated in many different languages. If you "
  160.     "want MultiView to use the same language as your Amiga Workbench, "
  161.     "then a couple of catalog files must be copied to your harddisk "
  162.     "for each language supported.\n"
  163.     "    To reduce the amount of space consumed by the language files, "
  164.     "you can select to have only the files of specific languages "
  165.     "copied.\n"
  166.     "    Simply check the boxes of the languages you wish to have have "
  167.     "available on your system.\n"
  168.   )
  169. )
  170.  
  171. (set #copy "Copying %s to %s...")
  172.  
  173. ;**************************************************************************
  174. ;
  175. ; Polish strings
  176. ;
  177.  
  178. (if (= @language "polski")
  179.   (
  180.     (set #default-lang #polski-lang)
  181.  
  182.     (set #builtin-lang    "(wbudowany)")
  183.     (set #bad-kick        "Musisz mieê system w wersji przynajmniej 2.04.")
  184.     (set #install-parts   "Wybierz czëôci, które chcesz zainstalowaê")
  185.     (set #item-program    "MultiView")
  186.     (set #item-library    "FileID.library")
  187.     (set #item-guide      "MultiView.guide")
  188.     (set #item-prefs      "MultiViewPrefs")
  189.     (set #item-prefsguide "MultiViewPrefs.guide")
  190.     (set #item-locale     "Tîumaczenia")
  191.  
  192.     (set #parts-header-help
  193.       (cat
  194.         "    Tu moûesz wybraê poszczególne czëôci pakietu do zainstalowania. Potem "
  195.         "wybierzesz gdzie chcesz je zainstalowaê. Do wyboru masz :\n"
  196.       )
  197.     )
  198.  
  199.     (set #item-program-help
  200.       (cat
  201.         "    MultiView: Ten program jest zamiennikiem dla starego MultiView-a napisanego "
  202.         "jeszcze przez ludzi z Commodore. Powinieneô zainstalowaê go w katalogu SYS:Utilities.\n"
  203.       )
  204.     )
  205.  
  206.     (set #item-library-help
  207.       (cat
  208.         "    FileID.library: Ta biblioteka zawiera funkcje do rozpoznawania plików.\n"
  209.       )
  210.     )
  211.  
  212.     (set #item-guide-help
  213.       (cat
  214.         "    MultiView.guide: Dokumentacja w formacie AmigaGuide®.\n"
  215.       )
  216.     )
  217.  
  218.     (set #item-prefs-help
  219.       (cat
  220.         "    MultiViewPrefs: To jest program konfiguracyjny dla mojego MultiView-a "
  221.         "Powinieneô zainstalowaê go w katalogu SYS:Prefs/.\n"
  222.       )
  223.     )
  224.  
  225.     (set #item-prefsguide-help
  226.       (cat
  227.         "    MultiViewPrefs.guide: Dokumentacja w formacie AmigaGuide®.\n"
  228.       )
  229.     )
  230.  
  231.     (set #item-local-help
  232.       (cat
  233.         "    Tîumaczenia: Jeôli chcesz by MultiView i FileID.library mogîy "
  234.         "byê z polskimi komunikatami musisz zainstalowaê odpowiednie katalogi.\n\n"
  235.       )
  236.     )
  237.  
  238.     (set #parts-footer-help
  239.       (cat
  240.         "    Dodatkowe informacje znajdziesz w dokumentacji.\n\n"
  241.       )
  242.     )
  243.  
  244.     ; Only for expert users
  245.     (set #where-program "Gdzie chcesz zainstalowaê gîówny program?")
  246.     (set #where-program-help
  247.       (cat
  248.         "    MultiView: Ten program jest zamiennikiem dla starego MultiView-a napisanego "
  249.         "jeszcze przez ludzi z Commodore. Powinieneô zainstalowaê go w katalogu SYS:Utilities.\n"
  250.       )
  251.     )
  252.  
  253.     (set #where-library "Gdzie chcesz zainstalowaê FileID.library?")
  254.     (set #where-library-help
  255.       (cat
  256.         "    FileID.library jest zwykîâ bibliotekâ. MultiView "
  257.         "i inne programy spodziewajâ sië, ûe znajdâ jâ w Libs:, tak wiëc "
  258.         "musisz jâ zainstalowaê do katalogu bëdâcego czëôciâ twej kolekcji bibliotek.\n"
  259.       )
  260.     )
  261.  
  262.     (set #where-guide "Gdzie chcesz zainstalowaê dokumentacjë?")
  263.     (set #where-guide-help
  264.       (cat
  265.         "    Dokumentacja jest w plikach w standardzie AmigaGuide®. "
  266.         "Proponowanym miejscem jest HELP:\n"
  267.       )
  268.     )
  269.  
  270.     (set #where-prefs "Gdzie chcesz zainstalowaê program konfiguracyjny?")
  271.     (set #where-prefs-help
  272.       (cat
  273.         "    MultiViewPrefs: To jest program konfiguracyjny dla mojego MultiView-a "
  274.         "Powinieneô zainstalowaê go w katalogu SYS:Prefs/.\n"
  275.       )
  276.     )
  277.  
  278.     (set #copy-guide-icon "Czy chcesz zainstalowaê ikonë dla MultiView.guide?")
  279.     (set #which-language "Które jëzyki powinny byê zainstalowane ?")
  280.     (set #copy "Kopiujë %s do %s...")
  281.   )
  282. )
  283.  
  284. ;**************************************************************************
  285. ;
  286. ; Hello, do you speak German?
  287. ; Translation by Sönke Tesch [ATO]
  288.  
  289. (if (= @language "deutsch")
  290.   (
  291.     (set #default-lang #german-lang)
  292.     (set #builtin-lang "(eingebaut)")
  293.     (set #bad-kick "Du mußt AmigaOS 2.04 oder höher haben, um MultiView benutzen zu können!")
  294.     (set #install-parts "Bitte wähle die Teile, die du installieren möchtest.")
  295.     (set #item-program "MultiView")
  296.     (set #item-library "FileID.library")
  297.     (set #item-guide "MultiView.guide")
  298.     (set #item-locale "Übersetzungen")
  299.  
  300.     (set #parts-header-help
  301.       (cat
  302.         "    Hier kannst du auswählen, welche Teile von MultiView installiert "
  303.         "werden sollen. Danach werden die Details festgelegt (z.B. wo genau "
  304.         "alles installiert werden soll).\n"
  305.         "Es können folgende Teile installiert werden:\n"
  306.       )
  307.     )
  308.  
  309.     (set #item-program-help
  310.       (cat
  311.         "    MultiView: Dies ist das Ersatzprogramm für C=`s MultiView. Es "
  312.         "sollte in das Verzeichniss SYS:Utilities/ kopiert werden.\n"
  313.       )
  314.     )
  315.  
  316.     (set #item-library-help
  317.       (cat
  318.         "    FileID.library: Mit Hilfe dieser Funktionsbibliothek werden "
  319.         "Dateitypen identifiziert.\n"
  320.       )
  321.     )
  322.  
  323.     (set #item-guide-help
  324.       (cat
  325.         "    MultiView.guide: Die Anleitung, im AmigaGuide® Format. Sie "
  326.         "enhält einige generelle Informationen über MultiView.\n"
  327.       )
  328.     )
  329.  
  330.     (set #item-local-help
  331.       (cat
  332.         "    Übersetzungen: Wenn eine oder mehrere Übersetzungen installiert "
  333.         "werden, können MultiView und die FileID.library in den entsprechenden "
  334.         "Sprachen arbeiten.\n"
  335.       )
  336.     )
  337.  
  338.     (set #parts-footer-help
  339.       (cat
  340.         "    Für weitere Infos schaue bitte in die Anleitung.\n"
  341.       )
  342.     )
  343.  
  344. ; Only for expert users
  345.     (set #where-library "Wo soll die FileID.library installiert werden?")
  346.  
  347.     (set #where-library-help
  348.       (cat
  349.         "    FileID.library ist eine Shared Library. Der vorgesehene Platz "
  350.         "für solche Libraries ist ein Verzeichnis, auf das das LIBS:-Assign "
  351.         "zeigt.\n"
  352.         "Bitte installiere diese Datei also direkt in LIBS: oder, falls du ein "
  353.         "anderes wählst, stelle sicher, daß es über das LIBS:-Assign erreichbar "
  354.         "ist.\n"
  355.       )
  356.     )
  357.  
  358.     (set #where-guide "Wo soll die Anleitung installiert werden?")
  359.  
  360.     (set #where-guide-help
  361.       (cat
  362.         "    Die Anleitung MultiView.guide ist eine Datei im AmigaGuide® Format, "
  363.         "von der MultiView intensiven Gebrauch macht.\n"
  364.         "Wenn du AmigaOS 3.0 oder besseres hast, lege die Datei am besten in "
  365.         "\"Help:\", da das der Platz ist, an den AmigaGuide®-Dateien normalerweise "
  366.         "kopiert werden."
  367.       )
  368.     )
  369.  
  370. ; Only for expert users, and an icon wasn't found
  371.     (set #copy-guide-icon "Soll ein Icon für die Anleitung installiert werden?")
  372.  
  373.     (set #copy-guide-icon-help
  374.       (cat
  375.         "    Da du Experte bist, und an dem Platz, wo die Anleitung installiert "
  376.         "werden soll, kein Icon für sie ist, bekommst du jetzt die Chance zu "
  377.         "entscheiden, ob auch ein Icon installiert werden soll.\n"
  378.       )
  379.     )
  380.  
  381.     (set #which-language "Welche Sprachen sollen installiert werden?")
  382.  
  383.     (set #which-language-help
  384.       (cat
  385.         "    Der Amiga kann von Haus aus in vielen Sprachen mit dir `sprechen`. "
  386.         "Wenn MultiView dieselbe Sprachen benutzen soll, wie deine Workbench, "
  387.         "müssen einige Kataloge auf die Festplatte kopiert werden\n".
  388.         "Um etwas Platz zu sparen, kannst du hier auswählen, welche Sprachen "
  389.         "(und damit welche Kataloge), kopiert werden sollen, indem du einfach "
  390.         "die entsprechenden Kästchen abhakst\n".
  391.       )
  392.     )
  393.  
  394.     (set #copy "Kopiere %s nach %s...")
  395.   )
  396. )
  397.  
  398. ;**************************************************************************
  399. ;
  400. ; Norwegian strings
  401. ;
  402.  
  403. (if (= @language "norsk")
  404.   (
  405.     (set #default-lang #norsk-lang)
  406.     (set #builtin-lang "(innebygget)")
  407.     (set #bad-kick "Du må ha AmigaOS 2.04 eller høyere for å bruke MultiView.")
  408.     (set #install-parts "Vennligst velg de delene du vil installere")
  409.     (set #item-program "MultiView")
  410.     (set #item-library "FileID.library")
  411.     (set #item-guide "MultiView.guide")
  412.     (set #item-locale "Oversettelser")
  413.     (set #parts-header-help
  414.       (cat
  415.         "    Her velger du de delene av MultiView programmet du vil installere."
  416.         "Etter det så velger du detaljene for installasjonen (som f.eks. hvor "
  417.         "de forskjellige filene skal installeres). Du kan velge å installere de"
  418.         "de følgende gjenstandende:\n"
  419.       )
  420.     )
  421.     (set #item-program-help
  422.       (cat
  423.         "    MultiView: Dette er en erstatning for C= MultiView og bør "
  424.         "installeres i katalogen 'SYS:Utilities/'.\n"
  425.       )
  426.     )
  427.  
  428.     (set #item-library-help
  429.       (cat
  430.         "    FileID.library: Dette biblioteket kjenner igjen forskellige "
  431.         "filtyper.\n"
  432.       )
  433.     )
  434.  
  435.     (set #item-guide-help
  436.       (cat
  437.         "    MultiView.guide: Instruksjons-boken, i AmigaGuide® format. Den "
  438.         "inneholder generell informasjon om MultiView.\n"
  439.       )
  440.     )
  441.  
  442.     (set #item-local-help
  443.       (cat
  444.         "    Translations: Hvis du innstallerer en oversettelse så kan MultiView  "
  445.         "og FileID.library kjøres på det språket du har valgt.\n"
  446.       )
  447.     )
  448.  
  449.     (set #parts-footer-help
  450.       (cat
  451.         "    For mer informasjon om disse tingene, se i instruksjons-filen.\n"
  452.       )
  453.     )
  454.  
  455. ; Only for expert users
  456.     (set #where-program "Hvor vil du installere MultiView?")
  457.     (set #where-program-help
  458.       (cat
  459.         "    MultiView: dette er hovedprogrammet og er en forbedring av Commodore MultiView. "
  460.         "Det bør installeres i 'SYS:Utilities/' mappen.\n"
  461.       )
  462.     )
  463.  
  464.     (set #where-library "Hvor vil du installere FileID.library?")
  465.     (set #where-library-help
  466.       (cat
  467.         "    FileID.library er et delt bibliotek som brukes av MultiView (og andre programmer)."
  468.         "Programmene forventer at det ligger i 'Libs:' så vær sikker på at du installerer "
  469.         "det der, eller at stedet hvor du installerer det er en del av 'Libs:' anvisningen.\n"
  470.       )
  471.     )
  472.  
  473.     (set #where-guide "Hvor vil du installere MultiView.guide?")
  474.     (set #where-guide-help
  475.       (cat
  476.         "    MultiView.guide er instruksjonene i standard AmigaGuide® format "
  477.         "som kan installeres hvor du vil. Hvis du har OS 3.0 eller høyere, kan "
  478.         "du installere den i 'HELP:' der slike filer ofte er.\n"
  479.       )
  480.     )
  481.  
  482.     (set #copy-guide-icon "Vil du installere et ikon til MultiView.guide?")
  483.     (set #copy-guide-icon-help
  484.       (cat
  485.         "    Siden du er en ekspert-bruker og det ikke er noe ikon "
  486.         "til MultiView.guide der du har valgt å installere den, "
  487.         "får du nå anledning til å installere et ikon hvis du vil.\n"
  488.       )
  489.     )
  490.  
  491.     (set #which-language "Hvilke språk skal installeres ?")
  492.     (set #which-language-help
  493.       (cat
  494.         "    Amiga kan kjøre programmer på mange forskjellige språk, "
  495.         "MultiView kan også kjøres i det språket du bruker Workbench i.\n"
  496.         "Det du må gjøre er å velge et språk fra listen over støttede "
  497.         "språk.\n"
  498.         "    For å redusere plassen disse filene opptar kan du velge "
  499.         "å kun installere noen av disse språkfilene.\n"
  500.         "    Marker ganske enkelt boksene foran de språkene du vil "
  501.         "ha tilgjengelig på ditt system.\n"
  502.       )
  503.     )
  504.  
  505.     (set #copy "Kopierer %s til %s...")
  506.   )
  507. )
  508. ;**************************************************************************
  509. ;
  510. ; Russian strings
  511. ;
  512. ; NOTE: If it will be need to use in script the name for russian language
  513. ;       then use everywhere only "Russian" or "russian" and no else.
  514. ;       (There isn't native writing for one!)
  515. ;
  516.  
  517. (if (= @language "russian")
  518.   (
  519.     (set #default-lang #russian-lang)
  520.     (set #builtin-lang "(áðñïíäììúè)")
  521.     (set #bad-kick "Ãêþ çðîíêûæíáaìçþ MultiView ìäíàôíãçëí çëäñû áäïðçý AëçâaÍР2.04 çêç áúøä.")
  522.     (set #install-parts "Òéaåçñä íàÿäéñú çìðñaêêþõçç")
  523.     (set #item-program "MultiView")
  524.     (set #item-library "FileID.library")
  525.     (set #item-guide "MultiView.guide")
  526.     (set #item-locale "Îäïäáíãú")
  527.  
  528.     (set #parts-header-help
  529.       (cat
  530.         "    Òéaåçñä öaðñç îaéäña MultiView, éíñíïúä Áú ôíñçñä îïíçìðñaêêçïíáañû. Îíðêä "
  531.         "üñíâí ò Áað àòãòñ òñíöìäìú ãäñaêç çìðñaêêþõçç (ìaîïçëäï, ëaïøïòñú ïaæëäùäìçþ "
  532.         "ïaæêçöìúô óaèêíá îaéäña). Áú ëíåäñä áúàïañû ðêäãòýùçä öaðñç îaéäña:\n"
  533.       )
  534.     )
  535.  
  536.     (set #item-program-help
  537.       (cat
  538.         "    MultiView: Üña îïíâïaëëa þáêþäñðþ æaëäìíè íïçâçìaêûìíè C= MultiView, éíñíïaþ, "
  539.         "éaé îïaáçêí, ïaæëäùäìa á éañaêíâä SYS:Utilities/\n"
  540.       )
  541.     )
  542.  
  543.     (set #item-library-help
  544.       (cat
  545.         "    FileID.library: Üña àçàêçíñäéa ðíãäïåçñ óòìéõçç ïaðîíæìaáaìçþ óaèêñçîíá.\n"
  546.       )
  547.     )
  548.  
  549.     (set #item-guide-help
  550.       (cat
  551.         "    MultiView.guide: Íîçðaìçä, á óíïëañä AmigaGuide®. Ðíãäïåçñ íðìíáìòý "
  552.         "çìóíïëaõçý í MultiView.\n"
  553.       )
  554.     )
  555.  
  556.     (set #item-local-help
  557.       (cat
  558.         "    Îäïäáíãú: Îïç çìðñaêêþõçç îäïäáíãíá îïíâïaëëa MultiView ç FileID.library "
  559.         "ðëíâòñ íîäïçïíáañû òéaæaììúëç þæúéaëç.\n"
  560.       )
  561.     )
  562.  
  563.     (set #parts-footer-help
  564.       (cat
  565.         "    Æa ãíîíêìçñäêûìíè çìóíïëaõçäè íàïaùaèñäðû é íîçðaìçý.\n"
  566.       )
  567.     )
  568.  
  569.     ; Only for expert users
  570.     (set #where-program "Éòãa çìðñaêêçïíáañû îïíâïaëëò?")
  571.     (set #where-program-help
  572.       (cat
  573.         "    MultiView - îïíâïaëëa, îïçæáaììaþ æaëäìçñû íãìíçë½ììòý îïíâïaëëò óçïëú "
  574.         "Commodore. Ïäéíëäìãòäñðþ ïaæëäðñçñû á éañaêíâä SYS:Utilities.\n"
  575.       )
  576.     )
  577.  
  578.     (set #where-library "Éòãa çìðñaêêçïíáañû FileID.library?")
  579.  
  580.     (set #where-library-help
  581.       (cat
  582.         "    FileID.library þáêþäñðþ ïaæãäêþäëíè àçàêçíñäéíè. MultiView, éaé ç ãïòâçä îïíâïaëëú, "
  583.         "ä½ çðîíêûæòýùçä, éaé îïaáçêí, íåçãaäñ ìaêçöçþ üñíè àçàêçíñäéç á ìaæìaöäììíë éañaêíâä "
  584.         "\"Libs:\", îíüñíëò çìðñaêêçïòèñä üñíñ óaèê á éañaêíâ \"Libs:\", çêç òàäãçñäðû, öñí éañaêíâ, "
  585.         "á éíñíïíë Áú ïaæëäðñçñä àçàêçíñäéò, þáêþäñðþ aððçâìíáaììúë é òéaæaììíëò éañaêíâò.\n"
  586.       )
  587.     )
  588.  
  589.     (set #where-guide "Éòãa çìðñaêêçïíáañû MultiView.guide?")
  590.  
  591.     (set #where-guide-help
  592.       (cat
  593.         "    MultiView.guide - ðñaìãaïñìúè óaèê óíïëaña AmigaGuide®. MultiView çðîíêûæòäñ "
  594.         "üñíñ óaèê á íîïäãäê½ììúô ðêòöaþô, îíüñíëò ïaæëäðñçñä üñíñ óaèê îí òãíàðñáò. Äðêç "
  595.         "Áú çëääñä ÍР3.0 çêç áúøä, ñí üñí éañaêíâ\"Help:\", á éíñíïíë, éaé îïaáçêí "
  596.         "ïaðîíêíåäìú ç ãïòâçä óaèêú óíïëaña AmigaGuide®.\n"
  597.       )
  598.     )
  599.  
  600.     ; Only for expert users, and an icon wasn't found
  601.     (set #copy-guide-icon "Çìðñaêêçïíáañû çéíìéò é MultiView.guide?")
  602.  
  603.     (set #copy-guide-icon-help
  604.       (cat
  605.         "    Áú òðñaìíáçêç òïíáäìû çìðñaêêþõçç \"Üéðîäïñ\" ç ëíåäñä îïíçìðñaêêçïíáañû çéíìéò "
  606.         "ãêþ óaèêa MultiView.guide, éíñíïaþ á íàúöìíè ðçñòaõçç ìä çìðñaêêçïòäñðþ.\n"
  607.       )
  608.     )
  609.  
  610.     (set #which-language "Éaéçä þæúéç íàùäìçþ îïíçìðñaêêçïíáañû?")
  611.  
  612.     (set #which-language-help
  613.       (cat
  614.         "    Aëçâa ëíåäñ íîäïçïíáañû ëìíåäðñáíë ïaæêçöìúô þæúéíá. Äðêç Áú ôíñçñä, öñíàú "
  615.         "MultiView çðîíêûæíáaê ñä åä þæúéç, öñí ç Áaø Workbench, ñí ðííñáäñðñáòýùçä éañaêíâç "
  616.         "ãêþ éaåãíâí þæúéa íàùäìçþ ãíêåìú àúñû îíëäùäìú ìa å½ðñéçè ãçðé.\n"
  617.         "    Ãêþ üéíìíëçç ãçðéíáíâí îïíðñaìðñáa, æaìçëaäëíâí þæúéíáúëç óaèêaëç, Áú ëíåäñä "
  618.         "òéaæañû ñíêûéí ïäaêûìí ìäíàôíãçëúä ãêþ éíîçïíáaìçþ óaèêú.\n"
  619.         "    Îïíðñí îïíðñaáûñä âaêíöéç ò ñäô þæúéíá, éíñíïúä ìäíàôíãçëú Áaë ãêþ íàùäìçþ á "
  620.         "Áaøäè ðçðñäëä.\n"
  621.       )
  622.     )
  623.  
  624.     (set #copy "Éíîçïòý %s á %s...")
  625.   )
  626. )
  627. ;**************************************************************************
  628. ;
  629. ; Danish strings
  630. ;
  631.  
  632. (if (= @language "dansk")
  633.   (
  634.     (set #default-lang #dansk-lang)
  635.     (set #builtin-lang "(indbygget)")
  636.     (set #bad-kick "Du skal have AmigaOS 2.04 eller nyere for at bruge MultiView.")
  637.     (set #install-parts "Vælg venligst de dele du ønsker installeret")
  638.     (set #item-program "MultiView")
  639.     (set #item-library "FileID.library")
  640.     (set #item-guide "MultiView.guide")
  641.     (set #item-locale "Oversættelser")
  642.  
  643.     (set #parts-header-help
  644.       (cat
  645.         "Her vælger du de forskellige dele af MultiView som du ønsker at "
  646.         "installere. Derefter vælger du detaljerne i installeringen (såsom "
  647.         "hvor de forskellige filer skal installeres). Du kan vælge at "
  648.         "installere følgende dele:\n"
  649.       )
  650.     )
  651.  
  652.     (set #item-program-help
  653.       (cat
  654.         "MultiView: Dette program er en erstatning for C='s MultiView, "
  655.         "og bør installeres i kataloget SYS:Utilities/\n"
  656.       )
  657.     )
  658.  
  659.     (set #item-library-help
  660.       (cat
  661.         "FileID.library: Dette bibliotek indeholder "
  662.         "filtype-genkendelsesfunktioner.\n"
  663.       )
  664.     )
  665.  
  666.     (set #item-guide-help
  667.       (cat
  668.         "MultiView.guide: Brugervejledning, i AmigaGuide®-format. "
  669.         "Den indeholder generel information om MultiView.\n"
  670.       )
  671.     )
  672.  
  673.     (set #item-local-help
  674.       (cat
  675.         "Oversættelser: Hvis du installerer en oversættelse, vil "
  676.         "MultiView og FileID.library kunn køre med de(t) sprog du vælger.\n"
  677.       )
  678.     )
  679.  
  680.     (set #parts-footer-help
  681.       (cat
  682.         "For mere information om disse punkter, se venligst brugervejledningen.\n"
  683.       )
  684.     )
  685.  
  686. ; Only for expert users
  687.     (set #where-library "Hvor ønsker du at installere FileID.library?")
  688.  
  689.     (set #where-library-help
  690.       (cat
  691.         "FileID.library er et funktionsbibliotek. Som sådan forventer "
  692.         "MultiView (og programmerne som bruger det) at denne fil ligger "
  693.         "i \"Libs:\"-stien, så installér denne fil i \"Libs:\"-kataloget "
  694.         "eller vær sikker på at det katalog du installerer det i, er en "
  695.         "del af \"Libs:\"-tildelingen.\n"
  696.       )
  697.     )
  698.  
  699.     (set #where-guide "Hvor ønsker du at installere MultiView.guide?")
  700.  
  701.     (set #where-guide-help
  702.       (cat
  703.         "MultiView.guide er en fil i det normale AmigaGuide®-format. "
  704.         "Da MultiView gør specifik brug af denne fil, kan du installere "
  705.         "den hvor du ønsker. Hvis du har OS3.0 eller nyere, er et sådant "
  706.         "sted \"Help:\", da dette er hvor andre AmigaGuide®-filer ofte "
  707.         "ligger.\n"
  708.       )
  709.     )
  710.  
  711. ; Only for expert users, and an icon wasn't found
  712.     (set #copy-guide-icon "Ønsker du at installere ikonet til MultiView.guide?")
  713.  
  714.     (set #copy-guide-icon-help
  715.       (cat
  716.         "Siden du angav at du var en ekspertbruger, og der lige nu ikke "
  717.         "findes et ikon til MultiView.guide hvor du valgte at installere "
  718.         "det, har du nu chancen for at angive om ikonet også skal "
  719.         "installeres.\n"
  720.       )
  721.     )
  722.  
  723.     (set #which-language "Hvilke sprog ønsker du at installere?")
  724.  
  725.     (set #which-language-help
  726.       (cat
  727.         "Amigaen kan køre i mange forskellige sprog. Hvis du ønsker at "
  728.         "MultiView skal bruge det samme sprog som din Workbench, så skal "
  729.         "en sprogfil kopieres til din harddisk for hvert understøttet "
  730.         "sprog.\n"
  731.         "  For at reducere pladsen som optages af sprogfilerne, kan du "
  732.         "vælge kun at kopiere bestemte sprogfiler.\n"
  733.         "  Du skal bare sætte et hak i boksene til de sprog du ønsker "
  734.         "tilgængelige på dit system.\n"
  735.       )
  736.     )
  737.  
  738.     (set #copy "Kopierer %s til %s...")
  739.   )
  740. )
  741. ;**************************************************************************
  742. ;
  743. ; Swedish strings
  744. ;
  745.  
  746. (if (= @language "svenska")
  747.   (
  748.     (set #default-lang #svenska-lang)
  749.     (set #builtin-lang "(inbyggt)")
  750.     (set #bad-kick "Du måste ha AmigaOS version 2.04 eller högre för att använda MultiView.")
  751.     (set #install-parts "Välj de delar du önskar installera")
  752.     (set #item-program "MultiView")
  753.     (set #item-library "FileID.library")
  754.     (set #item-guide "MultiView.guide")
  755.     (set #item-locale "Översättningar")
  756.  
  757.     (set #parts-header-help
  758.       (cat
  759.         "    Här väljer du de delar av MultiView som du vill installera. Sedan ställer "
  760.         "du in installationsdetaljerna (t ex var de olika filerna skall installeras). "
  761.         "Du kan välja att installera följande delar av programmet:\n"
  762.       )
  763.     )
  764.  
  765.     (set #item-program-help
  766.       (cat
  767.         "    MultiView: Detta program är en ersättning för Commodores MultiView och "
  768.         "bör installeras i lådan SYS:Utilities/.\n"
  769.       )
  770.     )
  771.  
  772.     (set #item-library-help
  773.       (cat
  774.         "    FileID.library: Detta bibliotek innehåller funktioner för igenkänning av "
  775.         "olika filtyper.\n"
  776.       )
  777.     )
  778.  
  779.     (set #item-guide-help
  780.       (cat
  781.         "    MultiView.guide: Manualen i AmigaGuide®-format. Den innehåller "
  782.         "en del generell information om MultiView.\n"
  783.       )
  784.     )
  785.  
  786.     (set #item-local-help
  787.       (cat
  788.         "    Översättningar: Om du installerar en översättning kan MultiView "
  789.         "och FileID.library sedan använda de(t) språk du valt.\n"
  790.       )
  791.     )
  792.  
  793.     (set #parts-footer-help
  794.       (cat
  795.         "    För mer information om dessa delar av programmet, konsultera manualen.\n"
  796.       )
  797.     )
  798.  
  799. ; Only for expert users
  800.     (set #where-library "Var vill du installera FileID.library?")
  801.  
  802.     (set #where-library-help
  803.       (cat
  804.         "    FileID.library är ett s k \"delat bibliotek\". Som sådant "
  805.         "förväntar sig MultiView (och program som använder det) att "
  806.         "detta bibliotek skall vara tillgängligt via \"Libs:\"-tilldelningen; "
  807.         "du bör därför se till att det installeras i \"Libs:\"-lådan "
  808.         "eller att lådan du installerar det i är en del av din "
  809.         "\"Libs:\"-tilldelning.\n"
  810.       )
  811.     )
  812.  
  813.     (set #where-guide "Var vill du installera MultiView.guide?")
  814.  
  815.     (set #where-guide-help
  816.       (cat
  817.         "    MultiView.guide är en fil som följer det standardiserade AmigaGuide®-formatet. "
  818.         "Eftersom MultiView för närvarande utnyttjar denna specifika fil, kan du "
  819.         "installera den någonstans där det passar dig. Om du har OS 3.0 eller högre, "
  820.         "är \"Help:\" lämpligt eftersom det är där andra AmigaGuide®-filer ofta "
  821.         "installeras.\n"
  822.       )
  823.     )
  824.  
  825. ; Only for expert users, and an icon wasn't found
  826.     (set #copy-guide-icon "Vill du installera ikonen för MultiView.guide?")
  827.  
  828.     (set #copy-guide-icon-help
  829.       (cat
  830.         "    Eftersom du angett att du är en expertanvändare och eftersom det för tillfället "
  831.         "inte finns någon ikon för MultiView.guide där du valt att installera filen, "
  832.         "får du en chans att välja om ikonen också skall installeras.\n"
  833.       )
  834.     )
  835.  
  836.     (set #which-language "Vilka språk skall installeras?")
  837.  
  838.     (set #which-language-help
  839.       (cat
  840.         "    Amigan kan användas med flera olika språk.  Om du vill att MultiView "
  841.         "skall använda samma språk som din Amiga Workbench behöver några "
  842.         "katalogfiler kopieras till din hårddisk för varje språk som stöds.\n"
  843.         "    För att spara på utrymmet som språkfilerna tar upp kan du "
  844.         "välja att endast vissa språkfiler kopieras.\n"
  845.         "    Bocka helt enkelt för de språk du vill kunna använda på ditt system.\n"
  846.       )
  847.     )
  848.  
  849.     (set #copy "Kopierar %s till %s...")
  850.   )
  851. )
  852. ;**************************************************************************
  853. ;
  854. ; Italian strings
  855. ;
  856.  
  857. (if (= @language "italiano")
  858.   (
  859.     (set #default-lang #italiano-lang)
  860.     (set #builtin-lang "(built-in)")
  861.     (set #bad-kick "Devi avere la versione 2.04 o superiore di AmigaOS per usare MultiView.")
  862.     (set #install-parts "Per favore scegli le parti che desideri installare")
  863.     (set #item-program "MultiView")
  864.     (set #item-library "FileID.library")
  865.     (set #item-guide "MultiView.guide")
  866.     (set #item-locale "Traduzioni")
  867.  
  868.     (set #parts-header-help
  869.       (cat
  870.         "   Qui scegli le differenti sezioni di MultiView che gradiresti fossero installate. "
  871.         "Dopo di ciò, seleziona il tipo di installazione (come ad esempio "
  872.         "dove dovrebbero essere installati i vari file). Puoi scegliere di installare "
  873.         "le seguenti voci:\n"
  874.       )
  875.     )
  876.  
  877.     (set #item-program-help
  878.       (cat
  879.         "   MultiView: Questo programma è un sostituto del C= MultiView e dovrebbe essere "
  880.         "installato nel cassetto SYS:Utilities/.\n"
  881.       )
  882.     )
  883.  
  884.     (set #item-library-help
  885.       (cat
  886.         "   FileID.library: Questa libreria possiede la funzione di riconoscimento del tipo file.\n"
  887.       )
  888.     )
  889.  
  890.     (set #item-guide-help
  891.       (cat
  892.         "   MultiView.guide: Il manuale, in formato AmigaGuide®. Contiene "
  893.         "delle informazioni generali su MultiView.\n"
  894.       )
  895.     )
  896.  
  897.     (set #item-local-help
  898.       (cat
  899.         "   Traduzioni: Se installi una traduzione, allora MultiView  "
  900.         "e la FileID.library possono funzionare nelle lingue da te selezionate.\n"
  901.       )
  902.     )
  903.  
  904.     (set #parts-footer-help
  905.       (cat
  906.         "   Per ulteriori informazioni su queste voci, per favore fai riferimento al manuale.\n"
  907.       )
  908.     )
  909.  
  910.     ; Only for expert users
  911.     (set #where-library "Dove vuoi installare la FileID.library?")
  912.  
  913.     (set #where-library-help
  914.       (cat
  915.         "   FileID.library è una libreria condivisa. Così come, MultiView "
  916.         "(e le applicazioni che la usano) questo file attende che sia "
  917.         "disponibile attraverso la \"Libs:\"-assign, così per favore installa questo "
  918.         "file nel cassetto \"Libs:\", o assicurati che il cassetto "
  919.         "dove lo installi sia parte del tuo \"Libs:\"-assign.\n"
  920.       )
  921.     )
  922.  
  923.     (set #where-guide "Dove vuoi installare la MultiView.guide?")
  924.  
  925.     (set #where-guide-help
  926.       (cat
  927.         "   MultiView.guide è un file nel formato standard AmigaGuide®. "
  928.         "Dato che MultiView correntemente fa un uso specifico di questo file, puoi installarlo "
  929.         "dove lo trovi più comodo. Se hai l'OS 3.0 o superiore, "
  930.         "il luogo può essere \"Help:\", dato che questo ed altri file AmigaGuide® "
  931.         "sono spesso lì installati.\n"
  932.       )
  933.     )
  934.  
  935.     ; Only for expert users, and an icon wasn't found
  936.     (set #copy-guide-icon "Vuoi installare l'icona per la MultiView.guide?")
  937.  
  938.     (set #copy-guide-icon-help
  939.       (cat
  940.         "   Dato che hai detto che sei un utente esperto, ed al momento non "
  941.         "vi è nessuna icona per la MultiView.guide da selezionare per installarla, "
  942.         "puoi avere la possibilità di decidere il tipo di icona che dovrebbe "
  943.         "essere installata.\n"
  944.       )
  945.     )
  946.  
  947.     (set #which-language "Quali lingue vuoi siano installate?")
  948.  
  949.     (set #which-language-help
  950.       (cat
  951.         "   L'Amiga può essere utilizzato con diverse lingue. Se vuoi che "
  952.         "MultiView usi la stessa lingua del tuo Workbench, allora alcuni "
  953.         "cataloghi devono essere copiati nel tuo harddisk  per ogni lingua "
  954.         "supportata.\n"
  955.         "   Per diminuire l'ammontare dello spazio occupato dai "
  956.         "cataloghi, puoi scegliere di avere solamente i file di una determinata "
  957.         "lingua.\n"
  958.         "   Cioè contrassegna solo per la lingua che desideri avere "
  959.         "disponibile nel tuo sistema.\n"
  960.       )
  961.     )
  962.  
  963.     (set #copy "Sto copiando %s in %s...")
  964.   )
  965. )
  966.  
  967. ;**************************************************************************
  968. ; Salut,t'es vraiment sure de savoir parler français?!
  969. ; Traduit par CMwa
  970. ;
  971.  
  972. (if (= @language "français")
  973.   (
  974.     (set #default-lang #français-lang)
  975.     (set #builtin-lang "(interne)")
  976.     (set #bad-kick "Vous devez avoir au moins la version 2.04 d'AmigaOS pour utiliser MultiView.")
  977.     (set #install-parts "Veuillez sélectionner les parties à installer")
  978.     (set #item-program "MultiView")
  979.     (set #item-library "FileID.library")
  980.     (set #item-guide "MultiView.guide")
  981.     (set #item-locale "Traduction")
  982.  
  983.     (set #parts-header-help
  984.       (cat
  985.         "   Ici,vous sélectionnez les différentes parties de MultiView que vous désirez installer. "
  986.         "Après ça, vous sélectionnez le type d'installation (par exemple, "
  987.         "où les différends fichiers doivent être installés). vous pouvez choisir d'installer "
  988.         "les fichiers suivants:\n"
  989.       )
  990.     )
  991.  
  992.     (set #item-program-help
  993.       (cat
  994.         "   MultiView: Ce programme remplace le MultiView C=. Il doit être "
  995.         "installé dans le tiroir SYS:Utilities/.\n"
  996.       )
  997.     )
  998.  
  999.     (set #item-library-help
  1000.       (cat
  1001.         "   FileID.library: Cette librairie contient la fonction de reconnaissance du type de fichier.\n"
  1002.       )
  1003.     )
  1004.  
  1005.     (set #item-guide-help
  1006.       (cat
  1007.         "   MultiView.guide: Le manuel, au format AmigaGuide®. Il contient "
  1008.         "des information générales sur MultiView.\n"
  1009.       )
  1010.     )
  1011.  
  1012.     (set #item-local-help
  1013.       (cat
  1014.         "   Traduction: Si la traduction est installée, alors MultiView  "
  1015.         "et la FileID.library fonctionneront avec le langage sélectinnée.\n"
  1016.       )
  1017.     )
  1018.  
  1019.     (set #parts-footer-help
  1020.       (cat
  1021.         "   Pour plus d'information sur ces items, veuillez vous référer au manuel.\n"
  1022.       )
  1023.     )
  1024.  
  1025.     ; Only for expert users
  1026. ; Only for expert users
  1027. (set #where-program "Où voulez-vous installer le programme principal?")
  1028. (set #where-program-help
  1029.   (cat
  1030.     "    MultiView: Ce programme  remplace le vieux Multiview écrit "
  1031.     "par les programmeurs de Commodore. Vous devez l'installer dans SYS:Utilities.\n"
  1032.   )
  1033. )
  1034.  
  1035.     (set #where-library "Où voulez-vous installer la FileID.library?")
  1036.  
  1037.     (set #where-library-help
  1038.       (cat
  1039.         "   FileID.library est une librairie partagée. Ainsi, MultiView "
  1040.         "(et les applications qui l'utilise) cherche ce fichier vers "
  1041.         " \"Libs:\"-assign, veuillez donc installer ce "
  1042.         "fichier dans \"Libs:\", ou assurez-vous que le tiroir "
  1043.         "où vous l'instalez fait partie de votre \"Libs:\"-assign.\n"
  1044.       )
  1045.     )
  1046.  
  1047.     (set #where-guide "Où voulez-vous installer MultiView.guide?")
  1048.  
  1049.     (set #where-guide-help
  1050.       (cat
  1051.         "   MultiView.guide est un fichier au format standard AmigaGuide®. "
  1052.         "Actuellement, MultiView fait un usage spécifique de ce fichier, vous pouvez l'installer "
  1053.         "où vous le trouvez le plus commode. Si vous avez au moins l'OS 3.0, "
  1054.         "le tiroir \"Help:\" est le plus logique puisque les autres fichiers AmigaGuide® "
  1055.         "y sont installés.\n"
  1056.       )
  1057.     )
  1058.  
  1059.     ; Only for expert users, and an icon wasn't found
  1060.     (set #copy-guide-icon "Voulez-vous installer l'icône pour MultiView.guide?")
  1061.  
  1062.     (set #copy-guide-icon-help
  1063.       (cat
  1064.         "   Dato che hai detto che sei un utente esperto, ed al momento non "
  1065.         "vi è nessuna icona per la MultiView.guide da selezionare per installarla, "
  1066.         "puoi avere la possibilità di decidere il tipo di icona che dovrebbe "
  1067.         "essere installata.\n"
  1068.       )
  1069.     )
  1070.  
  1071.     (set #which-language "Quels langue voulez-vous installer?")
  1072.  
  1073.     (set #which-language-help
  1074.       (cat
  1075.         "   L'Amiga peut être utilisé avec divers langage. Si vous voulez que "
  1076.         "MultiView utilise la même langue que votre Workbench, alors un "
  1077.         "catalogue doit être copié sur votre disque dur  pour que votre langue "
  1078.         "soit supportée.\n"
  1079.         "   Pour diminuer la quantité d'espace occupé par "
  1080.         "le catalogue, vous pouvez n'avoir que le fichier concernant "
  1081.         "votre langue.\n"
  1082.         "   Sélectionnez simplement la langue "
  1083.         "utilisé sur votre système.\n"
  1084.       )
  1085.     )
  1086.  
  1087.     (set #copy "Copie de %s vers %s...")
  1088.   )
  1089. )
  1090.  
  1091.  
  1092. ;**************************************************************************
  1093. ; The actual installation script
  1094. ;**************************************************************************
  1095.  
  1096. ;**************************************************************************
  1097. ; First some initializations
  1098. ;**************************************************************************
  1099.  
  1100.  
  1101. ; Check Kickstart version. Exit if not at least 2.04
  1102. (if (< (/ (getversion) 65536) 37)
  1103.         (abort #bad-kick)
  1104. )
  1105.  
  1106. ; Since files are scatter installed, don't mention any specific location.
  1107. (set @default-dest "")
  1108.  
  1109. ; Request proportinal fonts, if supported. This string is
  1110. ; prepended to the first askoptions choice.
  1111. (if (>= @installer-version 2752518)     ; 42 * 65536 + 6
  1112.   ; At least version 42.6
  1113.   (set #propfont "p")
  1114.   ; Pre V42
  1115.   (set #propfont "")
  1116. )
  1117.  
  1118. (set #item-num-prog        1)
  1119. (set #item-num-lib         2)
  1120. (set #item-num-prefs       4)
  1121. (set #item-num-guide       8)
  1122. (set #item-num-locale     16)
  1123.  
  1124. ; Find out default values for parts to install
  1125. (set #install-default (BITOR #item-num-prog #item-num-lib #item-num-guide #item-num-prefs))
  1126.  
  1127. ; Locale installed?
  1128. (if (AND (= 2 (exists "Locale:" (noreq))) (< 0 (getversion "locale.library" (resident))))
  1129.   (set #install-default (BITOR #install-default #item-num-locale))
  1130. )
  1131.  
  1132. ; Everything ready
  1133.  
  1134. (welcome)
  1135.  
  1136. ; Ask the user what to install
  1137. (set #install-files
  1138.   (askoptions
  1139.     (prompt #install-parts)
  1140.     (help #parts-header-help
  1141.       #item-program-help
  1142.       #item-library-help
  1143.       #item-prefs-help
  1144.       #item-guide-help
  1145.       #item-local-help
  1146.       #parts-footer-help "\n"
  1147.       @askoptions-help)
  1148.     (choices
  1149.       (cat #propfont
  1150.       #item-program)
  1151.       #item-library
  1152.       #item-prefs
  1153.       #item-guide
  1154.       #item-locale
  1155.     )
  1156.     (default #install-default)
  1157.   )
  1158. )
  1159.  
  1160. ;**************************************************************************
  1161. ; Ask the user for the location of all parts
  1162. ;**************************************************************************
  1163.  
  1164. (set #program-dest  "SYS:Utilities")
  1165.  
  1166. ; Location for MultiView program (for experts)
  1167.  
  1168. (if (AND (= @user-level 2) (BITAND #install-files #item-num-prog))
  1169.   (set #program-dest
  1170.     (askdir
  1171.       (prompt  #where-program)
  1172.       (help    #where-program-help "\n" @askdir-help)
  1173.       (default #program-dest)
  1174.     )
  1175.   )
  1176. )
  1177.  
  1178. (set #library-dest  "Libs:")
  1179.  
  1180. ; Location for FileID.library (for experts)
  1181.  
  1182. (if (AND (= @user-level 2) (BITAND #install-files #item-num-lib))
  1183.   (set #library-dest
  1184.     (askdir
  1185.       (prompt  #where-library)
  1186.       (help    #where-library-help "\n" @askdir-help)
  1187.       (default #library-dest)
  1188.     )
  1189.   )
  1190. )
  1191.  
  1192. (set #prefs-dest  "SYS:Prefs")
  1193.  
  1194. ; Location for MultiView prefs (for experts)
  1195.  
  1196. (if (AND (= @user-level 2) (BITAND #install-files #item-num-prefs))
  1197.   (set #prefs-dest
  1198.     (askdir
  1199.       (prompt  #where-prefs)
  1200.       (help    #where-prefs-help "\n" @askdir-help)
  1201.       (default #prefs-dest)
  1202.     )
  1203.   )
  1204. )
  1205.  
  1206. ; Location for documentation
  1207.  
  1208. (if (BITAND #install-files #item-num-guide)
  1209.   (
  1210.     (set #guide-dest "Work:")
  1211.  
  1212.     (if (exists "Help:")
  1213.       (set #guide-dest "Help:")
  1214.     )
  1215.  
  1216.     (set #guide-dest
  1217.       (askdir
  1218.         (prompt  #where-guide)
  1219.         (help    #where-guide-help "\n" @askdir-help)
  1220.         (default #guide-dest)
  1221.       )
  1222.     )
  1223.  
  1224.     (set #dest-guide-name (tackon #guide-dest "Multiview.guide.info"))
  1225.  
  1226.     (set #guide-icon
  1227.       (if (AND (= @user-level 2 ) (= (exists #dest-guide-name) 0))
  1228.         (askbool
  1229.           (prompt #copy-guide-icon)
  1230.           (help #copy-guide-icon-help " ")
  1231.         )
  1232.         0 ; Default is to not copy the icon
  1233.       )
  1234.     )
  1235.   )
  1236. )
  1237.  
  1238. ; .ct
  1239. ; Which languages should be installed?
  1240.  
  1241. (if (BITAND #install-files #item-num-locale)
  1242.   (set #lang
  1243.     (askoptions
  1244.       (prompt #which-language)
  1245.       (help #which-language-help "\n" @askoptions-help)
  1246.       (choices
  1247.         (cat #propfont          "English  " #builtin-lang)
  1248.                                 "Polski"
  1249.                                 "Deutsch"
  1250.                                 "Norsk"
  1251.                                 "Russian"
  1252.                                 "Dansk"
  1253.                                 "Svenska"
  1254.                                 "Italiano"
  1255.                                 "Français"
  1256.                                 "Czech"
  1257.                                 "Croatian"
  1258.                                 "Portugese-brazil"
  1259.                                 ""
  1260.       )
  1261.         (default 0)
  1262.     )
  1263.   )
  1264. )
  1265.  
  1266. ; **********************************************************************
  1267. ; Everything set up. Now do the actual installation
  1268. ; **********************************************************************
  1269.  
  1270. (complete 0)
  1271.  
  1272. (if (BITAND #install-files #item-num-prog)
  1273.   (
  1274.     (copyfiles
  1275.       (prompt (#copy "MultiView" #program-dest))
  1276.       (source "MultiView")
  1277.       (dest #program-dest)
  1278.     )
  1279.     (copyfiles
  1280.       (prompt (#copy "MultiView" #program-dest))
  1281.       (source "MultiView.info")
  1282.       (dest #program-dest)
  1283.     )
  1284.   )
  1285. )
  1286.  
  1287. (complete 20)
  1288.  
  1289. (if (BITAND #install-files #item-num-lib)
  1290.   (
  1291.     (copylib
  1292.       (prompt (#copy "FileID.library" #library-dest))
  1293.       (source "libs/FileID.library")
  1294.       (dest #library-dest)
  1295.     )
  1296.   )
  1297. )
  1298.  
  1299. (complete 40)
  1300.  
  1301. (if (BITAND #install-files #item-num-prefs)
  1302.   (
  1303.     (copyfiles
  1304.       (prompt (#copy "MultiViewPrefs" #prefs-dest))
  1305.       (source "Prefs/")
  1306.       (all)
  1307.       (optional nofail)
  1308.       (dest #prefs-dest)
  1309.     )
  1310. ;    (copyfiles
  1311. ;      (prompt (#copy "MultiView.info" #prefs-dest))
  1312. ;      (source "Prefs/MultiView.info")
  1313. ;      (dest #prefs-dest)
  1314. ;    )
  1315.   )
  1316. )
  1317.  
  1318. (complete 60)
  1319.  
  1320. ;this part dont work because Workbench say"this icon haven't tool".where is the matter??
  1321.  
  1322. (if (BITAND #install-files #item-num-guide)
  1323.   (
  1324.     (set #guide-source
  1325.         (tackon (tackon "Docs/" @language) "MultiView.guide")
  1326.     )
  1327.     (copyfiles
  1328.       (prompt (#copy "MultiView.guide" #guide-dest))
  1329.       (source #guide-source)
  1330.       (dest   #guide-dest)
  1331.     )
  1332.     (set #guide-source
  1333.        (tackon (tackon "Docs/" @language) "MultiViewPrefs.guide")
  1334.     )
  1335.       (copyfiles
  1336.       (prompt (#copy "MultiViewPrefs.guide" #guide-dest))
  1337.       (source #guide-source)
  1338.       (dest   #guide-dest)
  1339.     )
  1340.  
  1341.     (if #guide-icon
  1342.       (
  1343.         (copyfiles
  1344.           (prompt (#copy "MultiView.guide.info" #guide-dest))
  1345.           (source (tackon (tackon "Docs/" @language) "MultiView.guide.info"))
  1346.           (dest   #guide-dest)
  1347.         )
  1348.         (copyfiles
  1349.           (prompt (#copy "MultiViewPrefs.guide.info" #guide-dest))
  1350.           (source (tackon (tackon "Docs/" @language) "MultiViewPrefs.guide.info"))
  1351.           (dest   #guide-dest)
  1352.         )
  1353.       )
  1354.     )
  1355.   )
  1356. )
  1357.  
  1358. (complete 80)
  1359.  
  1360. ; .ct
  1361. (if (BITAND #install-files #item-num-locale)
  1362.   (
  1363.     (set #n 0)
  1364.  
  1365.     (while
  1366.       (set #language
  1367.         (select #n
  1368.           "Deutsch"
  1369.           "English"
  1370.           "Polski"
  1371.           "Norsk"
  1372.           "Russian"
  1373.           "Dansk"
  1374.           "Svenska"
  1375.           "Italiano"
  1376.           "Czech"
  1377.           "Croatian"
  1378.           "Portugese-brazil"
  1379.           "Français"
  1380.           ""
  1381.         )
  1382.       )
  1383.  
  1384.       (
  1385.         (if (AND (IN #lang #n) (<> #language "English"))
  1386.           (
  1387.             (set #catalog
  1388.               (tackon "Catalogs"
  1389.                 (tackon #language "MultiView.catalog")
  1390.               )
  1391.             )
  1392.  
  1393.             (set #destination (tackon "Locale:Catalogs/" #language))
  1394.  
  1395.             (if (exists #catalog)
  1396.               (copylib
  1397.                 (prompt (#copy #catalog #destination))
  1398.                 (source #catalog)
  1399.                 (dest   #destination)
  1400.               )
  1401.             )
  1402.  
  1403.             (set #catalog
  1404.               (tackon "Catalogs"
  1405.                 (tackon #language "FileID_lib.catalog")
  1406.               )
  1407.             )
  1408.  
  1409.             (if (exists #catalog)
  1410.               (copylib
  1411.                 (prompt (#copy #catalog #destination))
  1412.                 (source #catalog)
  1413.                 (dest   #destination)
  1414.               )
  1415.             )
  1416.  
  1417.           )
  1418.         )
  1419.  
  1420.         (set #n (+ #n 1))
  1421.       )
  1422.     )
  1423.   )
  1424. )
  1425.  
  1426. (complete 100)
  1427.  
  1428. (exit)
  1429.