home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / dev / misc / Istar.lha / Install_Istar < prev    next >
Encoding:
Text File  |  1996-11-06  |  1.9 KB  |  94 lines
  1. ;;
  2. ;; Install_Istar - Istar installation script for Installer
  3. ;;
  4. ;; Copyright © Andrew Basden, November 1996
  5. ;;
  6. ;;     Installer and Installer project icon
  7. ;;     (c) Copyright 1991-93 Commodore-Amiga, Inc.  All Rights Reserved.
  8. ;;     Reproduced and distributed under license from Commodore.
  9. ;;
  10. ;;     INSTALLER SOFTWARE IS PROVIDED "AS-IS" AND SUBJECT TO CHANGE;
  11. ;;     NO WARRANTIES ARE MADE.  ALL USE IS AT YOUR OWN RISK.  NO LIABILITY
  12. ;;     OR RESPONSIBILITY IS ASSUMED.
  13. ;;
  14.  
  15. (set @path
  16.     (askdir 
  17.          (default "work:")
  18.          (prompt "Where do you want to install Istar (a new Istar diretory will be created here) ?")
  19.         (help @makedir-help)
  20.     )
  21. )
  22.  
  23. (set @dest (tackon @path "Istar"))
  24.  
  25. (if (NOT (exists @dest)))
  26.   (makedir @dest 
  27.       (infos)
  28.   )
  29.  
  30. (set @dest1 (tackon @dest "KBs"))
  31.  
  32. (if (NOT (exists @dest1)))
  33.   (makedir @dest1 
  34.       (infos)
  35.   )
  36.  
  37. (set @dest2 (tackon @dest "Docs"))
  38.  
  39. (if (NOT (exists @dest2)))
  40.   (makedir @dest2 
  41.       (infos)
  42.   )
  43.  
  44. (copyfiles
  45.     (prompt "Copy the Istar program and Prefs files?")
  46.     (help "This will copy the Istar program")
  47.     (source "")
  48.     (dest @dest)
  49.         (pattern "Istar#?")
  50.     (files)
  51.         (infos)
  52.     (confirm)
  53. )
  54.  
  55. (copyfiles
  56.     (prompt "Copy the Documentation files?")
  57.     (help "This will copy the Docs drawer.  You should do this.")
  58.     (source "docs")
  59.     (dest @dest2)
  60.         (pattern "#?")
  61.     (files)
  62.         (infos)
  63.     (confirm)
  64. )
  65.  
  66. (copyfiles
  67.     (prompt "Copy the sample knowledge bases?")
  68.     (help "This will copy example KBs")
  69.     (source "KBs")
  70.     (dest @dest1)
  71.         (pattern "#?")
  72.     (files)
  73.         (infos)
  74.     (confirm)
  75. )
  76.  
  77. (copylib
  78.     (prompt "Install iff library?")
  79.     (help "IFF library reads ILBM but is not essential to Istar.")
  80.     (source "iff.library")
  81.     (dest "libs:")
  82.     (confirm)
  83. )
  84.  
  85.  
  86. (set @kbt-assign (cat "assign KBTools: " @dest "\nassign IstarSys: " @dest))
  87. (startup "Istar"
  88.     (prompt "KBTools assigns needs to be added to the \"S:user-startup\".")
  89.     (help "Not strictly necessary, but avoids annoying requester.")
  90.     (command @kbt-assign)
  91.  
  92. )
  93.  
  94.