home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 1: Amiga
/
FrozenFish-Apr94.iso
/
bbs
/
alib
/
d9xx
/
d906
/
powerdata.lha
/
PowerData
/
Installation
/
Workbench2.1+
/
Install_PowerData
< prev
next >
Wrap
Text File
|
1993-08-28
|
12KB
|
400 lines
; $VER: Install_PowerData 38.200 (27.7.1993)
;
; Install script for PowerData (Workbench 2.1 or higher)
;***************************************************************************
; Initialize global variables
;***************************************************************************
(set @default-dest "")
(set old_level @user-level)
(set reqtoolslib "//libs/reqtools.library")
(set pplib "//libs/powerpacker.library")
(set powerdata "//PowerData")
(set powerdata020 "//PowerData.020")
(set catalogdir "/Locale/Catalogs/")
(set #pd_68000 "PowerData")
(set #pd_68020 "PowerData (68020+)")
;***************************************************************************
; English strings
;
; Translation: Native
;***************************************************************************
(set default_lang 1)
(set #targetstr ("In which directory should PowerData be installed?"))
(set #targetsel (cat "\nPlease select the directory or partition on which you would like "
"PowerData installed. You may enter the name of a directory which "
"does not yet exist. It will be created as the installation "
"proceeds.\n\nClick PROCEED to start the installation process.\n\n"
)
)
(set #bad-kick "You must be using Kickstart 2.04+ to install PowerData using this script!")
(set #copying-reqtools "Copying reqtools.library to LIBS:")
(set #copying-pplib "Copying powerpacker.library to LIBS:")
(set #copying-powerdata "Copying PowerData...")
(set #which-language "\nWhich languages should be installed?")
(set #what-versions "\nWhich version(s) would you like to install?")
(set #what-versions-help
(cat "\nTwo versions of PowerData are provided. One version, "
"the 68000 version, will work on all machines, whilst the "
"other requires a 68020 (or better) "
"equipped machine. If you have an Amiga 1200, Amiga 2500, "
"Amiga 3000 or Amiga 4000, or an accellerator board in your machine, "
"then select to install the 68020 version. This version uses "
"some special instructions of the 68020 to boost performance.\n\n"
"You may install both versions of PowerData if you wish.\n\n"
@askoptions-help
)
)
(set #which-language-help
(cat "\nThe Amiga can be operated in many different "
"languages. If you want PowerData to "
"use the same language as the Amiga Workbench "
"then a catalog file must be copied to your "
"system disk for each language supported.\n\n"
"To reduce the amount of space consumed by the "
"language files, you can select to have only the "
"files of specific languages copied.\n\n"
"Simply check the boxes of the languages you wish "
"to have available on your system.\n\n"
@askoptions-help
)
)
;=============================================================================
; German strings - These are still VERY incomplete (to say the least :-)
(if (= @language "deutsch")
(
(set default_lang 4)
))
;***************************************************************************
; French strings
;
; Translation: Reza Elghazi
;***************************************************************************
(if (= @language "français")
(
(set default_lang 8)
(set #targetstr "Dans quel tiroir PowerData doit-il être installé ?")
(set #targetsel (cat "\n Veuillez selectionner le répértoire ou la partition"
" dans lequel vous aimeriez que PowerData soit installé"
" Vous pouvez enter le nom d'un répértoire qui n'existe"
" pas encore."
" Ce dernier sera crée durant l'installation."
"\n\nClickez sur \"Continuer\" pour commencer la procédure"
" d'installation.\n\n"
)
)
(set #bad-kick "Vous devez utiliser le Kickstart 2.04+ afin d'installer PowerData avec ce script!")
(set #copying-reqtools "Copie de la reqtools.library dans LIBS:")
(set #copying-pplib "Copie de la powerpacker.library to LIBS:")
(set #copying-powerdata "Copie de PowerData...")
(set #which-language "\nQuelles sont les langages à installer?")
(set #what-versions-help
(cat "\n Deux versions de PowerData sont disponibles.\n"
"L'une pour 68000, fonctionne sur toutes les machines, "
"alors que l'autre nécessite un Amiga à base de 68020 "
"(ou mieux).\n"
"Si vous possédez un Amiga 1200, 2500, 3000, 4000 ou "
"une carte accélératrice, alors installez la version "
"pour 68020. Cette version, aux performances étendues, "
"utilise certaines instructions propres au 68020.\n\n"
"Vous pouvez aussi, si vous le voulez, installer les "
"deux versions de PowerData.\n\n"
@askoptions-help
)
)
(set #which-language-help
(cat "\nL'Amiga peut fonctionner dans différentes langages. "
"Plusieurs fichiers doivent être copiés sur le disque dur "
"pour chaque langue utiliséee\n\n"
"Pour réduire la quantité d'espace utilisé par ces fichiers, "
"vous devez sélectionner seulement les langages qui vous seront "
"utiles.\n\n"
"Cochez les langues que vous souhaitez "
"sur votre système\n\n"
@askoptions-help
)
)
))
;***************************************************************************
; Italian strings
;
; Translation: Mirco Zanca
;***************************************************************************
(if (= @language "italiano")
(
(set default_lang 16)
(set #targetstr "In quale cassetto vuoi installare PowerData?")
(set #targetsel (cat "\nSeleziona il cassetto o la partizione in cui vuoi "
"installare PowerData. Puoi inserire il nome di un cassetto "
"non esistente, verrà creato automaticamente durante "
"l'installazione.\n\nSeleziona PROCEDI per iniziare l'installazione.\n\n"
)
)
(set #bad-kick "Devi avere un Kickstart 2.04+ per installare PowerData in questo modo!")
(set #copying-reqtools "Sto copiando la reqtools.library in LIBS:")
(set #copying-pplib "Sto copiando la powerpacker.library in LIBS:")
(set #copying-powerdata "Sto copiando PowerData...")
(set #which-language "Quali lingue devono essere installate?")
(set #which-language-help
(cat "\nAmiga può utilizzare molte lingue diverse. "
"Se vuoi che PowerData utilizzi la stessa lingua "
"del Workbench del tuo Amiga allora bisogna "
"copiare un apposito file sul tuo disco di "
"sistema per ogni lingua che vuoi usare.\n\n"
"Per ridurre al minimo lo spazio occupato dai "
"file delle lingue, puoi scegliere quali vuoi "
"che siano installate e quali no.\n\n"
"Basta che selezioni solo le lingue che vuoi "
"rendere disponibili sul tuo sistema.\n\n"
@askoptions-help
)
)
))
;***************************************************************************
; Danish strings
;
; Translation: Michael Berg
;***************************************************************************
(if (= @language "dansk")
(
(set default_lang 2)
(set #targetstr "I hvilket katalog skal PowerData installeres?")
(set #targetsel (cat "\nVælg det katalog eller den partition som PowerData ønskes "
"installeret på. De kan indtaste navnet på et katalog som "
"endnu ikke eksisterer. Det vil blive oprettet når installationen "
"fortsætter\n\nTryk på PROCEED for at starte installeringen.\n\n"
)
)
(set #bad-kick (cat "De har brug for Kickstart 2.04+ for at kunne installere "
"PowerData med dette installationsprogram"
)
)
(set #copying-reqtools "Kopierer reqtools.library til LIBS:")
(set #copying-pplib "Kopierer powerpacker.library til LIBS:")
(set #copying-powerdata "Kopierer PowerData...")
(set #which-language "\nHvilke(t) sprog ønsker De at installere?")
(set #what-versions "\nHvilke(n) version(er) ønsker De at installere?")
(set #what-versions-help
(cat "\nPowerData leveres i to versioner. Den ene, 68000 versionen, "
"vil virke på alle maskiner, mens den anden "
"kræver en 68020 (eller bedre) maskine. Hvis De har en Amiga 1200, "
"Amiga 2500, Amiga 3000 eller Amiga 4000, eller hvis De har et "
"accelleratorkort i Deres maskine, så bør De installere 68020 "
"versionen. Denne version benytter specielle, udvalgte 68020 "
"instruktioner der forbedrer programmets ydeevne.\n\nDe kan "
"installere begge versioner af PowerData hvis De ønsker.\n\n"
@askoptions-help
)
)
(set #which-language-help
(cat "\nAmigaen kan benyttes i mange forskellige sprog.\n"
"Hvis De ønsker at PowerData skal benytte samme sprog "
"som Amiga Workbench, så skal der kopieres en katalogfil "
"til Deres systemdisk for hvert sprog.\n\n"
"For at reducere sprogfilernes pladsforbrug kan De vælge "
"kun at installere det eller de sprog installeret som "
"De har brug for.\n\n"
"Klik i boksene ud for de sprog De ønsker at have tilgængelige "
"på Deres system.\n\n"
@askoptions-help
)
)
))
;***************************************************************************
; Make sure we are running under a 2.04 ROM
;***************************************************************************
(if (< (/ (getversion) 65536) 37)
(
(abort #bad-kick)
))
;***************************************************************************
; Ask user where he wants the PowerData executable
;***************************************************************************
(set @target-dir
(askdir
(prompt #targetstr)
(help #targetsel @askdir-help)
(default "SYS:Tools/Commodities")
)
)
;***************************************************************************
; What hardware does the user have?
;***************************************************************************
(if (patmatch "680[234]0" (database "cpu"))
(set cpuvers 2)
(set cpuvers 1)
)
;***************************************************************************
; Ask user which versions of PowerData to install
; Suggest the appropriate version, using the CPU calculation above
;***************************************************************************
(user 2)
(set whatvers
(askoptions
(prompt #what-versions)
(help #what-versions-help)
(choices
#pd_68000
#pd_68020
)
(default cpuvers)
)
)
(user old_level)
;***************************************************************************
; Copy reqtools.library to LIBS:
;***************************************************************************
(copylib
(prompt "\n" #copying-reqtools)
(help @copylib-help)
(source reqtoolslib)
(dest "LIBS:")
(confirm)
)
;***************************************************************************
; Copy powerpacker.library to LIBS:
;***************************************************************************
(copylib
(prompt "\n" #copying-pplib)
(help @copylib-help)
(source pplib)
(dest "LIBS:")
(confirm)
)
;***************************************************************************
; Copy the PowerData executable and icon
;***************************************************************************
(set n 0)
(while
(set copyver
(select n
powerdata
powerdata020
""
)
)
(
(if (IN whatvers n)
(
(copyfiles
(prompt @copying-powerdata)
(help @copypowerdata-help)
(source copyver)
(dest @target-dir)
(infos)
)
))
(set n (+ n 1))
))
;***************************************************************************
; Copy catalog files (only relevant on v38+ machines)
;***************************************************************************
(if (exists "LOCALE:")
(
(user 2)
(set lang (askoptions
(prompt #which-language)
(help #which-language-help)
(choices
"English"
"Dansk"
"Deutsch"
"Français"
"Italiano"
)
(default default_lang)
)
)
(user old_level)
(set n 0)
(while
(set language
(select n
"English"
"Dansk"
"Deutsch"
"Français"
"Italiano"
""
)
)
(
(if (IN lang n)
(
(if (<> 0 n)
(
(makedir (cat "LOCALE:Catalogs/" language))
(copyfiles
(source (cat catalogdir language))
(dest (cat "LOCALE:Catalogs/" language))
(all)
)
))
))
(set n (+ n 1))
))
))