serial.asm

serial communication with 89c51

	org 0000h
	sjmp main

	org 0030h
main:	mov tmod,#20h
	mov th1,#0fah
	mov scon,#50h
	setb tr1
again1:	mov dptr,#sdata
;	ACALL    DISP_STRING
	again:	
		clr a
		movc a,@a+dptr
		acall send
		sjmp again
	 send:  mov sbuf,a
	 here:  jnb ti,here
	 	clr ti
		inc dptr

		cjne a,#00h,again
		sjmp again1 
		ret
	DISP_STRING:
        CLR      A                     ;A=0
	MOV      R7,#00H               ;R7=0
NEXT_CHAR:
	INC      R7		       ;R7+1
	MOVC     A,@A+DPTR
	;ACALL    DATA_DISPLAY
	MOV      A,R7
	CJNE     R7,#0EH,NEXT_CHAR
	RET	

		sdata: db "Hello"

	 	end