home *** CD-ROM | disk | FTP | other *** search
- Set Boot$Dir <Obey$Dir>
-
- rmensure utilitymodule 3.00 echo "Risc OS 3 is needed to to run the boot sequence"
- rmensure utilitymodule 3.00 obey
-
- if wimp$state="desktop" then wimptask "<Boot$dir>.utils.!bootconf"
- if wimp$state="desktop" then obey
-
- Set Boot$path <Boot$Path>,<Boot$dir>.
- Set Boot$Unique Local
-
-
- If "<Run$Path>" = ",%." then Set Run$Path ,%.,<Boot$Dir>.Library.
-
- | SetChoices
- Set Choices$Dir <Boot$Dir>.Choices
- Set Choices$Path <Choices$Dir>.,<Choices$Path>
- Set Choices$Write <Choices$Dir>
- Set BootResources$Dir <Boot$Dir>.Resources
- Set BootResources$Path <BootResources$Dir>.
- Set Boot$ToBeLoaded <Choices$Write>.Boot.PreDesk
- Set Boot$ToBeTasks <Choices$Write>.Boot.Tasks
-
- | BootRun
- /Choices:Boot.PreDesktop
- repeat rmload <boot$ToBeLoaded> -type module
- repeat run <boot$ToBeLoaded> -applications
- repeat run <boot$ToBeLoaded> -type obey
-
- /choices:Boot.desktop