home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga 3 / MA_Cover_3.iso / bazy / cdb / cdb_install < prev    next >
Encoding:
Text File  |  1997-01-26  |  1.4 KB  |  57 lines
  1. ;
  2. ;                       CDB Installation Script
  3. ;                                 by
  4. ;                          Andrea Rafreider
  5. ;
  6.  
  7. (message "\n\nCDB is copyright Steve P.R. Peruzzi 1996\n"
  8.          "\n"
  9.          "Installation script written by Andrea Rafreider\n")
  10.  
  11. (set @default-dest
  12.         (askdir
  13.                 (prompt "\nChoose the directory where you "
  14.                         "want to install CDB.\n"
  15.                         "A drawer named \"CDB\" will be created "
  16.                         "in the directory you choose.\n")
  17.                 (help   "Here you can specify where you want "
  18.                         "to install CDB.\n"
  19.                         "A drawer named \"CDB\" will be created "
  20.                         "in the directory you choose.\n")
  21.                 (default "WORK:")
  22.         )
  23. )
  24.  
  25. (makedir (tackon @default-dest "CDB"))
  26.  
  27. (set @default-dest (tackon @default-dest "CDB"))
  28.  
  29.  
  30. (copylib
  31.         (source (tackon (pathonly @icon) "CDB"))
  32.         (dest @default-dest)
  33.         (infos)
  34. )
  35.  
  36. (copyfiles
  37.         (source (tackon (pathonly @icon) "CDB.guide"))
  38.         (dest @default-dest)
  39.         (infos)
  40. )
  41.  
  42. (copyfiles
  43.         (source (tackon (pathonly @icon) "CDB.readme"))
  44.         (dest @default-dest)
  45.         (infos)
  46. )
  47.  
  48. (makedir (tackon @default-dest "data"))
  49.  
  50. (copyfiles
  51.         (all)
  52.         (source (tackon (pathonly @icon) "data"))
  53.         (dest   (tackon @default-dest "data"))
  54. )
  55.  
  56. (message "\nCDB installation completed!\n")
  57.