home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 1 / amigaformatcd01.iso / pd / music / utilities / miniplay / install next >
Text File  |  1996-04-30  |  2KB  |  101 lines
  1.  
  2. ; Install-script for MiniPlay
  3.  
  4. (set libsdest "LIBS:")
  5. (set def-dir "SYS:")
  6.  
  7. (set triton "LIBS/triton.library")
  8. (set ptreplay "LIBS/ptreplay.library")
  9. (set program "MiniPlay")
  10. (set doc "MiniPlay.guide")
  11.  
  12. ;=============================================================================
  13.  
  14. (set #bad-kick
  15.     (cat "You must be using at least Kickstart 2.04 to be able to run MiniPlay!")
  16. )
  17.  
  18. (set #copying-triton "Copying triton.library to LIBS:...")
  19. (set #copying-ptreplay "Copying ptreplay.library to LIBS:...")
  20. (set #copying-program "Copying MiniPlay program...")
  21. (set #copying-doc "Copying MiniPlay document...")
  22.  
  23. (set #install-msg
  24.     (cat "\n\nMiniPlay installation script.\n\n"
  25.          "This script installs MiniPlay and\n"
  26.          "required libraries onto your Amiga."
  27.     )
  28. )
  29.  
  30. ;=============================================================================
  31.  
  32. (if (< (/ (getversion) 65536) 37)
  33.     (
  34.     (abort #bad-kick)
  35.     )
  36. )
  37.  
  38. (message #install-msg)
  39.  
  40. (copylib
  41.     (prompt "\n" #copying-triton)
  42.     (help @copylib-help)
  43.     (source triton)
  44.     (dest libsdest)
  45.     (confirm)
  46. )
  47.  
  48. (copylib
  49.     (prompt "\n" #copying-ptreplay)
  50.     (help @copylib-help)
  51.     (source ptreplay)
  52.     (dest libsdest)
  53.     (confirm)
  54. )
  55.  
  56. (set progdest
  57.     (askdir
  58.         (prompt "Choose where you want MiniPlay to be installed")
  59.               (help "Here you choose a destination for MiniPlay program")
  60.         (default def-dir)
  61.     )
  62. )
  63.  
  64. (set docdest
  65.     (askdir
  66.         (prompt "Choose where you want the document to be installed")
  67.               (help "Here you choose a destination for MiniPlay docs")
  68.         (default progdest)
  69.     )
  70. )
  71.  
  72. (set modpath
  73.     (askdir
  74.         (prompt "Choose MiniPlay's default module-directory")
  75.               (help "Here you choose the directory in which MiniPlays\n"
  76.               "filerequestor will open by default.")
  77.         (default def-dir)
  78.     )
  79. )
  80.  
  81. (copyfiles
  82.     (prompt "\n" #copying-program)
  83.     (help @copyfiles-help)
  84.     (source "")
  85.     (dest progdest)
  86.     (choices program)
  87.     (infos)
  88. )
  89.  
  90. (copyfiles
  91.     (prompt #copying-doc)
  92.     (help @copyfiles-help)
  93.     (source "")
  94.     (dest docdest)
  95.     (choices doc)
  96.     (infos)
  97. )
  98.  
  99. (run ("Setenv MiniPlay.prefs \"%s\"" modpath))
  100. (run ("Copy ENV:MiniPlay.prefs ENVARC:"))
  101.