home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / util / wb / Buttonz.lha / Buttonz / Install / Buttonz-Installer next >
Encoding:
Text File  |  1997-02-06  |  4.2 KB  |  182 lines
  1. ; $VER: Buttonz Install Script V1.0 (06.02.97) by Anthony Brice.
  2. ;
  3. ; This installer language is fucking bollocks :-(
  4. ;
  5. (set @app-name "Buttonz")
  6. (set #wrongversion
  7. (cat "You have an old version of the program 'Installer' "
  8.      "on your Amiga!\n\nThe installation procedure needs at least Installer 42.9.\n\n"
  9.      "Please check your configuration!"
  10. ))
  11. (set YES "Yes")
  12. (set NO "No")
  13. (set MSG_DESTINATION "Where would you like %s to be installed?\n(%s will be directly copied there)")
  14. (set MSG_COPYING "Going to copy %s to %s.")
  15. (set DOCS "Where would you like the %s Guide document?\nRecommended is Help:\n")
  16. (set MSG_DOCS "Copying %s AmigaGuide document to %s")
  17. (set ASK_HTML "Would you like to install the HTML documentation?")
  18. (set HTML "Where would you like the HTML documentation for %s\n Recommended is Help:")
  19. (set HELP_HTML "HTML documentation is only of use for reading with a Web browser such as Voyager-NG,Ibrowse or Aweb.")
  20. (set MSG_HTML "Copying %s HTML documentation to %s")
  21. (set MSG_CONFIGS "Copying %s example configs to Envarc:Buttonz")
  22. (set ASK_CFG "Would you like to install the example Config files?")
  23. (set HELP_CFG "These are config files I use myself and give you an idea how Buttonz can be configured.")
  24. (set FONT "Going to install the supplied Workstation.font\nYou MUST use this font for this version of Buttonz!\n")
  25. (set MSG_THANKS "Thank you for installing %s!\n\nI hope you find it more than usefull :-)\n")
  26. (set @abort-button "Abort Install!")
  27.  
  28. (set #bad-kick
  29.   (cat "Buttonz 1.0 will only run under KickStart 2.04 or above!"
  30.   )
  31. )
  32.  
  33. (if (< (/ (getversion) 65536) 37) (abort #bad-kick))
  34.  
  35. (complete 0)
  36.  
  37. ; Choose default tool for guide, depending on user's OS version
  38.  
  39. (set osversion  (/ (getversion) 65536))
  40. (if (>= osversion 39)
  41.    (set guide_reader "MultiView") 
  42.    (set guide_reader "AmigaGuide")
  43. )
  44.  
  45. (complete 10)
  46.  
  47. (set installed "")
  48.  
  49. (set dest_dir
  50.    (askdir (prompt (MSG_DESTINATION @app-name @app-name))
  51.             (help "The WBStartup directory on your boot disk is the best place "
  52.                   "to put Buttonz. This will insure that it is run "
  53.                   "automatically when you boot your computer."
  54.             )
  55.            (default "Sys:WbStartup")
  56.            (newpath))
  57. )
  58.  
  59. (set @default-dest dest_dir)
  60.  
  61. (complete 20)
  62.  
  63. (copyfiles  (prompt (MSG_COPYING @app-name @default-dest))
  64.             (source "/")
  65.             (Pattern "Buttonz")
  66.             (dest dest_dir)
  67. )
  68.  
  69. (complete 30)
  70.  
  71. (copyfiles  (prompt (MSG_COPYING @app-name @default-dest))
  72.             (source "/")
  73.             (Pattern "Buttonz.info")
  74.             (dest dest_dir)
  75. )
  76.  
  77. (complete 40)
  78.  
  79. (set dest_dir
  80.    (askdir (prompt (DOCS @app-name))
  81.            (help @askdir-help)
  82.            (default "Help:")
  83.            (newpath))
  84. )
  85.  
  86. (set @default-dest dest_dir)
  87.  
  88. (copyfiles  (prompt (MSG_DOCS @app-name @default-dest))
  89.             (help @copyfiles-help)
  90.             (source "/docs/")
  91.             (Pattern "#?guide#?")
  92.             (dest dest_dir)
  93. )
  94.  
  95. (complete 50)
  96.  
  97. (set AskWeb
  98.  (askbool
  99.   (prompt ASK_HTML)
  100.   (help HELP_HTML)
  101.   (choices YES NO)
  102.   (default 1)
  103.  )
  104. )
  105.  
  106. (if AskWeb
  107.   (askdir
  108.    (prompt HTML @app-name)
  109.    (help @askdir-help)
  110.    (default "Help:")
  111.   (newpath))
  112. )
  113.  
  114. (set @default-dest dest_dir)
  115.  
  116. (If AskWeb
  117.   (copyfiles  (prompt (MSG_HTML @app-name))
  118.     (help @copyfiles-help)
  119.     (source "/docs/HTML/")
  120.     (pattern "#?")
  121.     (dest dest_dir)
  122.   )
  123. )
  124.  
  125. (complete 60)
  126.  
  127. (set AskCfg
  128.  (askbool
  129.   (prompt ASK_CFG)
  130.   (help HELP_CFG)
  131.   (choices YES NO)
  132.   (default 1)
  133.  )
  134. )
  135.  
  136. (If AskCfg
  137.   (makedir "Envarc:Buttonz"
  138.     (prompt "Creating config directory...")
  139.     (infos)
  140.   )
  141. )
  142.  
  143. (If AskCfg
  144.   (copyfiles (prompt (MSG_CONFIGS @app-name))
  145.     (help @copyfiles-help)
  146.     (source "/configs/")
  147.     (pattern "#?")
  148.     (dest "EnvArc:Buttonz/")
  149.     (confirm)
  150.   )
  151. )
  152.  
  153. (complete 80)
  154.  
  155. (copyfiles  (prompt (FONT @app-name))
  156.             (help @copyfiles-help)
  157.             (source "/fonts/")
  158.             (pattern "#?")
  159.             (dest "Fonts:")
  160.             (fonts)
  161. )
  162.  
  163. (complete 90)
  164.  
  165. (if (exists (tackon @default-dest "Buttonz.guide.info") (noreq))
  166.    (
  167.       (tooltype   (dest (tackon @default-dest "Buttonz.guide"))
  168.                   (noposition) (setdefaulttool guide_reader))
  169.       (set installed "YES")         
  170.   )
  171. )
  172.  
  173. (complete 100)
  174.  
  175. (if (= installed "YES") 
  176.    (exit (MSG_THANKS @app-name))
  177.    (exit)
  178. )   
  179.  
  180. ; End of Buttonz-Installer script !
  181.  
  182.