home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 29 / amigaformatcd29.iso / -readerstuff- / danny_shepherd / filemagic / install_filemagic < prev   
Encoding:
Text File  |  1998-05-28  |  4.0 KB  |  178 lines
  1. (set #wrongversion
  2. (cat "You have an old version of the program 'Installer' "
  3.      "on your Amiga!\n\nThis installation needs at least Installer 42.9,\n\n"
  4.      "available on Aminet (ftp.wustl.edu)"))
  5.  
  6. (set #bad-kick
  7.    (cat "\n\nSorry! You must have Workbench 2.0 or"
  8.         "higher to use this package."))
  9. (set #bad-reqtools
  10.    (cat "\n\nSorry! You must have reqtools.library V38+ installed"
  11.         "to use this package."))
  12.  
  13. (set #welcome-message
  14.    (cat "\nFileMagic ©1997 - 1998 Danny Shepherd"))
  15.  
  16. (set #install-which
  17.    (cat "\nWhich part(s) of File Magic would"
  18.         "\nyou like to install onto your hard drive?\n"))
  19.  
  20. (set #install-prefs
  21.    (cat "\n\nSelect the preferances to install to Envarc:."))
  22.  
  23. (set #install-prefs-help
  24.    (cat "It is recommended that you install the preferance file.\nFmagic.prefs is an example preferance file for use with FileMagic. It" "contains information for MultiFile and paths for the other tools."))
  25.  
  26. (set #install-dest
  27.    (cat "\nWhich drawer would you like File Magic"
  28.         "\nto be installed?"
  29.         "\nA drawer will be created."))
  30.  
  31. (set #docs-dest
  32.    (cat "Where would you like the FileMagic Documentation"
  33.         "\nGuide to be installed?"))
  34.  
  35.  
  36. (set #exit-message
  37.    (cat "\nPlease reboot your system to fully activate\n"
  38.         "the new FileMagic System."
  39.         "\n\n\nI hope you enjoy this package!"
  40.         "\n\n\nCheck out the Official FileMagic Web Page at"
  41.         "\nhttp://www.shepherd.home.ml.org"))
  42.  
  43.  
  44.  
  45. ; ------------------------------------
  46. ; Check Installer & Kickstart Version
  47. ; ------------------------------------
  48.  
  49. (if (< @installer-version 2752521)
  50.   (
  51.     (message #wrongversion (all))
  52.     (exit (quiet))
  53.   )
  54. )
  55.  
  56. (if (< (getversion "LIBS:version.library") (* 37 65536))
  57.         (abort #bad-kick)
  58. )
  59.  
  60. (if (< (getversion "LIBS:reqtools.library") (* 38 65536))
  61.         (abort #bad-reqtools)
  62.  )
  63.  
  64. (welcome #welcome-message)
  65.  
  66.  
  67. ; ------------------------------
  68. ; What should I install?
  69. ; ------------------------------
  70.  
  71. (complete 0)
  72. (set InstallOpt
  73.       (askoptions (prompt #install-which)
  74.                   (help @askoptions-help)
  75.                   (choices "FileMagic" "Documentation")
  76.                   (default 1)
  77.       )
  78. )
  79.  
  80.  
  81. ;--------------------------------------------------------
  82. ; Install Main And Data Files
  83. ;--------------------------------------------------------
  84. (complete 90)
  85. (if (BITAND InstallOpt 1)
  86.  
  87.    ((set destdir
  88.       (askdir
  89.             (prompt #install-dest)
  90.             (help @askdir-help)
  91.             (default "SYS:")
  92.       )
  93.     )
  94.    ((set instdir
  95.       (tackon destdir "FileMagic")
  96.       )
  97.     )
  98.     (makedir instdir (infos)
  99.     )
  100.    ((set datadir
  101.       (tackon instdir "Data")
  102.       )
  103.     )
  104.     (makedir instdir) 
  105.  
  106.     (copyfiles
  107.       (source "FileMagic")
  108.       (dest instdir)
  109.       (infos)
  110.     )
  111.     (copyfiles
  112.       (source "Data/File.1")
  113.       (dest datadir)
  114.       (infos)
  115.     )
  116.    (copyfiles
  117.       (source "Data/File.2")
  118.       (dest datadir)
  119.       (infos)
  120.    )
  121.   )
  122.  
  123. )
  124. ;------------------------------
  125. ;Setup Assigns
  126. ;------------------------------
  127. (complete 70)
  128. (set user-startup
  129.     (cat
  130.         "C:Assign >NIL: FileMagic: "instdir
  131.     )
  132. )
  133.  
  134. (startup "FileMagic"
  135.     (prompt "\nFile Magic requires an assign to setup in"
  136.             "\nyour user startup.  Shall I add the following"
  137.             "\nto your S:user-startup file?\n\n"user-startup
  138.     )
  139.     (help @startup-help)
  140.     (command user-startup)
  141. )
  142.  
  143. ;------------------------------
  144. ;Install Prefs Files
  145. ;------------------------------
  146. (complete 70)
  147. (copyfiles
  148.     (prompt #install-prefs)
  149.     (help #install-prefs-help)
  150.     (source "prefs/")
  151.     (choices "FMagic.prefs")
  152.     (dest "Envarc:Sys/")
  153.     (confirm)
  154. )
  155.  
  156. ;------------------------------
  157. ;Install Documentation
  158. ;------------------------------
  159. (complete 90)
  160. (if (BITAND InstallOpt 2)
  161.  
  162.    ((set destdir
  163.       (askdir
  164.             (prompt #docs-dest)
  165.             (help @askdir-help)
  166.             (default "Locale:Guides")
  167.       )
  168.     )
  169.     (copyfiles
  170.       (source "FileMagic.guide")
  171.       (dest destdir)
  172.       (infos)
  173.     )
  174.    )
  175. )
  176. (complete 100)
  177. (message #exit-message (all))
  178. (exit (quiet))