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
 ; -------------------------------------------------