; ------------------------------------------------------
; $VER: 303tracker InstallScript English 1.0 (15.10.98)
; Installer for 303tracker Beta Version 0.11
; Written by Jeroen Schellekens

; *********************************************************
; *             Init stuff (setup screens etc)            *
; *********************************************************

; Set the initial graphics first
GFX_LOAD Install_Files/GfxE.ilbm 80 40
BACK_LOAD Install_Files/BackgroundBeta.ilbm
BACK_SHOW

; Load the first screenshot (the advertisement)
LOAD_PIC Install_Files/Advert.ilbm
SHOW_PIC 12 120 320 128

; Reset the Action Window
ACT_WINDOW_RESET

; Load a background music
LOAD_MODULE Install_Files/Bg.mod
PLAY_MODULE %1111

; Load a nice font
SET_FONT Install_Files/Topal.fnt

; Let's start the show (appear screen) but wait a moment
APPEAR_ALL 20

; Show the rotating logo
START_LOGO 12 52
WAIT 20

; *********************************************************
; *                   The Main program                    *
; *********************************************************

; Update Logfile
MESSAGE "Start Install 303tracker"
MESSAGE "Beta Version 0.11"

; Welcome user, tell which version of 303tracker will be installed
REQUEST_NOTIFY "Welcome to the 303tracker installer." "This program will install:" "" "303tracker Beta Version 0.11" "Continue"

; Tell the user which specs it needs
REQUEST_NOTIFY "303tracker needs 2 megabytes of" "harddrive-space for installation." "You can now select where to install" "303tracker." "Select Path"

; Ask the user where to install 303tracker
REQUEST_DIR "Ram:" "Select path to install 303tracker." "A new directory WILL be created." "Accept" "Abort" "Parent" "Volumes"

IF RESULT = -1
   CALL "ABORT"
ENDIF

; Set the destination-path to the previous specified one
SET_DESTPATH RESULT

; Check if there's enough free space in current dest-path (in kilobytes)
CHECK_FREE RESULT 4096

IF RESULT = -1
   REQUEST_NOTIFY "Installation has been cancelled!" "To install 303tracker, you need at" "least 4 megabytes of free space on" "your harddrive. Be sure next time!" "Abort Installation"
   CALL "ABORT"
ENDIF

; Make a new directory in the destination-path with .info file (1)
MAKE_DIR "303trackerV0.11" 1
; Add the just created dir to the Destpath
SET_DESTPATH RESULT

; Write down the destination-path in the log-file
MESSAGE "Current destination-path:"
MESSAGE RESULT

; Reset the sourcepath to the program-startup-path
RESET_SOURCEPATH

; *********************************************************
; *          Allrighdie, let's install the shit!          *
; *********************************************************

; Create a couple of dirs in the destpath
MAKE_DIR "Effects" 0
MAKE_DIR "Engines" 0
MAKE_DIR "Help" 0
MAKE_DIR "Language" 0
MAKE_DIR "Plugins" 0
MAKE_DIR "Rexx" 0
MAKE_DIR "Samples" 0
MAKE_DIR "Songs" 0
MAKE_DIR "System" 0
MAKE_DIR "Waveforms" 0

PROGRESS 3

; Install the native language, English in this case
MAKE_DIR "Language/English" 0
MAKE_DIR "Help/English" 0
COPY_ALL Program/Language/English/ Language/English
COPY_ALL Program/Help/English/ Help/English

PROGRESS 8

; Ask to copy the included samples
REQUEST_CHOICE "Do you want to install the included samples?" "(These cost you about 200 kb of your harddisk)" "Yes" "No" "Abort" ""
IF RESULT = 1
   COPY_ALL Program/Samples/ Samples
ENDIF
IF RESULT = 3
   CALL "ABORT"
ENDIF

PROGRESS 14

; Ask to copy the included songs
REQUEST_CHOICE "Do you want to install the included songs?" "(These cost you about 50 kb of your harddisk)" "Yes" "No" "Abort" ""
IF RESULT = 1
   COPY_ALL Program/Songs/ Songs
ENDIF
IF RESULT = 3
   CALL "ABORT"
ENDIF

PROGRESS 20

; Copy all the other stuff (system, plug-ins, waveforms, engines, effects)

; Copy Help-Images
MAKE_DIR "Help/Images" 0
COPY_ALL Program/Help/Images/ Help/Images
PROGRESS 25

; Copy Effects stuff (lists, tables)
COPY_ALL Program/Effects/ Effects
PROGRESS 30

; Copy Engines (executables and other stuff)
COPY_ALL Program/Engines/ Engines
PROGRESS 40

; Copy Plugins (graphix, configs & coords for Drum, Bassline & WackyFilter)
COPY_ALL Program/Plugins/ Plugins
PROGRESS 50

; Copy ARexx scripts
COPY_ALL Program/Rexx/ Rexx
PROGRESS 60

LOAD_PIC Install_Files/Editor.ilbm
SHOW_PIC 12 120 320 128

; Copy System Files
COPY_ALL Program/System/ System
PROGRESS 70

; Copy Waveforms for FREE Vco
COPY_ALL Program/Waveforms/ Waveforms
PROGRESS 80

; Copy Executable, Config, Readme.txt, Manual.Guide in root
COPY_FILE Program/303tracker.config 303tracker.config
COPY_FILE Program/303tracker.guide 303tracker.guide
COPY_FILE Program/303tracker.guide.info 303tracker.guide.info
COPY_FILE Program/303tracker 303tracker
COPY_FILE Program/303tracker.info 303tracker.info
COPY_FILE Program/303tracker.readme 303tracker.readme
COPY_FILE Program/303tracker.readme.info 303tracker.readme.info
COPY_FILE Program/Rexx.info Rexx.info
PROGRESS 90

; Hey, we're finished!!!!
CALL "COMPLETE"

; *********************************************************
; *                      Procedures                       *
; *********************************************************

; The following procedure executes the Install-Abort

PROC_BEG "ABORT"
   MESSAGE "Installation Aborted!"
   REQUEST_NOTIFY "Installation aborted!" "" "Just restart this installation-program" "when you think it's possible again." "Bye"
   STOP_MODULE
   HIDE_PIC 12 120 320 128
   SCRIPT_END
PROC_END

; The following procedure executes a 100% complete installation-end

PROC_BEG "COMPLETE"
   MESSAGE "Installation Completed 100% Ok"
   PROGRESS 100
   REQUEST_NOTIFY "Installation complete!" "" "Everything installed 100% successfull." "You can start 303tracker from Workbench." "Great!"
   REQUEST_NOTIFY "You can find the log-file in your" "303tracker directory. This file contains" "all information of actions that were" "made to install 303tracker." "Exit Installer"
   STOP_MODULE
   LOAD_SAMPLE Install_Files/Complete.raw
   PLAY_SAMPLE 25780 226 63 2
   WAIT 50
   HIDE_PIC 12 120 320 128
   SCRIPT_END
PROC_END