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 >
Text File  |  1993-08-28  |  12KB  |  400 lines
  1. ; $VER: Install_PowerData 38.200 (27.7.1993)
  2. ;
  3. ; Install script for PowerData (Workbench 2.1 or higher)
  4.  
  5. ;***************************************************************************
  6. ; Initialize global variables
  7. ;***************************************************************************
  8.  
  9. (set @default-dest    "")
  10. (set old_level        @user-level)
  11.  
  12. (set reqtoolslib    "//libs/reqtools.library")
  13. (set pplib        "//libs/powerpacker.library")
  14. (set powerdata        "//PowerData")
  15. (set powerdata020    "//PowerData.020")
  16.  
  17. (set catalogdir        "/Locale/Catalogs/")
  18.  
  19. (set #pd_68000        "PowerData")
  20. (set #pd_68020        "PowerData (68020+)")
  21.  
  22. ;***************************************************************************
  23. ; English strings
  24. ;
  25. ; Translation: Native
  26. ;***************************************************************************
  27.  
  28. (set default_lang 1)
  29.  
  30. (set #targetstr        ("In which directory should PowerData be installed?"))
  31. (set #targetsel        (cat "\nPlease select the directory or partition on which you would like "
  32.                  "PowerData installed. You may enter the name of a directory which "
  33.                  "does not yet exist. It will be created as the installation "
  34.                  "proceeds.\n\nClick PROCEED to start the installation process.\n\n"
  35.             )
  36. )
  37.  
  38. (set #bad-kick        "You must be using Kickstart 2.04+ to install PowerData using this script!")
  39.  
  40. (set #copying-reqtools    "Copying reqtools.library to LIBS:")
  41. (set #copying-pplib    "Copying powerpacker.library to LIBS:")
  42. (set #copying-powerdata    "Copying PowerData...")
  43.  
  44. (set #which-language    "\nWhich languages should be installed?")
  45.  
  46. (set #what-versions    "\nWhich version(s) would you like to install?")
  47.  
  48. (set #what-versions-help
  49.             (cat "\nTwo versions of PowerData are provided. One version, "
  50.                  "the 68000 version, will work on all machines, whilst the "
  51.                  "other requires a 68020 (or better) "
  52.                  "equipped machine. If you have an Amiga 1200, Amiga 2500, "
  53.                  "Amiga 3000 or Amiga 4000, or an accellerator board in your machine, "
  54.                  "then select to install the 68020 version. This version uses "
  55.                  "some special instructions of the 68020 to boost performance.\n\n"
  56.                  "You may install both versions of PowerData if you wish.\n\n"
  57.                  @askoptions-help
  58.             )
  59. )
  60.  
  61. (set #which-language-help
  62.             (cat "\nThe Amiga can be operated in many different "
  63.                  "languages. If you want PowerData to "
  64.                  "use the same language as the Amiga Workbench "
  65.                  "then a catalog file must be copied to your "
  66.                  "system disk for each language supported.\n\n"
  67.                  "To reduce the amount of space consumed by the "
  68.                  "language files, you can select to have only the "
  69.                  "files of specific languages copied.\n\n"
  70.                  "Simply check the boxes of the languages you wish "
  71.                  "to have available on your system.\n\n"
  72.                  @askoptions-help
  73.             )
  74. )
  75.  
  76. ;=============================================================================
  77. ; German strings - These are still VERY incomplete (to say the least :-)
  78.  
  79. (if (= @language "deutsch")
  80. (
  81.     (set default_lang 4)
  82. ))
  83.  
  84. ;***************************************************************************
  85. ; French strings
  86. ;
  87. ; Translation: Reza Elghazi
  88. ;***************************************************************************
  89.  
  90. (if (= @language "français")
  91. (
  92.  
  93. (set default_lang    8)
  94.  
  95. (set #targetstr        "Dans quel tiroir PowerData doit-il être installé ?")
  96. (set #targetsel        (cat "\n Veuillez selectionner le répértoire ou la partition"
  97.                  " dans lequel vous aimeriez que PowerData soit installé"
  98.                  " Vous pouvez enter le nom d'un répértoire qui n'existe"
  99.                  " pas encore."
  100.                  " Ce dernier sera crée durant l'installation."
  101.                  "\n\nClickez sur \"Continuer\" pour commencer la procédure"
  102.                  " d'installation.\n\n"
  103.             )
  104. )
  105.  
  106. (set #bad-kick        "Vous devez utiliser le Kickstart 2.04+ afin d'installer PowerData avec ce script!")
  107.  
  108. (set #copying-reqtools    "Copie de la reqtools.library dans LIBS:")
  109. (set #copying-pplib    "Copie de la powerpacker.library to LIBS:")
  110. (set #copying-powerdata    "Copie de PowerData...")
  111.  
  112. (set #which-language    "\nQuelles sont les langages à installer?")
  113.  
  114. (set #what-versions-help
  115.             (cat "\n    Deux versions de PowerData sont disponibles.\n"
  116.                  "L'une pour 68000, fonctionne sur toutes les machines, "
  117.                  "alors que l'autre nécessite un Amiga à base de 68020 "
  118.                  "(ou mieux).\n"
  119.                  "Si vous possédez un Amiga 1200, 2500, 3000, 4000 ou "
  120.                  "une carte accélératrice, alors installez la version "
  121.                  "pour 68020. Cette version, aux performances étendues, "
  122.                  "utilise certaines instructions propres au 68020.\n\n"
  123.                  "Vous pouvez aussi, si vous le voulez, installer les "
  124.                  "deux versions de PowerData.\n\n"
  125.                  @askoptions-help
  126.             )
  127. )
  128.  
  129. (set #which-language-help
  130.             (cat "\nL'Amiga peut fonctionner dans différentes langages. "
  131.                  "Plusieurs fichiers doivent être copiés sur le disque dur "
  132.                  "pour chaque langue utiliséee\n\n"
  133.                  "Pour réduire la quantité d'espace utilisé par ces fichiers, "
  134.                  "vous devez sélectionner seulement les langages qui vous seront "
  135.                  "utiles.\n\n"
  136.                  "Cochez les langues que vous souhaitez "
  137.                  "sur votre système\n\n"
  138.                  @askoptions-help
  139.             )
  140. )
  141.  
  142. ))
  143.  
  144. ;***************************************************************************
  145. ; Italian strings
  146. ;
  147. ; Translation: Mirco Zanca
  148. ;***************************************************************************
  149.  
  150. (if (= @language "italiano")
  151. (
  152.  
  153. (set default_lang    16)
  154.  
  155. (set #targetstr        "In quale cassetto vuoi installare PowerData?")
  156. (set #targetsel        (cat "\nSeleziona il cassetto o la partizione in cui vuoi "
  157.                  "installare PowerData. Puoi inserire il nome di un cassetto "
  158.                  "non esistente, verrà creato automaticamente durante "
  159.                  "l'installazione.\n\nSeleziona PROCEDI per iniziare l'installazione.\n\n"
  160.             )
  161. )
  162.  
  163. (set #bad-kick        "Devi avere un Kickstart 2.04+ per installare PowerData in questo modo!")
  164.  
  165. (set #copying-reqtools    "Sto copiando la reqtools.library in LIBS:")
  166. (set #copying-pplib    "Sto copiando la powerpacker.library in LIBS:")
  167. (set #copying-powerdata    "Sto copiando PowerData...")
  168.  
  169. (set #which-language    "Quali lingue devono essere installate?")
  170.  
  171. (set #which-language-help
  172.             (cat "\nAmiga può utilizzare molte lingue diverse. "
  173.                  "Se vuoi che PowerData utilizzi la stessa lingua "
  174.                  "del Workbench del tuo Amiga allora bisogna "
  175.                  "copiare un apposito file  sul tuo disco di "
  176.                  "sistema per ogni lingua che vuoi usare.\n\n"
  177.                  "Per ridurre al minimo lo spazio occupato dai "
  178.                  "file delle lingue, puoi scegliere quali vuoi "
  179.                  "che siano installate e quali no.\n\n"
  180.                  "Basta che selezioni solo le lingue che vuoi "
  181.                  "rendere disponibili sul tuo sistema.\n\n"
  182.                  @askoptions-help
  183.             )
  184. )
  185.  
  186. ))
  187.  
  188. ;***************************************************************************
  189. ; Danish strings
  190. ;
  191. ; Translation: Michael Berg
  192. ;***************************************************************************
  193.  
  194. (if (= @language "dansk")
  195. (
  196.  
  197. (set default_lang    2)
  198.  
  199. (set #targetstr        "I hvilket katalog skal PowerData installeres?")
  200. (set #targetsel        (cat "\nVælg det katalog eller den partition som PowerData ønskes "
  201.                  "installeret på. De kan indtaste navnet på et katalog som "
  202.                  "endnu ikke eksisterer. Det vil blive oprettet når installationen "
  203.                  "fortsætter\n\nTryk på PROCEED for at starte installeringen.\n\n"
  204.             )
  205. )
  206.  
  207. (set #bad-kick        (cat "De har brug for Kickstart 2.04+ for at kunne installere "
  208.                  "PowerData med dette installationsprogram"
  209.             )
  210. )
  211.  
  212. (set #copying-reqtools    "Kopierer reqtools.library til LIBS:")
  213. (set #copying-pplib    "Kopierer powerpacker.library til LIBS:")
  214. (set #copying-powerdata    "Kopierer PowerData...")
  215.  
  216. (set #which-language    "\nHvilke(t) sprog ønsker De at installere?")
  217. (set #what-versions    "\nHvilke(n) version(er) ønsker De at installere?")
  218.  
  219. (set #what-versions-help
  220.             (cat "\nPowerData leveres i to versioner. Den ene, 68000 versionen, "
  221.                  "vil virke på alle maskiner, mens den anden "
  222.                  "kræver en 68020 (eller bedre) maskine. Hvis De har en Amiga 1200, "
  223.                  "Amiga 2500, Amiga 3000 eller Amiga 4000, eller hvis De har et "
  224.                  "accelleratorkort i Deres maskine, så bør De installere 68020 "
  225.                  "versionen. Denne version benytter specielle, udvalgte 68020 "
  226.                  "instruktioner der forbedrer programmets ydeevne.\n\nDe kan "
  227.                  "installere begge versioner af PowerData hvis De ønsker.\n\n"
  228.                  @askoptions-help
  229.             )
  230. )
  231.  
  232. (set #which-language-help
  233.             (cat "\nAmigaen kan benyttes i mange forskellige sprog.\n"
  234.                  "Hvis De ønsker at PowerData skal benytte samme sprog "
  235.                  "som Amiga Workbench, så skal der kopieres en katalogfil "
  236.                  "til Deres systemdisk for hvert sprog.\n\n"
  237.                  "For at reducere sprogfilernes pladsforbrug kan De vælge "
  238.                  "kun at installere det eller de sprog installeret som "
  239.                  "De har brug for.\n\n"
  240.                  "Klik i boksene ud for de sprog De ønsker at have tilgængelige "
  241.                  "på Deres system.\n\n"
  242.                  @askoptions-help
  243.             )
  244. )
  245.  
  246. ))
  247.  
  248. ;***************************************************************************
  249. ; Make sure we are running under a 2.04 ROM
  250. ;***************************************************************************
  251.  
  252. (if (< (/ (getversion) 65536) 37)
  253. (
  254.     (abort #bad-kick)
  255. ))
  256.  
  257. ;***************************************************************************
  258. ; Ask user where he wants the PowerData executable
  259. ;***************************************************************************
  260.  
  261. (set @target-dir
  262.     (askdir
  263.         (prompt #targetstr)
  264.         (help #targetsel @askdir-help)
  265.         (default "SYS:Tools/Commodities")
  266.     )
  267. )
  268.  
  269. ;***************************************************************************
  270. ; What hardware does the user have?
  271. ;***************************************************************************
  272.  
  273. (if (patmatch "680[234]0" (database "cpu"))
  274.     (set cpuvers 2)
  275.     (set cpuvers 1)
  276. )
  277.  
  278. ;***************************************************************************
  279. ; Ask user which versions of PowerData to install
  280. ; Suggest the appropriate version, using the CPU calculation above
  281. ;***************************************************************************
  282.  
  283. (user 2)
  284. (set whatvers
  285.     (askoptions
  286.         (prompt #what-versions)
  287.         (help #what-versions-help)
  288.         (choices
  289.             #pd_68000
  290.             #pd_68020
  291.         )
  292.         (default cpuvers)
  293.     )
  294. )
  295. (user old_level)
  296.  
  297. ;***************************************************************************
  298. ; Copy reqtools.library to LIBS:
  299. ;***************************************************************************
  300.  
  301. (copylib
  302.     (prompt "\n" #copying-reqtools)
  303.     (help @copylib-help)
  304.     (source reqtoolslib)
  305.     (dest "LIBS:")
  306.     (confirm)
  307. )
  308.  
  309. ;***************************************************************************
  310. ; Copy powerpacker.library to LIBS:
  311. ;***************************************************************************
  312.  
  313. (copylib
  314.     (prompt "\n" #copying-pplib)
  315.     (help @copylib-help)
  316.     (source pplib)
  317.     (dest "LIBS:")
  318.     (confirm)
  319. )
  320.  
  321. ;***************************************************************************
  322. ; Copy the PowerData executable and icon
  323. ;***************************************************************************
  324.  
  325. (set n 0)
  326. (while
  327.     (set copyver
  328.         (select n
  329.             powerdata
  330.             powerdata020
  331.             ""
  332.         )
  333.     )
  334. (
  335.     (if (IN whatvers n)
  336.     (
  337.         (copyfiles
  338.             (prompt @copying-powerdata)
  339.             (help @copypowerdata-help)
  340.             (source copyver)
  341.             (dest @target-dir)
  342.             (infos)
  343.         )
  344.     ))
  345.  
  346.     (set n (+ n 1))
  347. ))
  348.  
  349. ;***************************************************************************
  350. ; Copy catalog files (only relevant on v38+ machines)
  351. ;***************************************************************************
  352.  
  353. (if (exists "LOCALE:")
  354. (
  355.     (user 2)
  356.     (set lang (askoptions
  357.             (prompt #which-language)
  358.             (help #which-language-help)
  359.             (choices
  360.                 "English"
  361.                 "Dansk"
  362.                 "Deutsch"
  363.                 "Français"
  364.                 "Italiano"
  365.             )
  366.             (default default_lang)
  367.           )
  368.     )
  369.     (user old_level)
  370.  
  371.     (set n 0)
  372.     (while
  373.         (set language
  374.             (select n
  375.                 "English"
  376.                 "Dansk"
  377.                 "Deutsch"
  378.                 "Français"
  379.                 "Italiano"
  380.                 ""
  381.             )
  382.         )
  383.     (
  384.         (if (IN lang n)
  385.         (
  386.             (if (<> 0 n)
  387.             (
  388.                 (makedir (cat "LOCALE:Catalogs/" language))
  389.                 (copyfiles
  390.                     (source (cat catalogdir language))
  391.                     (dest (cat "LOCALE:Catalogs/" language))
  392.                     (all)
  393.                 )
  394.             ))
  395.         ))
  396.  
  397.         (set n (+ n 1))
  398.     ))
  399. ))
  400.