[openfirmware] [commit] r2200 - ofw/termemu

[repository service]

Author: wmb
Date: Wed May 18 03:48:02 2011
New Revision: 2200
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2200

Log:
Added 565>rgb function.

Modified:
   ofw/termemu/fb8.fth

Modified: ofw/termemu/fb8.fth
==============================================================================
--- ofw/termemu/fb8.fth	Sat May 14 02:49:07 2011	(r2199)
+++ ofw/termemu/fb8.fth	Wed May 18 03:48:02 2011	(r2200)
@@ -78,6 +78,11 @@
    swap 2 rshift  5 lshift or
    swap 3 rshift  d# 11 lshift or
 ;
+: 565>rgb  ( w -- r g b )
+   dup d# 8 rshift 7 or
+   over 3 rshift h# fc and 3 or
+   rot 3 lshift h# f8 and  7 or
+;
 
 create colors-8bpp
    0 , 1 , 2 , 3 , 4 , 5 , 6 , 7 , 8 , 9 , a , b , c , d , e , f ,