; $VER: ArtStudio_Update 1.005 (18.12.96)
; Script to update ArtStudio V2.1

(complete 0)
(user 1)

;=============================================================================
; English strings

(set default_lang 4)

(set #bad-kick "ArtStudio needs Amiga-OS 2.0 or higher")

(set UpDateArtStudioProg "Updating ArtStudio release 2.0 main program...")
(set UpDateLoader "Checking and updating loaders, if needed...")


;=============================================================================
; German strings

(if   (= @language "deutsch")
(
 (set default_lang 2)

 (set #bad-kick "ArtStudio bentigt mindestens Amiga-OS 2.0 oder hher")

 (set InstallArtStudioProg "Installiere ArtStudio Version 2.0 Hauptprogramm...")
 (set InstallLoader "Prfe und Erneuere die Lademodule, wenn ntig...")

))

(if (> (* 37 65536) (getversion "exec.library" (resident)))
        (abort #bak-kick)
)

(welcome)
(set old_level @user-level)


(set ArtStudioDir "ArtStudio:")

(set target ArtStudioDir)

(set LoaderDir		(tackon ArtStudioDir "Loader"))
(set SaverDir		(tackon ArtStudioDir "Saver"))
(set ViewerDir		(tackon ArtStudioDir "Viewer"))
(set RexxDir		(tackon ArtStudioDir "Rexx"))
(set ToolsDir		(tackon ArtStudioDir "Tools"))

  (complete 15)

; hier ArtStudio patchen
  (run "c/spatch -oram:ArtStudio -pUpdateArtStudioMain/ArtStudio.pch ArtStudioCD:ArtStudio"
     (prompt "ArtStudio updating, please wait...")
     (help "Keine Hilfe verfgbar.")
  )


  (complete 40)

  (run "ArtStudioCD:c/Registration"
     (prompt "ArtStudio registrieren...")
     (help "Keine Hilfe verfgbar.")
  )

  (complete 60)

  (copyfiles
	(prompt "Updating ArtStudio release 2.1 main program...")
	(help @copyfiles-help)
	(source "ram:ArtStudio")
	(dest ArtStudioDir)
	(confirm)
  )

  (complete 65)

  (run "ArtStudioCD:c/delete ram:ArtStudio"
       (prompt "Delete ram:ArtStudio...")
       (help "Keine Hilfe verfgbar.")
  )

  (complete 70)

  (copyfiles
	(prompt "Installing Catalogs files...")
	(help @copyfiles-help)
	(source "UpdateArtStudioLocale/")
	(dest "Sys:Locale/Catalogs/deutsch/")
	(all)
	(confirm)
  )

  (complete 75)

  (copyfiles
	(prompt "Installing loader...")
	(help @copyfiles-help)
	(source "UpdateArtStudioLoader/")
	(dest LoaderDir)
	(all)
	(confirm)
  )

  (complete 80)

  (copyfiles
	(prompt "Installing viewer...")
	(help @copyfiles-help)
	(source "UpdateArtStudioViewer/")
	(dest ViewerDir)
	(all)
	(confirm)
  )

  (complete 85)

  (copyfiles
	(prompt "Installing saver...")
	(help @copyfiles-help)
	(source "UpdateArtStudioSaver/")
	(dest SaverDir)
	(all)
	(confirm)
  )

  (complete 90)

  (copyfiles
	(prompt "Installing rexx...")
	(help @copyfiles-help)
	(source "UpdateArtStudioRexx/")
	(dest RexxDir)
	(all)
	(confirm)
  )

  (complete 95)

  (copyfiles
	(prompt "Installing tools...")
	(help @copyfiles-help)
	(source "UpdateArtStudioTools/")
	(dest ToolsDir)
	(all)
	(confirm)
  )

(complete 100)
