[openfirmware] [commit] r1979 - cpu/x86/pc/olpc/via
repository service
svn at openfirmware.info
Thu Oct 14 03:25:26 CEST 2010
Author: wmb
Date: Thu Oct 14 03:25:25 2010
New Revision: 1979
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/1979
Log:
OLPC: Added bootmenu.fth
Added:
cpu/x86/pc/olpc/via/bootmenu.fth
Added: cpu/x86/pc/olpc/via/bootmenu.fth
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ cpu/x86/pc/olpc/via/bootmenu.fth Thu Oct 14 03:25:25 2010 (r1979)
@@ -0,0 +1,32 @@
+icon: tux.icon rom:\tux.565
+icon: windows.icon rom:\winlogo.565
+icon: maintenance.icon rom:\settings.565
+
+: boot-linux-item restore-scroller ." Booting Linux" cr " 0 choose-os boot" eval wait-return ;
+: boot-windows-item restore-scroller ." Booting Windows" cr " 1 choose-os boot" eval wait-return ;
+: maintenance-item ['] full-menu nest-menu ;
+
+: boot-menu ( -- )
+ d# 1 to rows
+ d# 2 to cols
+ d# 3 to cols
+\ d# 308 to sq-size
+\ d# 256 to image-size
+\ d# 256 to icon-size
+
+ clear-menu
+
+ " Boot Linux/Sugar"
+ ['] boot-linux-item tux.icon 0 0 selected install-icon
+
+ " Boot Microsoft Windows"
+ ['] boot-windows-item windows.icon 0 1 install-icon
+
+ " Maintenance Functions"
+ ['] maintenance-item maintenance.icon 0 2 install-icon
+;
+
+: bootmenu
+ ['] boot-menu to root-menu
+ menu
+;
More information about the openfirmware
mailing list