home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 5 / FreshFish_July-August1994.bin / bbs / util / appisizer-0.72.lha / AppISizer-0.72 / Install / Install.Script < prev   
Encoding:
Text File  |  1994-06-27  |  7.7 KB  |  208 lines
  1. ; $VER: Install_AppISizer 1.3 (26-May-94) Gérard Cornu, based on 
  2. ;                                         InstallChangeIcon from
  3. ;                                         Hanns Holger Rutz.
  4.  
  5.  
  6. ;-- Language specific string definitions --------------------------------------
  7.  
  8. ; DANSK -----------------------------
  9. ; Translation by Jorgen Thomsen
  10. (procedure dansk (
  11.     (set MSG_DESTINATION "Hvor vil du have AppISizer installeret?\n(En ny skuffe kaldet \"AppISizer\" vil blive oprettet)")
  12.     (set MSG_COPYING "Vil nu kopiere %s til %s.")
  13.     (set MSG_WHATCATS "Vælg det/de sprog, som du vil have installeret:")
  14.     (set MSG_WHATDOC "Skal brugervejledning i AmigaGuide format\n installeres for dette sprog:")
  15.     (set MSG_NONE "ingen")
  16.     (set MSG_WHEREDOC "Hvor skal jeg anbringe brugervejledningen?")
  17.     (set MSG_OVERWRITE "\n\n\n\n\n%s eksisterer allerede.\nSkal den overskrives ?")
  18.     (set MSG_YES "Ja")
  19.     (set MSG_NO "Nej")
  20.     (set MSG_ICON "AppISizers ikon")
  21.     (set MSG_HELP_ICON (cat "Du har allerede en ikon for AppISizer. Hvis du overskriver den, vil du miste dine Tool type indstillinger." 
  22.                             "\n\nVælg Nej, hvis du ønsker at bevare dem."))
  23.     (set catalogs %001)
  24.     (set docfile 0)
  25. ))
  26.  
  27. ; DEUTSCH ----------------------------
  28. ; Translation by Hanns Holger Rutz
  29. (procedure deutsch (
  30.     (set MSG_DESTINATION "Wohin soll AppISizer installiert werden?\n(Ein neuer Ordner mit dem Namen \"AppISizer\" wird erzeugt)")
  31.     (set MSG_COPYING "Kopiere %s nach %s.")
  32.     (set MSG_WHATCATS "Wähle die Sprache(n), für die Sprach-Dateien installiert werden sollen:")
  33.     (set MSG_WHATDOC "Anleitung für folgende Sprache installieren:")
  34.     (set MSG_NONE "keine")
  35.     (set MSG_WHEREDOC "Wohin soll die Anleitung?")
  36.     (set MSG_OVERWRITE "\n\n\n\n\n%s existiert bereits.\nÜberschreiben?")
  37.     (set MSG_YES "Ja")
  38.     (set MSG_NO "Nein")
  39.     (set MSG_ICON "AppISizer's Piktogramm")
  40.     (set MSG_HELP_ICON (cat "Du hast schon ein Piktogramm für AppISizer. Beim Überschreiben gehen die alten ToolTypes verloren."
  41.                             "\n\nWählen NEIN, wenn Du diese behalten willst."))
  42.     (set catalogs %010)
  43.     (set docfile 0)
  44. ))
  45.  
  46. ; ENGLISH -----------------------------
  47. (procedure english (
  48.     (set MSG_DESTINATION "Where would you like AppISizer to be installed?\n(A new drawer named \"AppISizer\" will be created)")
  49.     (set MSG_COPYING "Going to copy %s to %s.")
  50.     (set MSG_WHATCATS "Select the language(s) you want to have Catalog-files for:")
  51.     (set MSG_WHATDOC "Install the documentation in AmigaGuide\nform for this language:")
  52.     (set MSG_NONE "none")
  53.     (set MSG_WHEREDOC "Where shall I put the documentation?")
  54.     (set MSG_OVERWRITE "\n\n\n\n\n%s already exists.\nOverwrite?")
  55.     (set MSG_YES "Yes")
  56.     (set MSG_NO "No")
  57.     (set MSG_ICON "AppISizer's icon")
  58.     (set MSG_HELP_ICON (cat "You already have an icon for AppISizer. If you overwrite it you'll loose your current tooltypes settings."
  59.                        "\n\nSelect NO if you wish to preserve them."))
  60.     (set catalogs %000)
  61.     (set docfile 0)
  62. ))
  63.  
  64. ; FRANÇAIS ----------------------------
  65. ; Translation by ;-)
  66. (procedure français (
  67.     (set MSG_DESTINATION "Où désirez-vous installer AppISizer?\n(Un nouveau tiroir nommé \"AppISizer\" y sera créé)")
  68.     (set MSG_COPYING "Prêt â copier %s vers %s.")
  69.     (set MSG_WHATCATS "Selectionnez le(s) langage(s) pour lesquels vous désirez des fichiers catalogues:")
  70.     (set MSG_WHATDOC "Installation de la documentation au format\nAmigaGuide pour ce langage:")
  71.     (set MSG_NONE "aucun")
  72.     (set MSG_WHEREDOC "Où dois-je mettre la documentation?")
  73.     (set MSG_OVERWRITE "\n\n\n\n\n%s existe déjà.\nDois-je l'écraser?")
  74.     (set MSG_YES "Oui")
  75.     (set MSG_NO "Non")
  76.     (set MSG_ICON "L'icône d'AppISizer")
  77.     (set MSG_HELP_ICON (cat "Vous avez déjà une icône pour AppISizer. Si vous l'écrasez vous allez perdre vos réglages définis dans les types d'outils."
  78.                             "\n\nChoisissez NON si vous voulez les préserver."))
  79.     (set catalogs %100)
  80.     (set docfile 1)
  81. ))
  82. ;------------------------------------------------------------------------------
  83.  
  84. (if (= @language "dansk")    (dansk))
  85. (if (= @language "deutsch")  (deutsch))
  86. (if (= @language "english")  (english))
  87. (if (= @language "français") (français))
  88. (if (= @user-level 0) (set catalogs %111))
  89.  
  90. (set @default-dest
  91.     (tackon
  92.         (askdir
  93.             (prompt MSG_DESTINATION)
  94.             (help @askdir-help)
  95.             (default @default-dest)
  96.             (newpath))
  97.         "AppISizer"
  98.     )
  99. )
  100.  
  101. (copyfiles  (prompt (MSG_COPYING "AppISizer" @default-dest))
  102.             (help @copyfiles-help)
  103.             (source "/AppISizer")
  104.             (dest @default-dest)
  105.             (confirm))
  106.  
  107. (if (exists (tackon @default-dest "AppISizer.info") (noreq))
  108.     (
  109.         (if (askbool    (prompt (MSG_OVERWRITE MSG_ICON))
  110.                                 (help MSG_HELP_ICON)
  111.                                 (default 0)
  112.                                 (choices MSG_YES MSG_NO))
  113.             (
  114.                 (copyfiles  (help @copyfiles-help)
  115.                             (source "/AppISizer.info")
  116.                             (dest @default-dest)
  117.                             (optional "nofail"))
  118.             )
  119.         )
  120.     )(
  121.         (copyfiles  (prompt (MSG_COPYING "\AppISizer.info\"" @default-dest))
  122.                             (help @copyfiles-help)
  123.                             (source "/AppISizer.info")
  124.                             (dest @default-dest)
  125.                             (optional "nofail") (nogauge))
  126.         )
  127.     )
  128.  
  129.  
  130. (if (exists "LOCALE:" (noreq))
  131.     (
  132.         (set catalogs
  133.             (askoptions (prompt MSG_WHATCATS)
  134.                         (help @askoptions-help)
  135.                         (choices "dansk" "deutsch" "français")
  136.                         (default catalogs))
  137.         )
  138.         (if (BITAND catalogs %001)
  139.             (copyfiles  (help @copyfiles-help)
  140.                         (source "/Catalogs/dansk/appisizer.catalog")
  141.                         (dest "LOCALE:Catalogs/dansk")
  142.                         (optional "nofail"))
  143.         )
  144.         (if (BITAND catalogs %010)
  145.             (copyfiles  (help @copyfiles-help)
  146.                         (source "/Catalogs/deutsch/appisizer.catalog")
  147.                         (dest "LOCALE:Catalogs/deutsch")
  148.                         (optional "nofail"))
  149.         )
  150.         (if (BITAND catalogs %100)
  151.             (copyfiles  (help @copyfiles-help)
  152.                         (source "/Catalogs/français/appisizer.catalog")
  153.                         (dest "LOCALE:Catalogs/français")
  154.                         (optional "nofail"))
  155.         )
  156.     )
  157. )
  158.  
  159. (set docfile
  160.     (askchoice  (prompt MSG_WHATDOC)
  161.                 (help @askchoice-help)
  162.                 (choices "english" "français" MSG_NONE)
  163.                 (default docfile))
  164. )
  165. (set docdir
  166.     (if (AND (= @user-level 2) (<> docfile 2))
  167.         (askdir (prompt MSG_WHEREDOC)
  168.                 (help @askdir-help)
  169.                 (default @default-dest))
  170.         (@default-dest)
  171.     )
  172. )
  173. (select docfile
  174.     (copyfiles  (help @copyfiles-help)
  175.                 (source "/Docs/English")
  176.                 (dest docdir)
  177.                 (newname "AppISizer.guide")
  178.                 (infos)
  179.                 (optional "nofail")
  180.     )
  181.     (copyfiles  (help @copyfiles-help)
  182.                 (source "/Docs/Français")
  183.                 (dest docdir)
  184.                 (newname "AppISizer.guide")
  185.                 (infos)
  186.                 (optional "nofail")
  187.     )
  188.     ("")  ; "none"
  189. )
  190.  
  191. (set vernum (getversion))
  192. (set osversion (/ vernum 65536))
  193. (if (>= osversion 39)
  194.    (set reader "MultiView") 
  195.    (set reader "AmigaGuide")
  196. )
  197.  
  198. (if (exists (tackon docdir "AppISizer.guide.info") (noreq))
  199.     (
  200.         (tooltype   (dest (tackon docdir "AppISizer.guide"))
  201.                     (noposition) (setdefaulttool reader))
  202.          
  203.     )
  204. )
  205.  
  206. (exit)
  207.  
  208.