[commit] r1979 - cpu/x86/pc/olpc/via

[repository service]

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
+;