From 4caee1ec599c6d78f5234b218e2ccf5e23eb4bf0 Mon Sep 17 00:00:00 2001
From: Leo C
Date: Sun, 27 Jul 2014 22:55:50 +0200
Subject: Disable msg- i/o-fifos for test with avr

---
 z180/ser1-i.180 | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'z180/ser1-i.180')

diff --git a/z180/ser1-i.180 b/z180/ser1-i.180
index 322ec40..4074a9d 100644
--- a/z180/ser1-i.180
+++ b/z180/ser1-i.180
@@ -103,16 +103,17 @@ bg.w1:
 	cp	(hl)			; 6	while (out_idx==in_idx) 
 	jr	z,bg.wait		; 6 (/8)	;
 
-	inc	a			; 4
 	ld	e,a			; 4	
-	inc	e			; 4
 	ld	d,0			; 6
+	inc	de
+	inc	de
 
 	ex	de,hl			; 3
 	add	hl,de			;10
 	ld	l,(hl)			; 6
 	ex	de,hl			; 3	
-	
+
+	inc	a			; 4
 	dec	hl			; 4
 	and	(hl)			; 6	
 	inc	hl			; 4
@@ -150,7 +151,7 @@ buf.put:
 	ld	c,(ix+o.in_idx)		;
 	ld	b,0
 	add	hl,bc
-	ld	b,a
+	ld	(hl),a
 
 	ld	a,c			;
 	inc	a
@@ -158,7 +159,6 @@ buf.put:
 bp.wait:
 	cp	(ix+o.out_idx)		;
 	jr	z,bp.wait
-	ld	(hl),b
 	ld	(ix+o.in_idx),a
 
 	di			;036f
-- 
cgit v1.2.3