Trans: 
	CLR TI		; clear transmission flag for next trans
        clr a
        movc a,@a+dptr	; get character
        jz exitISR	; stop if char = null
        mov SBUF,A  	;

        inc dptr	; point to next char