home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 10 / Sonderheft_12.iso / best-of-tools / packer / blitzdms / install / blitzdms-installer next >
Text File  |  1997-03-09  |  3KB  |  111 lines
  1. ; $VER: BlitzDms Install Script V1.2 (09.10.96) by Anthony Brice.
  2. ;
  3. ; Update for 1.12 archive - 10th March, 1997.
  4. ;
  5. (set MSG_DESTINATION "Where would you like %s to be installed?\n(%s will be directly copied there)")
  6. (set MSG_COPYING "Going to copy %s to %s.")
  7. (set MSG_DOCS "Copying %s AmigaGuide document to %s")
  8. (set DOCUMENTATION "Where would you like the %s Guide document?")
  9. (set FONT "Install the supplied Fonts?\n%s can use with any size 8 or above font,\nand these are very nice examples.")
  10. (set LIBS "Would you like to install the ReqTools Library\n which %s needs to run? Newer versions will NOT\nbe overwritten!!")
  11. (set @abort-button "Forget it!")
  12. (set MSG_THANKS "Thank you for evaluating %s!\nPlease remember that it is shareware and registration\nSupports future Amiga development\n")
  13.  
  14. (set #bad-kick
  15. (cat "BlitzDms 1.01 will only run under KickStart 2.04 or above!"
  16. ))
  17.  
  18. (if (< (/ (getversion) 65536) 37) (abort #bad-kick))
  19.  
  20. (complete 0)
  21.  
  22. ; Choose default tool for guide, depending on user's OS version
  23.  
  24. (set osversion  (/ (getversion) 65536))
  25. (if (>= osversion 39)
  26.    (set guide_reader "MultiView") 
  27.    (set guide_reader "AmigaGuide")
  28. )
  29.  
  30. (complete 10)
  31.  
  32. (set installed "")
  33.  
  34. (set dest_dir
  35.    (askdir (prompt (MSG_DESTINATION @app-name @app-name))
  36.            (help @askdir-help)
  37.            (default "Ram:")
  38.            (newpath))
  39. )
  40.  
  41. (set @default-dest dest_dir)
  42.  
  43. (complete 20)
  44.  
  45. (copyfiles  (prompt (MSG_COPYING @app-name @default-dest))
  46.             (help @copyfiles-help)
  47.             (source "/")
  48.             (Pattern "BlitzDms#?")
  49.             (dest dest_dir)
  50. )
  51.  
  52. (complete 40)
  53.  
  54. (set dest_dir
  55.    (askdir (prompt (DOCUMENTATION @app-name))
  56.            (help @askdir-help)
  57.            (default "Ram:")
  58.            (newpath))
  59. )
  60.  
  61. (set @default-dest dest_dir)
  62.  
  63. (complete 50)
  64.  
  65. (copyfiles  (prompt (MSG_DOCS @app-name @default-dest))
  66.             (help @copyfiles-help)
  67.             (source "/docs/")
  68.             (Pattern "#?guide#?")
  69.             (dest dest_dir)
  70. )
  71.  
  72. (complete 60)
  73.  
  74. (copyfiles  (prompt (FONT @app-name))
  75.             (help @copyfiles-help)
  76.             (source "/fonts/")
  77.             (pattern "#?")
  78.             (dest "Fonts:")
  79.             (fonts)
  80.             (confirm)
  81. )
  82.  
  83. (complete 70)
  84.  
  85. (copylib    (prompt (LIBS @app-name))
  86.             (help @copyfiles-help)
  87.             (source "/libs/reqtools.library")
  88.             (dest "Libs:")
  89.             (confirm)
  90. )
  91.  
  92. (complete 90)
  93.  
  94. (if (exists (tackon @default-dest "BlitzDms.guide.info") (noreq))
  95.    (
  96.       (tooltype   (dest (tackon @default-dest "BlitzDms.guide"))
  97.                   (noposition) (setdefaulttool guide_reader))
  98.       (set installed "YES")         
  99.   )
  100. )
  101.  
  102. (complete 100)
  103.  
  104. (if (= installed "YES") 
  105.    (exit (MSG_THANKS @app-name))
  106.    (exit)
  107. )   
  108.  
  109. ; End of BlitzDms-Installer script !
  110.  
  111.