; Upgrade script for BootScreen
; Copyright 1994 by Joseph Luk, all rights reserved.
; $VER: BootScreen 2.2, BootScreenClose 2.00, BootScreen Prefs 2.1

(set #PRGVersion 
   ("2.2")
)


(welcome 
   ("This procedure is for users of older BootScreen versions.  It will automatically remove old files and prepare you for BootScreen ")
   (#PRGVersion)
   ("!\n\nThe recommended user level is \"Intermediate\".")
)

(set @default-dest "SYS:")

(set #choice
   (askchoice
      (prompt "Please select which version you are upgrading from:")
      (help @askchoice-help)
      (choices
         ("BootScreen 2.1    (11-Feb-94) ")
         ("BootScreen 2.00   (04-Feb-94) ")
         ("BootScreen 1.x (1.00, 1.01) ")
         ("BootScreen37 1.x");
      )
   )
)

(select #choice
   (
      (copyfiles
         (prompt "Upgrading BootScreen program")
         (help @copyfiles-help)
         (source "bin/c/BootScreen")
         (dest "C:")
      )
      (message
         "All done!\n\n"
         "BootScreen "
         #PRGVersion
         " has now been installed.  You do not need to run the Install script.\n\n"
         "Documentation on changes can be found in the \"Release History\" section of the BootScreen.readme file."
      )
      (exit)
   )
      
      
   (
      (copyfiles
         (prompt "Upgrading BootScreen Preferences")
         (help @copyfiles-help)
         (source "bin/Prefs/BootScreen")
         (dest "SYS:Prefs")
      )
      (copyfiles
         (prompt "Upgrading BootScreen program")
         (help @copyfiles-help)
         (source "bin/c/BootScreen")
         (dest "C:")
      )
      (message
         "All done!\n\n"
         "BootScreen "
         #PRGVersion
         " has now been installed.  You do not need to run the Install script.\n\n"
         "Documentation on changes can be found in the \"Release History\" section of the BootScreen.readme file."
      )
      (exit)
   )
   
   
   (
      (delete "C:BootScreen")
      (run "bin/c/Update1.x")
   )
   
   
   (
      (delete "C:BootScreen37")
      (run "bin/c/Update37")
   )
)


; that's it!

(set @default-dest "SYS:")

(message
   "All done!\n\n"
   "You are now ready to run the main installation procedure.  If you have documentation on your hard disk, make sure to update it too."
)

(exit)