home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 135 / af135a.adf / AmiCheck.lzx / AmiCheck / Install_Libs / Workbench2.1+ / Install.Installer < prev    next >
Text File  |  2012-04-16  |  7KB  |  320 lines
  1. ; This script installs the GUIFront library and preferences editor on your
  2. ; harddisk. Use Commodore's Installer utility to execute.
  3. ;
  4. ; Modified by Doug Dyer for generic amiCheck installation needs.
  5.  
  6. ; Default source- and destination files
  7.  
  8. (set prefs-source    "//prefs/GUIFront")
  9. (set prefs-source020    "//prefs/GUIFront.020")
  10. (set prefs-dest        "SYS:Prefs/")
  11. (set prefscat-source    "Locale/Catalogs/")
  12. (set prefscat-dest    "LOCALE:Catalogs/")
  13. (set lib-source        "//libs/guifront.library")
  14. (set lib-source020    "//libs/guifront.library.020")
  15. (set lib-dest        "LIBS:")
  16. (set lib-destname    "guifront.library")
  17. (set er-source        "//libs/easyrexx.library")
  18. (set er-dest        "LIBS:")
  19. (set er-destname    "easyrexx.library")
  20. (set ac-source        "//storage/amiCheck.68000")
  21. (set ac-source020    "//storage/amiCheck.68020")
  22. (set ac-destname    "amiCheck")
  23. (set ac-dest        "//")
  24.  
  25. ;***************************************************************************
  26. ; English strings
  27. ;
  28. ; Translation: Native
  29. ;***************************************************************************
  30.  
  31. (set default_lang 1)
  32. (set oldlevel @user-level)
  33.  
  34. (set wrongkickstart    "amiCheck requires at least Kickstart 2.04")
  35. (set prefs-where    (cat "In which directory do you want to install the "
  36.                  "preferences editor?"))
  37. (set prefs-where-help    (cat "The preferences editor allows you to "
  38.                  "customize the visual appearance of "
  39.                  "the application.\n\n"
  40.                  @askdir-help))
  41. (set prefs-cpu        (cat "Which CPU version of the software "
  42.                  "do you want to install?"))
  43. (set prefs-cpu-help    (cat "Two versions of some software have been"
  44.                  "provided. One version runs on any Amiga, "
  45.                  "while the other requires a 68020 or better.\n\n"
  46.                  "Select the version which closest matches "
  47.                  "your hardware. If you do not know what type of "
  48.                  "CPU your Amiga has, simply accept what the "
  49.                  "Installer suggests\n\n"
  50.                  @askoptions-help))
  51. (set cpu000        "68000")
  52. (set cpu020plus        "68020 or better")
  53. (set er-where        (cat "In which directory do you want to install "
  54.                  "easyrexx.library?"))
  55. (set er-where-help    (cat "This library is used by amiCheck to provide "
  56.                  "arexx support.  It is not required, but "
  57.                  "highly recommended.\n\n"
  58.                  @askdir-help))
  59. (set lib-where        (cat "In which directory do you want to install "
  60.                  "guifront.library?"))
  61. (set lib-where-help    (cat "This library is used by every GUIFront "
  62.                  "application, and is absolutely necessary "
  63.                  "to install.\n\n"
  64.                  @askdir-help))
  65. (set which-lang        "Which languages should be installed? (GUIfront Prefs)")
  66. (set which-lang-help    (cat "The Amiga can be operated in many different "
  67.                  "languages. If you want the GUIFront preferences "
  68.                  "editor to use the same language as your Amiga "
  69.                  "Workbench, then a catalog file must be copied "
  70.                  "to your LOCALE: directory for each language supported.\n\n"
  71.                  "To reduce the amount of space consumed by the "
  72.                  "language files, you can select to have only the "
  73.                  "files of specific languages copied.\n\n"
  74.                  "Please check the boxes of the languages you "
  75.                  "wish to have available on your system.\n\n"
  76.                  @askoptions-help))
  77. (set copying-lib    "Copying guifront.library to ")
  78. (set copying-prefs    "Copying GUIFront preferences editor to ")
  79. (set copying-er        "Copying easyrexx.library to ")
  80. (set copying-ac        "Copying amiCheck.680X0 to ")
  81.  
  82. ;***************************************************************************
  83. ; Make sure we are running under a 2.04 ROM
  84. ;***************************************************************************
  85.  
  86. (complete 0)
  87.  
  88. (if (< (/ (getversion) 65536) 37)
  89. (
  90.     (abort wrongkickstart)
  91. ))
  92.  
  93. ; Determine which CPU the user has
  94. ;
  95.  
  96. (set thiscpu (database "cpu"))
  97. (set n 0)
  98. (set ch 1)
  99. (set cpuvers 2)
  100.  
  101. (while
  102.     (set cpuselstr
  103.         (select n
  104.             "68000"
  105.             "68020"
  106.             ""
  107.         )
  108.     )
  109. (
  110.     (if (= thiscpu cpuselstr) (set cpuvers ch))
  111.  
  112.     (set n (+ n 1))
  113.     (set ch (* 2 ch))
  114. ))
  115.  
  116. ; Ask user which CPU version of the software to install
  117. ;
  118.  
  119. (user 2)
  120. (set whatvers
  121.     (askoptions
  122.         (prompt prefs-cpu)
  123.         (help prefs-cpu-help)
  124.         (choices
  125.             cpu000
  126.             cpu020plus
  127.         )
  128.         (default cpuvers)
  129.     )
  130. )
  131. (user oldlevel)
  132.  
  133. ;(complete 5)
  134.  
  135. ; copy the app
  136. ;
  137.  
  138. ;(set copyver ac-source)
  139. ;
  140. ;(if (IN whatvers 1)
  141. ;    (set copyver ac-source020))
  142. ;
  143. ;(copyfiles
  144. ;    (prompt (cat copying-ac ac-dest "..."))
  145. ;    (source copyver)
  146. ;    (dest ac-dest)
  147. ;    (help @copyfiles-help)
  148. ;    (infos)
  149. ;    (newname ac-destname)
  150. ;)
  151.  
  152. (complete 10)
  153.  
  154.  
  155.  
  156.  
  157.  
  158. ; Ask user where he wants the GUIFront library
  159. ;
  160.  
  161. (set lib-dest
  162.     (askdir
  163.         (prompt lib-where)
  164.         (help lib-where-help)
  165.         (default lib-dest)
  166.     )
  167. )
  168.  
  169. ; Copy guifront.library (the correct CPU version of course)
  170. ;
  171.  
  172. (set n 0)
  173.  
  174. (while
  175.     (set copyver
  176.         ( select n
  177.             lib-source
  178.             lib-source020
  179.             ""
  180.         )
  181.     )
  182. (
  183.     (if (IN whatvers n)
  184.     (
  185.         (copylib
  186.             (prompt (cat copying-lib (tackon lib-dest lib-destname) "..."))
  187.             (help @copylib-help)
  188.             (source copyver)
  189.             (dest lib-dest)
  190.             (newname lib-destname)
  191.             (confirm)
  192.         )
  193.     ))
  194.  
  195.     (set n (+ n 1))
  196. ))
  197.  
  198. (complete 30)
  199.  
  200.  
  201.  
  202.  
  203. ; Ask user where he wants the easyrexx library
  204. ;
  205.  
  206. (set er-dest
  207.     (askdir
  208.         (prompt er-where)
  209.         (help er-where-help)
  210.         (default er-dest)
  211.     )
  212. )
  213.  
  214. ; Copy easyrexx.library
  215. ;
  216.  
  217. (copylib
  218.     (prompt (cat copying-er (tackon er-dest er-destname) "..."))
  219.     (help @copylib-help)
  220.     (source er-source)
  221.     (dest er-dest)
  222.     (newname er-destname)
  223.     (confirm)
  224. )
  225.  
  226. (complete 50)
  227.  
  228. ; Ask user where he wants the GUIFront preferences editor
  229. ;
  230.  
  231. (set prefs-dest
  232.     (askdir
  233.         (prompt prefs-where)
  234.         (help prefs-where-help)
  235.         (default prefs-dest)
  236.     )
  237. )
  238.  
  239. ; Copy the preferences editor (the correct CPU version of course)
  240. ;
  241.  
  242. (set n 0)
  243.  
  244. (while
  245.     (set copyver
  246.         (select n
  247.             prefs-source
  248.             prefs-source020
  249.             ""
  250.  
  251.         )
  252.     )
  253. (
  254.     (if (IN whatvers n)
  255.     (
  256.         (copyfiles
  257.             (prompt (cat copying-prefs prefs-dest "..."))
  258.             (source copyver)
  259.             (dest prefs-dest)
  260.             (help @copyfiles-help)
  261.             (infos)
  262.         )
  263.     ))
  264.  
  265.     (set n (+ n 1))
  266. ))
  267.  
  268.  
  269. (complete 75)
  270.  
  271. ; Attempt to install catalog files for preferences editor
  272. ;
  273. (if (exists "LOCALE:")
  274. (
  275.     (set lang
  276.         (askoptions
  277.             (prompt which-lang)
  278.             (help which-lang-help)
  279.             (choices
  280.                 "English"
  281.                 "Dansk"
  282.                 "Svenska"
  283.             )
  284.             (default default_lang)
  285.         )
  286.     )
  287.     (user oldlevel)
  288.  
  289.     (set n 0)
  290.  
  291.     (while
  292.         (set language
  293.             (select n
  294.                 "English"
  295.                 "Dansk"
  296.                 "Svenska"
  297.                 ""
  298.             )
  299.         )
  300.     (
  301.         (if (IN lang n)
  302.         (
  303.             (if (<> 0 n)
  304.             (
  305.                 (makedir (cat prefscat-dest language))
  306.  
  307.                 (copyfiles
  308.                     (source (cat prefscat-source language))
  309.                     (dest (cat prefscat-dest language))
  310.                     (all)
  311.                 )
  312.             ))
  313.         ))
  314.  
  315.         (set n (+ n 1))
  316.     ))
  317. ))
  318.  
  319. (complete 100)
  320.