 
MOV R0,#0FFH ;Counter
mov 40h,#'R'
mov 41h,#0DH
mov 42h,#0AH
mov r0,#40h
mov sbuf,@r0
LOOP:SJMP LOOP
;-----------------END OF MAIN------------------------
ORG 200H
SERIAL: JB TI,CLEAR
CLEAR: CLR TI
inc r0
cjne r0,#43h,next
sjmp out
next:mov sbuf,@r0
out:RETI
END
