; NewIcons Installer Script
; $Ver: 38.3 (8-Jan-95)
; Written by Philip A. Vedovatti
; for Program Author Nicola Salmoria,
; with many thanks for his fine programming work.

(set @default-dest "SYS:C")

(set #bad-kick
   (cat "\n\nSorry! You must have Workbench 2.0 or"
        "higher to to use this package."))

(set #hello-message
   (cat "\n\nWELCOME NEWICONS USER!"
        "\n\n If you don't have a previous version of NewIcons"
        "\nAND Deficons installed, abort this script and"
        "\nExecute the Install_NewIcons script instead."
        "\n\nThis installation is for updating all the"
        "\nNewIcons/Deficons patches and utilities."
        "\n\nIF YOU CURRENTLY HAVE NEWICONS AND DEFICONS"
        "\nALREADY INSTALLED ON YOUR SYSTEM, PROCEED ONWARD."))

(set #install-library
   (cat "\n\nInstalling NewIcon.library to LIBS:."))

(set #install-library-help
   (cat "\n\n    This library is required to use NewIcons"
        "\n and is required for the installation."))

(set #install-newicons
   (cat "\n\nCopying the NewIcons main files to C:"))

(set #install-newicons-help
   (cat "\n\nThis section installs NewIcons, Injectbrush"
        "\nand PatchOpenWB to your C: directory."))

(set #tools-dest
   (cat "\nWhich drawer would you like the NewIcon"
        "\nmanipulation utilities to be installed?\n"))

(set #install-deficons
   (cat "\n\nInstalling the DefIcons daemon to your"
        "\nC: directory, and copying deficons brainfile"
        "\nto your Envarc:sys directory."))

(set #install-deficons-help
   (cat "\nThis sections installs the Deficons program"
        "\nand copies the required def_icons.prefs to your"
        "\nENVARC: directory."))

(set #exit-message
   (cat "Please reboot your system to fully activate\n"
        "the NewIcons/Deficons Systems."
        "\n\n\nWe hope you enjoy this update!"))

(set #docs-dest
   (cat "Where would you like the NewIcons Documentation"
        "\nGuide to be installed?"))

; ------------------------------
; Check Kickstart Version
; ------------------------------

 (if (< (getversion "LIBS:version.library") (* 37 65536))
        (abort #bad-kick)
 )

(message #hello-message)

; ------------------------------
; Install NewIcon.library
; ------------------------------

(copylib
      (source "/libs/newicon.library")
      (dest "libs:")
      (prompt #install-library)
      (help #install-library-help)
      (confirm)
)

;-------------------------------------------------------
;Install icon images, NewIcons, and icon support files
;-------------------------------------------------------



   (copylib
      (prompt #install-newicons)
      (source "/C/NewIcons")
      (dest "c:")
      (help #install-newicons-help)
   )

   (copylib
      (source "/C/InjectBrush")
      (dest "c:")
   )

   (copylib
      (source "/C/PatchOpenWB")
      (dest "c:")
   )


   (set destdir
      (askdir
            (prompt #tools-dest)
            (help @askdir-help)
            (default "Sys:Utilities")
      )
   )

   (copyfiles
      (source "/Utilities/CopyNewIcon")
      (dest destdir)
      (infos)
   )

   (copyfiles
      (source "/Utilities/CreateDefaultIcon")
      (dest destdir)
      (infos)
   )

   (copyfiles
      (source "/Utilities/KillNewIcon")
      (dest destdir)
      (infos)
   )





;------------------------------
;Install Deficons
;------------------------------


   (copylib
      (prompt #install-deficons)
      (source "/C/DefIcons")
      (dest "C:")
      (help #install-deficons-help)
      (confirm)
   )

   (copyfiles
      (source "/envarc/deficons.prefs")
      (dest "ENVARC:")
   )


;------------------------------
;Install Documentation
;------------------------------


   ((set destdir
      (askdir
            (prompt #docs-dest)
            (help @askdir-help)
            (default "Help:")
      )
    )
    (copyfiles
      (source "/NewIcons.guide")
      (dest destdir)
      (infos)
    )
   )


(exit #exit-message)