home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 17 / amigaformatcd17.iso / -look_here_1st!- / handy_tools / mcxp326 / install_mui_mcx_prefs < prev    next >
Text File  |  1997-04-05  |  3KB  |  158 lines
  1. ;
  2. ; Installation script for MUI_MCX_Prefs
  3. ;   Guión instalador de MUI_MCX_Prefs
  4. ;
  5. ; Spanish/Galician/French translation &
  6. ; rearranged script by Dámaso D. Estévez
  7.  
  8. ; -------------------------------------------------------------
  9. ; English strings (default) / Cadenas en inglés (por defecto)
  10.  
  11. (set def-lang 0)
  12.  
  13. (set #msj1 "Installing MUI_MCX_Prefs...")
  14.  
  15. (set #msj2 "Where shall i install MUI_MultiCX_Prefs?")
  16.  
  17. (set #msj3 "Which languages do You wish to install ?")
  18.  
  19. (set #msj4 "Install 'WBStart.library'.")
  20.  
  21. (set #msj5 "Install 'WBStart-Handler'.")
  22.  
  23. (set #msj6 "Install 'DosPath.library'.")
  24.  
  25. ; -------------------------------------------------------------
  26. ; Spanish strings / Cadenas en español
  27.  
  28. (if (= @language "español")
  29.  
  30. ((set def-lang 2)
  31.  
  32. (set #msj1 "Instalando MUI_MCX_Prefs...")
  33.  
  34. (set #msj2 "¿Dónde desea instalar MUI_MultiCX_Prefs?")
  35.  
  36. (set #msj3 "¿Qué idioma(s) desea instalar?")
  37.  
  38. (set #msj4 "Instalando 'WBStart.library'...")
  39.  
  40. (set #msj5"Instalando 'WBStart-Handler'...")
  41.  
  42. (set #msj6 "Instalando 'DosPath.library'...")))
  43. ; -------------------------------------------------------------
  44. ; Galician strings / Cadeas de texto en galego
  45.  
  46. (if (= @language "galego")
  47.  
  48. ((set #msj1 "Instalando MUI_MCX_Prefs...")
  49.  
  50. (set #msj2 "¿Onde desexa instalar MUI_MultiCX_Prefs?")
  51.  
  52. (set #msj3 "¿Qué língua(s) desexa instalar?")
  53.  
  54. (set #msj4 "Instalando 'WBStart.library'...")
  55.  
  56. (set #msj5 "Instalando 'WBStart-Handler'...")
  57.  
  58. (set #msj6 "Instalando 'DosPath.library'...")))
  59. ; -------------------------------------------------------------
  60. ; French strings / Texte en français
  61.  
  62. (if (= @language "français")
  63.  
  64. ((set #msj1 "Je suis en train de copier MUI_MCX_Prefs...")
  65.  
  66. (set #msj2 "Oú voulez-vous copier MUI_MultiCX_Prefs?")
  67.  
  68. (set #msj3 "Quelles sont les langues à installer?")
  69.  
  70. (set #msj4 "Je suis en train de copier 'WBStart.library'...")
  71.  
  72. (set #msj5 "Je suis en train de copier 'WBStart-Handler'...")
  73.  
  74. (set #msj6 "Je suis en train de copier 'DosPath.library'...")))
  75. ; -------------------------------------------------------------
  76. ; Start (inicio)
  77.  
  78.  
  79. (transcript #msj1)
  80.  
  81.  
  82. (set name
  83.         (askdir
  84.         (prompt #msj2)
  85.         (help @askdir-help)
  86.         (default "SYS:Prefs")
  87.         )
  88. )
  89.  
  90. (copyfiles
  91.     (source "MUI_MCX_Prefs")
  92.     (infos)
  93.     (dest name)
  94. )
  95.  
  96. (set lang
  97. (askoptions
  98.     (prompt #msj3)
  99.     (help @askoptions-help)
  100.     (choices "deutsch" "español")
  101.     (default def-lang)
  102. ))
  103.  
  104. (set n 0)
  105.  
  106. (while (set language (select n "deutsch" "español" "" ) )
  107. (
  108.     (if (IN lang n)
  109.         (copyfiles
  110.             (source (cat "locale/" language ".catalog" ))
  111.             (dest (cat "LOCALE:catalogs/" language ))
  112.             (newname "mcxp.catalog")
  113.         )
  114.     )
  115.     (set n (+ n 1))
  116. ))
  117.  
  118.       (set vernum (getversion "intuition.library" (resident)))
  119.       (set ver (/ vernum 65536))
  120.  
  121.  
  122.       (if ( > ver 38)
  123.  
  124.           (copylib
  125.                 (prompt #msj4)
  126.                 (help @copylib-help)
  127.                 (source "libs/wbstart.library")
  128.                 (dest "libs:")
  129.                 (confirm)
  130.           )
  131.           
  132.           (copylib
  133.                 (prompt #msj5)
  134.                 (help @copylib-help)
  135.                 (source "l/WBStart-Handler")
  136.                 (dest "l:")
  137.                 (confirm)
  138.           )
  139.  
  140.       )
  141.  
  142.       (if ( > ver 38)
  143.  
  144.           (copylib
  145.                 (prompt #msj6)
  146.                 (help @copylib-help)
  147.                 (source "libs/dospath.library")
  148.                 (dest "libs:")
  149.                 (confirm)
  150.           )
  151.  
  152.           
  153.     )
  154.  
  155. (set @default-dest name)
  156.  
  157. (exit)
  158.