home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / VTY-MP11.DMS / in.adf / Install < prev   
Encoding:
Text File  |  1995-04-27  |  1.1 KB  |  61 lines
  1. ;$Movieguide Pro V1.1 Update Installer
  2. ;; (C) Simon Ravn 1995
  3. ;; Revision 1.0
  4.  
  5. (set @user-level 2)
  6. (user 2)
  7. (set instdir
  8.     (askdir
  9.         (prompt "Please tell me where MovieGuide Pro is installed! "
  10.                         "State full pathname, e.g. DH0:Tools/MovieGuide")
  11.         (help @askdir-help)
  12.         (default "SYS:MovieGuide")
  13.         (newpath)
  14.         (disk)
  15.     )
  16. )
  17. (
  18.     (
  19.         (if ( = (exists instdir (noreq)) 0)   ;if selected path doesn't exist...
  20.             ;then create dir
  21.             (makedir instdir
  22.                 (prompt ("creating directory \"%s\"" instdir))
  23.                 (help @makedir-help)
  24.                 (infos)
  25.                 (confirm)
  26.             )
  27.             ;else directory is already there - use it.
  28.             ;()
  29.         )
  30.     )
  31.     (askdisk sourcedisk
  32.         (prompt "\nPlease insert disk \"MovieGuide Pro 1.1 Update\" in any drive.")
  33.         (help @askdisk-help)
  34.         (dest "MGPro_1.1")
  35.         (assigns)
  36.     )
  37.     (copyfiles
  38.     (source "MGPro_1.1:c/Lharc")
  39.     (dest instdir)
  40.     )
  41. )
  42. (set DeArcher (tackon instdir "lharc"))
  43. (
  44.     (
  45.         (set @execute-dir instdir)
  46.             (
  47.                         (working "Updating MovieGuide Pro to V1.1...")
  48.                     (run 
  49.                                 ("%s\ -f x \MGPro_1.1:bin.lha \ >nil:" DeArcher)
  50.                 )
  51.  
  52.             )
  53.         )
  54.     )
  55.  
  56. (delete DeArcher)
  57.  
  58. (exit)
  59.  
  60. ;(set @default-dest instdir)
  61.