home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / SYSINSPE.LHA / SysInspector / Install < prev    next >
Encoding:
Text File  |  1997-04-07  |  4.2 KB  |  174 lines
  1. ; SI Installer Script
  2. ; $Ver: v1.01 (28-Mar-97)
  3. ; Written by Phil Vedovatti
  4. ;
  5. ; CHANGES: 
  6. ; Copy the executable thru CopyFiles, so the beta exes will be copied
  7. ; despite the fact they all share the same version   -ES
  8.  
  9. (set @default-dest "Sys:Utilities")
  10.  
  11. (set #bad-kick
  12.    (cat "\n\nSorry! You must have Workbench 3.0 or"
  13.         "\nhigher to to use this package."
  14.         "\n\nAborting Installation!"))
  15.  
  16.  
  17. (set #no-classact
  18.    (cat "\nHmmm!  You don't seem to have the ClassAct 2.0"
  19.         "\nGUI system installed.  You can obtain the"
  20.         "\nlatest ClassAct classes via ftp on the"
  21.         "\nInternet at: \n\n ftp.warped.com/pub/amiga/classact/"
  22.         "\n\nDo you wish to continue installation?"))
  23.  
  24. (set #Help-ContInstall
  25.    (cat "\nThis package requires ClassAct 2.0, which does not"
  26.         "\nappear to be installed on your system.  Select"
  27.         "\n'Continue' to intall the program anyway, or select"
  28.         "\n'Abort' to end the installation."))
  29.  
  30. (set #hello-message
  31.    (cat "Welcome to the SysInspector Installation Utility."
  32.         "\n\nThis product is © 1997 by Eric Sauvageau."
  33.         "\n\nPlease support Amiga shareware authors with your contribution."))
  34.  
  35. (set #SI-dest
  36.    (cat "Where would you like SysInspector program to be"
  37.         "\ninstalled?  A directory will NOT be created during"
  38.         "\nthe installation."))
  39.  
  40. (set #DC-dest
  41.    (cat "Where would you like SysInspector documentation to be"
  42.         "\ninstalled?  The default directory is Help:.  You may"
  43.         "\nselect a different destination if you wish."))
  44.  
  45. (set #BL-dest
  46.    (cat "Where would you like the boards.library to be"
  47.         "\ninstalled?  The default directory is LIBS:, which"
  48.         "\nshould be appropriate for most users."))
  49.  
  50. (set #RQ-dest
  51.    (cat "Where would you like the reqtools.library to be"
  52.         "\ninstalled?  The default directory is LIBS:, which"
  53.         "\nshould be appropriate for most users."))
  54.  
  55. (set #Install-Complete
  56.    (cat "\n\nPlease read the documentation carefully to get"
  57.         "\nthe most out of SysInspector.  SysInspector is a"
  58.         "\npowerful and useful tool, but be sure you know"
  59.         "\nhow to use it to prevent loss of data."))
  60.  
  61. (set #wrongversion
  62. (cat "You have an old version of the program 'Installer' "
  63.      "on your Amiga!\n\nThe installation procedure needs at least Installer 42.9.\n\n"
  64.      "Please check your configuration!"
  65. ))
  66.  
  67. (welcome #hello-message)
  68.  
  69.  
  70. ; ------------------------------
  71. ; Check Installer & Kickstart Version
  72. ; ------------------------------
  73.  
  74. (if (< @installer-version 2752521)
  75.   (
  76.     (message #wrongversion)
  77.     (exit (quiet))
  78.   )
  79. )
  80.  
  81. (if (< (getversion) (* 39 65536))
  82.         (abort #bad-kick)
  83. )
  84.  
  85. ; ------------------------------
  86. ; Check if ClassAct 2.0 installed
  87. ; ------------------------------
  88.  
  89. (if (< (getversion "sys:classes/window.class") (* 42 65536))
  90.    (set ContInstall
  91.              (askbool
  92.                 (prompt #no-classact)
  93.                 (help #Help-ContInstall)
  94.                 (default 0)
  95.                 (choices "Continue Installation" "Abort Installation")
  96.              )
  97.    )
  98. )
  99.  
  100. (if (= ContInstall 1)
  101.         (abort "\nInstallation Aborted!")
  102. )
  103.  
  104. ; ------------------------------
  105. ; Get destinations
  106. ; ------------------------------
  107.  
  108. (set destdir-SI
  109.    (askdir
  110.          (prompt #SI-dest)
  111.          (help @askdir-help)
  112.          (default "Sys:Utilities")
  113.    )
  114. )
  115.  
  116. (set destdir-DC
  117.    (askdir
  118.          (prompt #DC-dest)
  119.          (help @askdir-help)
  120.          (default "Help:")
  121.    )
  122. )
  123.  
  124. (set destdir-BL
  125.    (askdir
  126.          (prompt #BL-dest)
  127.          (help @askdir-help)
  128.          (default "Libs:")
  129.    )
  130. )
  131.  
  132. (set destdir-RQ
  133.    (askdir
  134.          (prompt #RQ-dest)
  135.          (help @askdir-help)
  136.          (default "Libs:")
  137.    )
  138. )
  139.  
  140. ; ------------------------------
  141. ; Installation
  142. ; ------------------------------
  143.  
  144. (copyfiles
  145.    (source "SysInspector")
  146.    (dest destdir-SI)
  147.    (infos)
  148. )
  149.  
  150. (copyfiles
  151.    (source "SysInspector.guide")
  152.    (dest destdir-DC)
  153.    (infos)
  154. )
  155.  
  156.  
  157. (copylib
  158.    (source "libs/boards.library")
  159.    (dest destdir-BL)
  160. )
  161.  
  162. (copylib
  163.    (source "libs/reqtools.library")
  164.    (dest destdir-RQ)
  165. )
  166.  
  167. ; ------------------------------
  168. ; Finishing up
  169. ; ------------------------------
  170.  
  171. ;(run "C:run >NIL: sys:utilities/multiview SysInspector.guide")
  172. (message #Install-Complete)
  173. (exit)
  174.