;
;
;
; This script is Copyright ©1997 by Mark Wilson (tecno on ircnet #Amiga)
;
; v1.0 Initial Creation (Mark)
; v1.1 Added winsound.prefs copying (Deryk)
; v1.2 Corrected typo in the script regarding the .readme file (Deryk)
;

        (welcome "Welcome to the WinSound Install Util")

        (message "\n This is the Installer for\n"
                 "\n WinSound\n"
                 "Copyright 1997 Deryk B. Robosson\n"
                 "\n"
                 "\n"
                 "\n"
                 "\Installing to WorkBench: ........\n"
                 "\n(Please confirm operation below : Proceed/Abort)")
        
        (copyfiles
            (Prompt "Copying WinSoundC to your WBStartup: directory.")
            (help @copyfiles-help)
            (source "WinSound/WinSoundC")
            (dest   "SYS:Wbstartup/")
            (files)
            (infos)   
            (confirm)   
        )       

        (copyfiles
            (Prompt "Copying sample Winsound.prefs to env:.")
            (help @copyfiles-help)
            (source "WinSound/Winsound.prefs")
            (dest "env:")
            (files)
            (infos)
            (confirm)
        )

        (copyfiles
            (Prompt "Copying sample Winsound.prefs to envarc:.")
            (help @copyfiles-help)
            (source "WinSound/Winsound.prefs")
            (dest "envarc:")
            (files)
            (infos)
            (confirm)
        )

        (copyfiles
            (Prompt "Copying WinSoundPrefs to your Prefs directory.")
            (help @copyfiles-help)
            (source "WinSound/WinSoundPrefs")
            (dest   "SYS:Prefs/")
            (files)
            (infos)   
            (confirm)
        )
   
        (copyfiles
            (Prompt "Copying WinSound.guide to your Help: directory.")
            (help @copyfiles-help)
            (source "WinSound/WinSound.guide")
            ("WinSound/WinSoundv1.1.readme")
            (dest   "HELP:")
            (files)
            (infos)   
            (confirm) 
        )

      (message "\n Thats your lot .\n"
               "\nThe programs installed by this script"
               "\nare the Property of Deryk B. Robosson"
               "\nand are Copyright 1997."
               "\n \n"
               "\ Please Read the Documentation.\n"
               "\ Thank you.\n"
               "\n \n"
               "\ Please Press 'Proceed' to finish\n" )
        (exit (quiet))