;-----------------------------------------------------------------------------
;
;	print hex in A
;
;-----------------------------------------------------------------------------
phex:
	push	acc
	swap	a
	acall	l_hex
	pop	acc
l_hex:
	anl	a,#0fh
	add	a,#30h
	cjne	a,#3Ah,lh_1
lh_1:
<b>
	jc	lh_2	;if a message in rom terminated by 00h
</b>