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 >
Wrap
Text File
|
1997-04-05
|
3KB
|
158 lines
;
; 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)