;  2SIO echo routine at 012h (Clone port 2)

	org	0
	mvi	a,03h	;reset UART
	out	12h
	mvi	a,15h	;no RI, no XI, RTS Low, 8n1, /16
	out	12h

wtRcv	in	12h	;character received?
	rrc		;receive flag in lsb
	jnc	wtRcv
	in	13h	;read the character
	out	13h	;echo it back out
	jmp	wtRcv
	end

