[OpenBIOS] [commit] r1154 - trunk/openbios-devel/forth/device

[repository service]

Author: mcayland
Date: Sun Jun  9 14:25:39 2013
New Revision: 1154
URL: http://tracker.coreboot.org/trac/openbios/changeset/1154

Log:
display.fs: add implementation of fb8-insert-lines.

Signed-off-by: Mark Cave-Ayland <mark.cave-ayland at ilande.co.uk>

Modified:
   trunk/openbios-devel/forth/device/display.fs

Modified: trunk/openbios-devel/forth/device/display.fs
==============================================================================
--- trunk/openbios-devel/forth/device/display.fs	Sun Jun  9 14:25:36 2013	(r1153)
+++ trunk/openbios-devel/forth/device/display.fs	Sun Jun  9 14:25:39 2013	(r1154)
@@ -259,6 +259,14 @@
   ;
 
 : fb8-insert-lines ( n -- )
+  \ numcopy = ( #lines - n )
+  #lines over - char-height *
+  over line# char-height *
+  swap char-height * over +
+  fb8-copy-lines
+
+  char-height * line# char-height *
+  fb8-clear-lines
   ;
   
 : fb8-delete-lines ( n -- )