From: Alan Cox <alan@linux.intel.com>
Date: Thu, 12 Feb 2015 01:51:56 +0000 (+0000)
Subject: zx128: video routine updates for banked mode
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=20ca2934358b53d56d2ad212d31c65126b06ed46;p=FUZIX.git

zx128: video routine updates for banked mode
---

diff --git a/Kernel/platform-zx128/zxvideo.s b/Kernel/platform-zx128/zxvideo.s
index 7b86416b..6baaf9ff 100644
--- a/Kernel/platform-zx128/zxvideo.s
+++ b/Kernel/platform-zx128/zxvideo.s
@@ -1,8 +1,5 @@
 ;
 ;        zx128 vt primitives
-;
-;	FIXME: adjust for correct stack offsets in banked mode (only
-;	plot_char done so far)
 ;
 
         .module zx128
@@ -76,10 +73,12 @@ plot_char_loop:
 
 
 _clear_lines:
+	pop bc
         pop hl
         pop de              ; E = line, D = count
         push de
         push hl
+	push bc
 
 clear_next_line:
         push de
@@ -102,12 +101,14 @@ clear_next_line:
 
 
 _clear_across:
+	pop iy
         pop hl
         pop de              ; DE = coords 
         pop bc              ; C = count
         push bc
         push de
         push hl
+	push iy
         call videopos       ; first pixel line of first character in DE
         push de
         pop hl              ; copy to hl
@@ -225,10 +226,12 @@ loop_scroll_up:
         ret
 
 _cursor_on:
+	pop bc
         pop hl
         pop de
         push de
         push hl
+	push bc
         ld (cursorpos), de
 
         call videopos