
;
OUTSTRING:
	POP	DPH			; 
	POP	DPL			; 
	ACALL	OUTCHAR			; Call the output loop
	JMP	@A+DPTR			; Jump to the address after the string
OUTCHAR:	
        CLR A			        ; 
	MOVC	A,@A+DPTR		; Get the next character
	INC	DPTR			; bump the pointer
	JZ	ENDSTR			; zero defines end of string
	LCALL	TXCHR	                ; else ship it, using TXCHR then  
                                        ;  -- TXCHR is the character transmitter routine
	SJMP	OUTCHAR			; do it again until told otherwise
;
ENDSTR:	RET				; Return to caller
;
