home *** CD-ROM | disk | FTP | other *** search
-
- ; $VER: Install BootX v1.00 (5.7.92)
- ;
- ; Installer script for BootX.
- ;
-
- (set UserLevel.old @user-level)
-
- ; Initialize messages.
-
- (set Language 2)
-
- (set #WrongKickStart "\nYou must be using at least KickStart 2.04 to run this version of BootX.")
- (set #CopyingReqTools "Copying ReqTools.library v38 to Libs:")
- (set #CopyingPowerPacker "Copying PowerPacker.library to Libs:")
- (set #WhichLanguage "\nWhich languages should be installed ?\n")
- (set #WhichLanguageHelp
- (cat "\n"
- "The Amiga can be operated in many different"
- "languages. If you want BootX to use the same"
- "language as the Amiga Workbench then a catalog"
- "file must be copied to your system disk for"
- "each language supported.\n"
- "\n"
- "To reduce the amount of space consumed by the"
- "language files, you can select to have only the"
- "files of specific languages copied.\n"
- "\n"
- "Simply check the boxes of the languages you wish"
- "to have available on your system.\n"
- "\n"
- @askoptions-help
- )
- )
-
- ; Welcome the user.
-
- (complete 0)
- (welcome)
-
- ; Make sure we are running under KickStart 2.04.
-
- (if (< (/ (getversion) 65536) 37)
- (abort #WrongKickStart)
- )
-
- ; Copy the BootX executable and support files.
-
- (set BootX_Dest "Work:Utilities")
-
- (set BootX_Dest
- (askdir
- (prompt "\nSelect the drawer where you want the BootX program "
- "and its support files to reside.\n")
- (help @askdir-help)
- (default BootX_Dest)
- )
- )
-
- (copyfiles
- (prompt "\nSelect which files to install:\n")
- (help @copyfiles-help)
- (dest BootX_Dest)
- (choices "BootX" "BootX.Alarm" "BootX.BBLib" "BootX.Brain"
- "BootX.Guide" "BootX.Recog")
- (infos)
- (confirm)
- )
-
- (complete 70)
-
- ; Copy the BootX.doc and BootX.history files.
-
- (if
- (askbool
- (prompt "\nDo you wish to install the BootX documentation ?")
- (help @askbool_help)
- (default 1)
- )
-
- (
- (set BootX_Doc
- (askdir
- (prompt "\nSelect the drawer where you want the BootX "
- "documentation to reside.\n")
- (help @askdir-help)
- (default BootX_Dest)
- )
- )
-
- (copyfiles
- (prompt "\nSelect which files to install:\n")
- (help @copyfiles-help)
- (dest BootX_Doc)
- (choices "BootX.doc" "BootX.History" "BootX.Recog.History")
- (infos)
- (confirm)
- )
- )
- )
-
- (complete 90)
-
- ; Copy the ReqTools library.
-
- (message
- "\n"
- "The reqtools.library will now be installed.\n"
- "\n"
- "BootX requires this library to run."
- )
-
- (copylib
- (prompt "\n" #CopyingReqTools)
- (help @copylib-help)
- (source "Libs/reqtools.library")
- (dest "Libs:")
- (confirm)
- )
-
- ; Copy the PowerPacker library.
-
- (message
- "\nBootX can load and save its external files using the "
- "PowerPacker.library by Nico François\n"
- )
-
- (copylib
- (prompt "\n" #CopyingPowerPacker)
- (help @copylib-help)
- (source "Libs/powerpacker.library")
- (dest "Libs:")
- (confirm)
- )
-
- (complete 100)
-
- ; Install the language catalogs
-
- (if (exists "SYS:Locale")
- (
- (user 2)
- (set LanguageName
- (askoptions
- (prompt #WhichLanguage)
- (help #WhichLanguageHelp)
- (choices "Deutsch" "English" "Français" "Nederlands")
- (default Language)
- )
- )
- (user UserLevel.old)
-
- (set n 0)
- (while (set LanguageDir (select n "deutsch" "english" "français" "nederlands" ""))
- (
- (if (IN LanguageName n)
- (
- (if (<> 1 n)
- (
- (makedir (cat "SYS:Locale/Catalogs/" LanguageDir))
- (copyfiles
- (source (cat "Locale/Catalogs/" LanguageDir))
- (dest (cat "SYS:Locale/Catalogs/" LanguageDir))
- (all)
- )
- ))
- ))
- (set n (+ n 1))
- ))
- ))
-
- ; Cleanup
-
- (set @default_dest BootX_Dest)
- (exit)
-