;接收程序奇偶判斷有誤
ORG 0000H
AJMP MAIN
ORG 0030H
MAIN:MOV SP,#5FH
     MOV SCON,#90H   ;設定串行口為工作方式2，并允許接收
     MOV PCON,#00H   ;波特率為fosc/64
     MOV R0,#30H     ;設置接收數據指針
     MOV R3,#10H     ;設置存放的數據塊長度
LOOP:JBC RI,JSH      ;判斷一幀數據是否接收完成
     AJMP LOOP
JSH: MOV A,SBUF      ;將接收數據送A中
     JB PSW.0,OTH    ;判斷接收到的數據的奇偶性
     JB RB8,ERR      ;如果與發送的奇偶性不同，轉錯誤處理
     AJMP RTH        ;轉正確處理
OTH: ;JNB RB8,ERR
RTH: MOV @R0,A       ;接收數據送內部RAM
     INC R0
     DJNZ R3,LOOP    ;判斷16個數是否接受完成
JS1: MOV R0,#30H     ;顯示接受到的數據
JS3: MOV A,@R0
     MOV P0,A
     ACALL DELAY
     INC R0
     MOV A,R0
     CJNE A,#40H,JS2
     AJMP JS1
JS2: AJMP JS3
DELAY: MOV  R4,#04H
   D1: MOV  R7,#0FFH
   D2: MOV  R6,#0FFH
       DJNZ R6,$
       DJNZ R7,D2
       DJNZ R4,D1
       RET
ERR: END