home *** CD-ROM | disk | FTP | other *** search
- ;
- ; Installation script for MUI_MCX_Prefs
- ; Guión instalador de MUI_MCX_Prefs
- ;
- ; Spanish/Galician/French translation &
- ; rearranged script by Dámaso D. Estévez
-
- ; -------------------------------------------------------------
- ; English strings (default) / Cadenas en inglés (por defecto)
-
- (set def-lang 0)
-
- (set #msj1 "Installing MUI_MCX_Prefs...")
-
- (set #msj2 "Where shall i install MUI_MultiCX_Prefs?")
-
- (set #msj3 "Which languages do You wish to install ?")
-
- (set #msj4 "Install 'WBStart.library'.")
-
- (set #msj5 "Install 'WBStart-Handler'.")
-
- (set #msj6 "Install 'DosPath.library'.")
-
- ; -------------------------------------------------------------
- ; Spanish strings / Cadenas en español
-
- (if (= @language "español")
-
- ((set def-lang 2)
-
- (set #msj1 "Instalando MUI_MCX_Prefs...")
-
- (set #msj2 "¿Dónde desea instalar MUI_MultiCX_Prefs?")
-
- (set #msj3 "¿Qué idioma(s) desea instalar?")
-
- (set #msj4 "Instalando 'WBStart.library'...")
-
- (set #msj5"Instalando 'WBStart-Handler'...")
-
- (set #msj6 "Instalando 'DosPath.library'...")))
- ; -------------------------------------------------------------
- ; Galician strings / Cadeas de texto en galego
-
- (if (= @language "galego")
-
- ((set #msj1 "Instalando MUI_MCX_Prefs...")
-
- (set #msj2 "¿Onde desexa instalar MUI_MultiCX_Prefs?")
-
- (set #msj3 "¿Qué língua(s) desexa instalar?")
-
- (set #msj4 "Instalando 'WBStart.library'...")
-
- (set #msj5 "Instalando 'WBStart-Handler'...")
-
- (set #msj6 "Instalando 'DosPath.library'...")))
- ; -------------------------------------------------------------
- ; French strings / Texte en français
-
- (if (= @language "français")
-
- ((set #msj1 "Je suis en train de copier MUI_MCX_Prefs...")
-
- (set #msj2 "Oú voulez-vous copier MUI_MultiCX_Prefs?")
-
- (set #msj3 "Quelles sont les langues à installer?")
-
- (set #msj4 "Je suis en train de copier 'WBStart.library'...")
-
- (set #msj5 "Je suis en train de copier 'WBStart-Handler'...")
-
- (set #msj6 "Je suis en train de copier 'DosPath.library'...")))
- ; -------------------------------------------------------------
- ; Start (inicio)
-
-
- (transcript #msj1)
-
-
- (set name
- (askdir
- (prompt #msj2)
- (help @askdir-help)
- (default "SYS:Prefs")
- )
- )
-
- (copyfiles
- (source "MUI_MCX_Prefs")
- (infos)
- (dest name)
- )
-
- (set lang
- (askoptions
- (prompt #msj3)
- (help @askoptions-help)
- (choices "deutsch" "español")
- (default def-lang)
- ))
-
- (set n 0)
-
- (while (set language (select n "deutsch" "español" "" ) )
- (
- (if (IN lang n)
- (copyfiles
- (source (cat "locale/" language ".catalog" ))
- (dest (cat "LOCALE:catalogs/" language ))
- (newname "mcxp.catalog")
- )
- )
- (set n (+ n 1))
- ))
-
- (set vernum (getversion "intuition.library" (resident)))
- (set ver (/ vernum 65536))
-
-
- (if ( > ver 38)
-
- (copylib
- (prompt #msj4)
- (help @copylib-help)
- (source "libs/wbstart.library")
- (dest "libs:")
- (confirm)
- )
-
- (copylib
- (prompt #msj5)
- (help @copylib-help)
- (source "l/WBStart-Handler")
- (dest "l:")
- (confirm)
- )
-
- )
-
- (if ( > ver 38)
-
- (copylib
- (prompt #msj6)
- (help @copylib-help)
- (source "libs/dospath.library")
- (dest "libs:")
- (confirm)
- )
-
-
- )
-
- (set @default-dest name)
-
- (exit)
-