Prhex	mov	b,a
	anl	a,#$0f
	add	a,#'0'
	cjm	a,#'9'+1,lb1
	add	a,#'a'-'0'
lb1:	movl	tens,a
	mov	a,b
	swap	a
	anl	a,#$0f
	add	a,#'0'
	cjm	a,#'9'+1,lb2
	add	a,#'a'-'0'
lb2:	mov	units,a
	ret