home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dream 41
/
Amiga_Dream_41.iso
/
Amiga
/
Programmation
/
gui
/
guicreator20.lha
/
GUICreator2.0
/
Install
< prev
next >
Wrap
Text File
|
1996-06-12
|
5KB
|
177 lines
; *** GUICreator installation scipt ***
; *** Set some useful messages ***
(set #install-msg (cat "\n\nGUICreator installation script.\n"
"This script installs GUICreator on your Amiga.\n\n"
"Read the documentation for\n"
"more information on the distribution\n"
"and commercial usage of GUICreator.\n\n"
"GUICreator ⌐ 1995/96 Markus Hillenbrand\n"
"All rights reserved."))
(set #welcome-msg "Welcome to the GUICreator installation!")
(set #bad-kick "You must be using Kickstart 3.0 to use this program!")
(set #bad-installer "You must be using Installer 43.x to install GUICreator!")
(set #ask-program-dir "Where shall I install the program ?\n(A drawer will NOT be created)")
(set #ask-doc-dir "Where shall I install the docs ?")
(set #comp "Which C compiler(s) do you use ?")
(set #comp-help "\nIf you choose a compiler, I will update some includes for use with textfield gadget\n\n")
(set #copyfiles "Copying files to harddisk ...")
(set #dice-msg "\nAttention DICE users:\n\nYou will have to install textfield-gadget yourself!")
(set #install-textfield "Installing Textfield.Gadget to your system")
; *** Welcome the user to the installation
(message #install-msg)
; *** Check for Kickstart version ***
(if (< (/ (getversion) 65536) 39)
(
(abort #bad-kick)
)
)
; *** Check for Installer-Version ***
(if (< (/ @installer-version 65536) 43)
(
(abort #bad-installer)
)
)
; *** Ask the user for the default-destinations ***
(set #prog-dest (askdir (prompt #ask-program-dir)
(help @askdir-help)
(default "Work:")
(disk)
)
)
(set #doc-dest (askdir (prompt #ask-doc-dir)
(help @askdir-help)
(default #prog-dest)
)
)
(set #compilers (askoptions (prompt #comp)
(help #comp-help @askoptions-help)
(choices "Maxon C/C++ 3.x" "GNU C" "DICE C" "StormC")
(default 0)
)
)
(set #copy-tutor (askbool (prompt "Do you want to install the tutorial C sources ?")
(help @askbool-help)
(default 1)
)
)
; *** Install the textfield gadget ***
(copylib (prompt #install-textfield)
(help @copylib-help)
(source "textfield.gadget")
(dest "SYS:Classes/Gadgets")
(confirm)
)
; *** Copy the program ***
(copyfiles (prompt #copyfiles)
(source "")
(dest #prog-dest)
(choices "GUICreatorWB" "GUICreatorWB.info" "GUICreatorPrefs" "GUICreatorPrefs.info" ".prefs" ".windowpos" "About.IFF" "c" "Data" "Data.info")
)
; *** Copy the docs ***
(copyfiles (prompt #copyfiles)
(source "")
(dest #doc-dest)
(choices "GUICreatorWB.guide" "GUICreatorWB.guide.info" "DOC")
)
; *** Copy the tutorial sources
(if (= #copy-tutor 1)
(
(copyfiles (prompt #copyfiles)
(source "")
(dest #prog-dest)
(choices "Demos" "Demos.info")
)
)
)
; *** Update the Maxon C++ compiler ***
(if (IN #compilers 0)
(
(copyfiles (prompt @copyfiles-help)
(source "Compilers/Maxon")
(dest "MCPP:")
(choices "lib")
)
(copyfiles (prompt @copyfiles-help)
(source "Compilers/Maxon")
(dest "MCPP:")
(choices "include")
)
)
)
; *** Update the GNU compiler ***
(if (IN #compilers 1)
(
(copyfiles (prompt @copyfiles-help)
(source "Compilers/GNU")
(dest "GNU:")
(choices "os-include")
)
)
)
; *** Update DICE compiler ***
(if (IN #compilers 2)
(
(message #dice-msg)
)
)
; *** Update STORM compiler ***
(if (IN #compilers 3)
(
(copyfiles (prompt @copyfiles-help)
(source "Compilers/Storm")
(dest "STORMC:Include")
(choices "clib" "pragma" "pragmas" "gadgets" "proto")
)
)
)
; *** Keyfile installlieren ***
(if (exists "GUICreator_InstallDisk:Keyfiles/.keyfile" (NOREQ) )
(
(copyfiles (prompt @copyfiles-help)
(source "GUICreator_InstallDisk:Keyfiles")
(dest #prog-dest)
(choices ".keyfile")
)
)
)