home *** CD-ROM | disk | FTP | other *** search
- ;============================================================================;
- ; PSCalc Installscript by N. DARNIS ;
- ; $VER: PSCalc-Install 1.44 (10.4.1997) ;
- ;============================================================================;
-
- (set #pscalc-default-dest "SYS:Tools/Commodities")
- (set #key-dest1 "keyfiles:")
- (set #key-dest2 "s:")
-
- (set #pscalc-src "/PSCalc")
- (set #doc-icon4-src "/icones/PSCalc.guide4.info")
- (set #doc-icon8-src "/icones/PSCalc.guide8.info")
-
- (set #key-src "/PSCalc.key_file")
- (set #key-src-icon "/PSCalc.key_file.info")
-
- (if (= @language "français")
-
- ;================================ FRANCAIS ==================================;
-
- (
- (set #doc-default-dest "HELP:français")
-
- (set #pscalc-icon4-src "/icones/PSCalc_f4.info")
- (set #pscalc-icon8-src "/icones/PSCalc_f8.info")
-
- (set #doc-src "/help/français/PSCalc.guide")
- (set #doc-html "/help/français/")
- (set #catalog-src "/catalogs/français/pscalc.catalog")
- (set #images-src "/help/français/")
-
- (set #welcome
- (cat
- "\nBienvenue à l'installation de PSCalc V1.44.\n\n"
- "Ecrit par N. DARNIS,\ndistribué par QUARTZ Informatique.\n"
- )
- )
-
- (set #pscalc-dir "Dans quel répertoire voulez-vous installer PSCalc?")
- (set #pscalc-dir-help
- (cat
- "Il s'agit du répertoire de destination de PSCalc.\n"
- "Normalement PSCalc devrait être dans SYS:WBStartup ou dans SYS:Tools/Commodities"
- )
- )
-
- (set #doc "Quel(s) type(s) de documentation désirez-vous installer?")
- (set #doc-help
- (cat
- "Vous pouvez choisir entre le format AmigaGuide et le format html.\n"
- "Vous devriez au moins installer le format AmigaGuide car il est nécessaire pour l'aide en ligne."
- )
- )
-
- (set #doc-dir "Dans quel répertoire voulez-vous copier la documentation?")
- (set #doc-dir-help
- (cat
- "Il s'agit du répertoire de destination de la documentation.\n"
- "Normalement la documentation doit se trouver dans HELP:français\n"
- "Assurez-vous d'avoir AmigaGuide® ou MultiView® pour lire la documentation"
- )
- )
-
- (set #key-dir "Dans quel répertoire voulez-vous copier le fichier clé?")
- (set #key-dir-help
- (cat
- "Il s'agit du répertoire de destination du fichier clé.\n"
- "Vous pouvez choisir entre s: et keyfiles:"
- )
- )
-
- (set #icon-select "Choisissez le type d'icone que vous désirez:")
- (set #icon-select-help
- (cat
- "Vous pouvez choisir les icones Magic Workbench (8 couleurs)\n"
- "ou les icones standards en 4 couleurs."
- )
- )
-
- (set #icons-normal "Normal (4 couleurs)")
- (set #icons-mwb "Magic Workbench (8 couleurs)")
-
- (set #bad-kick "Vous devez posséder le Kickstart 3.0 ou supérieur pour installer PSCalc")
- (set #install-exit "Merci d'utiliser PSCalc...")
- )
-
- ;================================= ENGLISH ==================================;
-
- (
- (set #doc-default-dest "HELP:english")
-
- (set #pscalc-icon4-src "/icones/PSCalc_e4.info")
- (set #pscalc-icon8-src "/icones/PSCalc_e8.info")
-
- (set #doc-src "/help/english/PSCalc.guide")
- (set #doc-html "/help/english/")
- (set #images-src "/help/english/")
-
- (set #welcome
- (cat
- "\nWelcome to the install utility of PSCalc V1.44.\n\n"
- "Written by N. DARNIS, distributed by QUARTZ Informatique.\n"
- )
- )
-
- (set #pscalc-dir "In which drawer do you want to install PSCalc?")
- (set #pscalc-dir-help
- (cat
- "It's the destination drawer of PSCalc.\n"
- "Usually, PSCalc should goes to SYS:WBStartup or to SYS:Tools/Commodities"
- )
- )
-
- (set #doc "Which type(s) of documentation do you want to install?")
- (set #doc-help
- (cat
- "You can choose between AmigaGuide format and html format.\n"
- "You should always install the AmigaGuide format because it's needed by online help."
- )
- )
-
- (set #doc-dir "In which drawer do you want to install the documentation?")
- (set #doc-dir-help
- (cat
- "It's the destination drawer of the documentation.\n"
- "Usually, the documentation must go to HELP:english\n"
- "Be sure to have AmigaGuide® or MultiView® to view the documentation"
- )
- )
-
- (set #key-dir "In which drawer do you want to install the keyfile?")
- (set #key-dir-help
- (cat
- "It's the destination drawer of the keyfile.\n"
- "You can choose between s: and keyfiles:"
- )
- )
-
- (set #icon-select "Choose the icons you wish to install:")
- (set #icon-select-help
- (cat
- "You can choose between Magic Workbench icons (8 colors)\n"
- "and normal icons (4 colors)."
- )
- )
-
- (set #icons-normal "Normal (4 colors)")
- (set #icons-mwb "Magic Workbench (8 colors)")
-
- (set #bad-kick "You need at least Kickstart 3.0 to install PSCalc")
- (set #install-exit "Thank you for using PSCalc...")
- )
- ) ; if language = french
-
- ;============================== PROGRAM-START ===============================
-
- (welcome #welcome)
-
- (complete 0)
-
- (set #pscalc-dir-name
- (askdir
- (prompt #pscalc-dir)
- (help #pscalc-dir-help)
- (default #pscalc-default-dest)
- )
- )
-
- (complete 10)
-
- (set #doc-type
- (if (>= @user-level 2)
- (askoptions
- (prompt #doc)
- (help #doc-help)
- (choices "AmigaGuide" "html")
- )
- -1
- )
- )
-
- (complete 15)
-
- (set #doc-dir-name
- (askdir
- (prompt #doc-dir)
- (help #doc-dir-help)
- (default #doc-default-dest)
- )
- )
-
- (complete 20)
-
- (set #key-dir-name
- (askchoice
- (prompt #key-dir)
- (help #key-dir-help)
- (choices #key-dest1 #key-dest2)
- (default 0)
- )
- )
-
- (complete 30)
-
- (set #icon-type
- (askchoice
- (prompt #icon-select)
- (help #icon-select-help)
- (choices #icons-normal #icons-mwb)
- (default 1)
- )
- )
-
- (complete 40)
-
- (copyfiles
- (source #pscalc-src)
- (dest #pscalc-dir-name)
- )
-
- (complete 50)
-
- (if (in #doc-type 0)
- (
- (copyfiles
- (source #doc-src)
- (dest #doc-dir-name)
- )
- (if (= #icon-type 0)
- (
- (copyfiles
- (source #doc-icon4-src)
- (dest #doc-dir-name)
- (newname "PSCalc.guide.info")
- )
- )
- (
- (copyfiles
- (source #doc-icon8-src)
- (dest #doc-dir-name)
- (newname "PSCalc.guide.info")
- )
- )
- )
- )
- )
-
- (complete 55)
-
- (if (in #doc-type 1)
- (
- (copyfiles
- (source #doc-html)
- (dest #doc-dir-name)
- (pattern "#?.html")
- )
- )
- )
-
- (complete 60)
-
- (copyfiles
- (source #images-src)
- (dest #doc-dir-name)
- (pattern "Fen#?")
- )
-
- (complete 65)
-
- (if (= #icon-type 0)
- (
- (copyfiles
- (source #pscalc-icon4-src)
- (dest #pscalc-dir-name)
- (newname "PSCalc.info")
- )
- )
- (
- (copyfiles
- (source #pscalc-icon8-src)
- (dest #pscalc-dir-name)
- (newname "PSCalc.info")
- )
- )
- )
-
- (complete 70)
-
- (if (= #key-dir-name 0)
- (
- (copyfiles
- (source #key-src)
- (dest #key-dest1)
- )
- (copyfiles
- (source #key-src-icon)
- (dest #key-dest1)
- )
- )
- (
- (copyfiles
- (source #key-src)
- (dest #key-dest2)
- )
- (copyfiles
- (source #key-src-icon)
- (dest #key-dest2)
- )
- )
- )
-
- (complete 80)
-
- (if (= @language "français")
- (copyfiles
- (source #catalog-src)
- (dest "LOCALE:catalogs/français")
- )
- )
-
- (complete 90)
-
- (message #install-exit)
-
- (complete 100)
-
-