From 64c6a3004df096562063adca4bd71e2905922092 Mon Sep 17 00:00:00 2001
From: Jens Ahrensfeld <jens@jayfield.org>
Date: Sun, 4 Apr 2021 09:01:49 +0000
Subject: [PATCH] - added uart_puts

git-svn-id: http://moon:8086/svn/vhdl/trunk@1633 cc03376c-175c-47c8-b038-4cd826a8556b
---
 lib/CPUs/JCpu/tools/lib/uart.inc.jsm | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/lib/CPUs/JCpu/tools/lib/uart.inc.jsm b/lib/CPUs/JCpu/tools/lib/uart.inc.jsm
index 57110e5..f42a3c8 100644
--- a/lib/CPUs/JCpu/tools/lib/uart.inc.jsm
+++ b/lib/CPUs/JCpu/tools/lib/uart.inc.jsm
@@ -9,6 +9,27 @@ UART_TX_FULL	equ		0x02
 UART_TX_CMPL	equ		0x04
 UART_RX_PRESENT	equ		0x10
 
+; -------------------------------------------------
+; uart_puts
+; -------------------------------------------------
+; R1 : ptr to string
+uart_puts:		push	R0
+u_p_lp:			movx	R0, (R1)
+				inc		R1
+				tst		R0
+				jz		ex_ugp
+				call	uart_putchar
+				jmp		u_p_lp
+ex_ugp:			pop		R0
+				ret				
+
+
+; -------------------------------------------------
+; uart_putchar
+; -------------------------------------------------
+; R0 = input
+uart_putchar:	jmp sout
+
 ; -------------------------------------------------
 ; sout
 ; -------------------------------------------------