home *** CD-ROM | disk | FTP | other *** search
- ; 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)