MOV A,@R0 ; get byte from buffer
MOV ACC.7,P ; parity
MOV SBUF,A
INC R0