
     	     push	 acc
	     jb		 acc.7, minus
	     mov	 a,#'+'
	     jnb	 ti,$
	     clr	 ti
	     mov       	 sbuf,a
	     sjmp	 number:
minus:	     mov	 a,#'-'
	     mov	 sbuf,a
	     jnb	 ti,$
	     clr	 ti
number:	     pop	 acc
	     mov	 b,#100
	     div	 ab
	     add	 a,#'0'
	     jnb	 ti,$
	     clr	 ti
	     mov	 sbuf,a
	     mov	 a,b
	     mov	 b,#10
	     div	 ab
	     add	 a,#'0'
	     jnb	 ti,$
	     clr	 ti
	     mov	 sbuf,a
	     mov	 a,b
	     add	 a,#'0'
	     jnb	 ti,$
	     clr	 ti
	     mov	 sbuf,a
	     ret
