home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1998 #5
/
AmigaPlus_CD-ROM_Nr.5-98.iso
/
demo-versionen
/
artstudiopro
/
install_artstudio
< prev
next >
Wrap
Text File
|
1997-10-30
|
13KB
|
670 lines
; $VER: ArtStudio_Install 2.009 (28.05.96)
; Script to install ArtStudio Version 2.0
(complete 0)
(user 1)
;=============================================================================
; English strings
(set default_lang 4)
(set #bad-kick "ArtStudio needs Amiga-OS 3.0 or higher")
(set SelectDir1Msg
(cat "Please select a directory\nto install ArtStudio in"
)
)
(Set ProgMsg
(cat "Which parts should i install?"
)
)
(set Choice1Msg "ArtStudio Mainprogram (2MB)")
(set Choice2Msg "ArtStudio Instruction (2MB)")
(set Choice3Msg "ArtStudio Tools (2.6KB)")
(set Choice4Msg "ArtStudio Web Graphics (ca. 1.2MB)")
(set Choice5Msg "ArtStudio preferences (ca. 35KB")
(set FPU1Msg "None")
(set FPU2Msg "Yes, this machine is with FPU")
(set CPU1Msg "MC68000")
(set CPU2Msg "MC68030")
(set CPU3Msg "MC68040")
(set CPU4Msg "MC68060")
(set CPU5Msg "PPC603/604")
(set CPUMsg "What CPU does the machine have that you are installing ArtStudio Pro?")
(set UpDateasyn "Checking and updating asyncio.library, if needed...")
(set UpDatempeg "Checking and updating cgxmpeg.library, if needed...")
(set UpDategarb "Checking and updating garbagecollector.library, if needed...")
(set UpDategraf "Checking and updating graffiti.library, if needed...")
(set InstallArtStudioProg "Installing ArtStudio professional main program...")
(set InstallLoader "Installing loader...")
(set InstallSaver "Installing saver...")
(set InstallOperator "Installing Operator files...")
(set InstallViewer "Installing viewers...")
(set InstallARexx "Installing ARexx files...")
(set InstallGuide "Installing Guide-File...")
(set InstallCatalog "Installing Catalogs files...")
(set InstallTools "Installing Tools...")
(set AssignAdd1
(cat "\nAdding the ArtStudio assignment to s:user-startup - it currently looks like this:\n\n%s\n\n"
(cat "assign ArtStudio: " ArtStudioDir)
)
)
;=============================================================================
; German strings
(if (= @language "deutsch")
(
(set default_lang 2)
(set #bad-kick "ArtStudio benötigt mindestens Amiga-OS 3.0 oder höher")
(set SelectDir1Msg
(cat "Wählen Sie ein Verzeichnis, wo Sie ArtStudio "
"installieren möchten. Ein Verzeichnis mit den "
"Namen ArtStudio wird automatisch angelegt!"
)
)
(Set ProgMsg
(cat "\nWelche Dateien sollen installiert werden?\n"
)
)
(set Choice1Msg "ArtStudio Hauptprogramm (ca. 2MB)")
(set Choice2Msg "ArtStudio Anleitung (ca. 2MB)")
(set Choice3Msg "ArtStudio Tools (ca. 2.6MB)")
(set Choice4Msg "ArtStudio Web Grafiken (ca. 1.2MB)")
(set Choice5Msg "ArtStudio Einstellungen (ca. 35KB")
(set FPU1Msg "Keine vorhanden")
(set FPU2Msg "ja, FPU vorhanden")
(set CPU1Msg "MC68000")
(set CPU2Msg "MC68030")
(set CPU3Msg "MC68040")
(set CPU4Msg "MC68060")
(set CPU5Msg "PPC603/604")
(set CPUMsg "Welchen Prozessor besitzt der Computer, auf dem Sie ArtStudioPro installieren möchten?")
(set UpDateasyn "Prüfe und Erneuere die asyncio.library, wenn nötig...")
(set UpDatempeg "Prüfe und Erneuere die cgxmpeg.library, wenn nötig...")
(set UpDategarb "Prüfe und Erneuere die garbagecollector.library, wenn nötig...")
(set UpDategraf "Prüfe und Erneuere die graffiti.library, wenn nötig...")
(set InstallArtStudioProg "Installiere ArtStudio Version 2.0 Hauptprogramm...")
(set InstallLoader "Installiere Lademodule...")
(set InstallSaver "Installiere Speichermodule...")
(set InstallOperator "Installiere Bildbearbeitungsmodule...")
(set InstallViewer "Installiere Anzeigemodule...")
(set InstallARexx "Installiere ARexx Programme...")
(set InstallGuide "Installiere Guide-Datei...")
(set InstallCatalog "Installiere Sprachkataloge...")
(set InstallTools "Installiere Werkzeuge...")
(set AssignAdd1
(cat "\nFüge ArtStudio Zuweisung an s:user-startup - Es würde wie folgt Aussehen:\n\n%s\n\n"
(cat "assign ArtStudio: " ArtStudioDir)
)
)
)
)
(if (> (* 39 65536) (getversion "exec.library" (resident)))
(abort #bak-kick)
)
(welcome)
(set old_level @user-level)
(user 2)
(if ( < (exists "ArtStudio:" (noreq)) 2)
(
(set target (askdir
(prompt SelectDir1Msg)
(help #which-dir-help)
(default "SYS:")
))
(set ArtStudioDir (tackon target "ArtStudio"))
)
)
(if (exists "ArtStudio:" (noreq))
(
(set target "ArtStudio:")
(set ArtStudioDir "ArtStudio:")
)
)
(user old_level)
(set WAS
(askoptions
(prompt ProgMsg)
(help @askchoice-help)
(choices Choice1Msg Choice2Msg Choice3Msg Choice4Msg Choice5Msg)
(default 31)
)
)
(set MainDirPPC (tackon ArtStudioDir "MainPPC"))
(set LoaderDir (tackon ArtStudioDir "Loader"))
(set LoaderDirPPC (tackon ArtStudioDir "LoaderPPC"))
(set OperatorDir (tackon ArtStudioDir "Operator"))
(set OperatorDirPPC (tackon ArtStudioDir "OperatorPPC"))
(set ViewerDir (tackon ArtStudioDir "Viewer"))
(set SaverDir (tackon ArtStudioDir "Saver"))
(set RexxDir (tackon ArtStudioDir "Rexx"))
(set ToolsDir (tackon ArtStudioDir "Tools"))
(set DocDir (tackon ArtStudioDir "Docs"))
(If (IN WAS 0)
(
(set CPU
(askchoice
(prompt CPUMsg)
(help @askchoice-help)
(choices CPU1Msg CPU2Msg CPU3Msg CPU4Msg CPU5Msg)
(default 1)
)
)
(set FPU
(askchoice
(prompt FPUMsg)
(help @askchoice-help)
(choices FPU1Msg FPU2Msg)
(default 1)
)
)
(if ( < (exists ArtStudioDir (noreq) ) 2)
(makedir ArtStudioDir
(prompt "Creating ArtStudio directory...")
(help @makedir-help)
(infos)
)
)
(complete 10)
(if ( < (exists LoaderDir (noreq) ) 2)
(makedir LoaderDir
(prompt "Creating Loader directory...")
; (help @makedir-help)
)
)
(complete 11)
(if ( < (exists ViewerDir (noreq) ) 2)
(makedir ViewerDir
(prompt "Creating Viewer directory...")
; (help @makedir-help)
)
)
(complete 12)
(if ( < (exists RexxDir (noreq) ) 2)
(makedir RexxDir
(prompt "Creating Rexx directory...")
; (help @makedir-help)
)
)
(complete 13)
(if ( < (exists SaverDir (noreq) ) 2)
(makedir SaverDir
(prompt "Creating Saver directory...")
; (help @makedir-help)
)
)
(complete 15)
(if ( < (exists ToolsDir (noreq) ) 2)
(makedir ToolsDir
(prompt "Creating Tools directory...")
; (help @makedir-help)
)
)
(complete 16)
(if ( < (exists OperatorDir (noreq) ) 2)
(makedir OperatorDir
(prompt "Creating Operator directory...")
; (help @makedir-help)
)
)
(complete 20)
(copyfiles
(prompt "Copy ArtStudioPro...")
(help @copyfiles-help)
(source "ArtStudioPro")
(dest "ram:")
(confirm)
)
(complete 25)
(run "c/Registration"
(prompt "ArtStudio registration...")
(help "Keine Hilfe verfügbar.")
)
(complete 30)
(copyfiles
(prompt "Installing ArtStudio professional main program...")
(help @copyfiles-help)
(source "ram:ArtStudioPro")
(dest ArtStudioDir)
(confirm)
)
(complete 35)
(run "c/delete ram:ArtStudioPro"
(prompt "Delete ram:ArtStudioPro...")
(help "Keine Hilfe verfügbar.")
)
(complete 37)
(copyfiles
(prompt "Installing ArtStudio Icon...")
(help @copyfiles-help)
(source "ArtStudioPro.info")
(dest ArtStudioDir)
(confirm)
)
(complete 38)
(If (= CPU 0)
(
(copyfiles
(prompt "Installing Operator files...")
(help @copyfiles-help)
(source "Operator68k/")
(dest OperatorDir)
(all)
(confirm)
)
(copyfiles
(prompt "Installing loader...")
(help @copyfiles-help)
(source "Loader68000/")
(dest LoaderDir)
(all)
(confirm)
)
)
)
(If (= CPU 1)
(
(copyfiles
(prompt "Installing Operator files...")
(help @copyfiles-help)
(source "Operator68k/")
(dest OperatorDir)
(all)
(confirm)
)
(copyfiles
(prompt "Installing loader...")
(help @copyfiles-help)
(source "Loader68030/")
(dest LoaderDir)
(all)
(confirm)
)
)
)
(If (= CPU 2)
(
(copyfiles
(prompt "Installing Operator files...")
(help @copyfiles-help)
(source "Operator68k/")
(dest OperatorDir)
(all)
(confirm)
)
(copyfiles
(prompt "Installing loader...")
(help @copyfiles-help)
(source "Loader68040/")
(dest LoaderDir)
(all)
(confirm)
)
)
)
(If (= CPU 3)
(
(copyfiles
(prompt "Installing Operator files...")
(help @copyfiles-help)
(source "Operator68k/")
(dest OperatorDir)
(all)
(confirm)
)
(copyfiles
(prompt "Installing loader...")
(help @copyfiles-help)
(source "Loader68060/")
(dest LoaderDir)
(all)
(confirm)
)
)
)
(If (= CPU 4)
(
(complete 40)
(if ( < (exists OperatorDirPPC (noreq) ) 2)
(makedir OperatorDirPPC
(prompt "Creating OperatorPPC directory...")
; (help @makedir-help)
)
)
(complete 41)
(if ( < (exists LoaderDirPPC (noreq) ) 2)
(makedir LoaderDirPPC
(prompt "Creating LoaderPPC directory...")
; (help @makedir-help)
)
)
(complete 42)
(if ( < (exists MainDirPPC (noreq) ) 2)
(makedir MainDirPPC
(prompt "Creating MainPPC directory...")
; (help @makedir-help)
)
)
(copyfiles
(prompt "Installing loader...")
(help @copyfiles-help)
(source "Loader604/")
(dest LoaderDir)
(all)
(confirm)
)
(copyfiles
(prompt "Installing loaderppc...")
(help @copyfiles-help)
(source "LoaderPPC/")
(dest LoaderDirPPC)
(all)
(confirm)
)
(copyfiles
(prompt "Installing Operator files...")
(help @copyfiles-help)
(source "Operator604/")
(dest OperatorDir)
(all)
(confirm)
)
(copyfiles
(prompt "Installing operatorppc...")
(help @copyfiles-help)
(source "OperatorPPC/")
(dest OperatorDirPPC)
(all)
(confirm)
)
(copyfiles
(prompt "Installing mainppc...")
(help @copyfiles-help)
(source "MainPPC/")
(dest MainDirPPC)
(all)
(confirm)
)
)
)
(complete 43)
(copyfiles
(prompt "Installing saver...")
(help @copyfiles-help)
(source "Saver/")
(dest SaverDir)
(all)
(confirm)
)
(IF (= FPU 1)
(
(complete 45)
(copyfiles
(prompt "Installing OperatorFPU files...")
(help @copyfiles-help)
(source "OperatorFPU/")
(dest OperatorDir)
(all)
(confirm)
)
)
)
(complete 50)
(copyfiles
(prompt "Installing viewers...")
(help @copyfiles-help)
(source "Viewer/")
(dest ViewerDir)
(all)
(confirm)
)
(complete 55)
(copyfiles
(prompt "Installing ARexx files...")
(help @copyfiles-help)
(source "Rexx/")
(dest RexxDir)
(all)
(confirm)
)
(complete 60)
(copyfiles
(prompt "Installing DataTypes-Classes files...")
(help @copyfiles-help)
(source "Classes/")
(dest "Sys:Classes/")
(all)
(confirm)
)
(complete 62)
(copyfiles
(prompt "Installing DataTypes-Devs files...")
(help @copyfiles-help)
(source "Devs/")
(dest "Sys:Devs/")
(all)
(confirm)
)
(complete 65)
(copyfiles
(prompt "Installing Catalogs files...")
(help @copyfiles-help)
(source "Catalogs/")
(dest "Sys:Locale/Catalogs/")
(all)
(confirm)
)
(complete 68)
(startup "ArtStudio"
(prompt ("\nAdding the ArtStudio assignment to s:user-startup - it currently looks like this:\n\n%s\n\n" (cat "assign ArtStudio: " ArtStudioDir) ) )
(help @startup-help)
(command (cat "assign ArtStudio: " ArtStudioDir))
)
)
)
(complete 70)
(If (IN WAS 1)
(
(copyfiles
(prompt "Installing Tools...")
(help @copyfiles-help)
(source "Tools/")
(dest ToolsDir)
(all)
(infos)
(confirm)
)
)
)
(If (IN WAS 2)
(
(complete 75)
(if (= default_lang 4)
(
(copyfiles
(prompt "Copying instruction...")
(help @copyfiles-help)
(source "Docs/Instruction/")
(dest DocDir)
(infos)
(all)
(confirm)
)
))
(if (= default_lang 2)
(
(copyfiles
(prompt "Kopiere Anleitung...")
(help @copyfiles-help)
(source "Docs/Anleitung/" )
(dest DocDir)
(infos)
(all)
(confirm)
)
)
)
)
)
(If (IN WAS 5)
(
(complete 88)
(copyfiles
(prompt ArtStudioPrefs)
(help @copyfiles-help)
(source "s/")
(dest "s:")
(all)
(confirm)
)
)
)
(complete 90)
(copylib
(prompt UpDateasyn)
(help @copylib-help)
(source "libs/asyncio.library")
(dest "libs:")
(confirm)
)
(complete 93)
(copylib
(prompt UpDatempeg)
(help @copylib-help)
(source "libs/cgxmpeg.library")
(dest "libs:")
(confirm)
)
(complete 96)
(copylib
(prompt UpDategarb)
(help @copylib-help)
(source "libs/garbagecollector.library")
(dest "libs:")
(confirm)
)
(complete 98)
(copylib
(prompt UpDategraf)
(help @copylib-help)
(source "libs/graffiti.library")
(dest "libs:")
(confirm)
)
(run "c/assign ArtStudio: " ArtStudioDir
(prompt "Assign ArtStudio...")
(help "Keine Hilfe verfügbar.")
)
(complete 100)