ORG 0023H RET JBC RI,UARTI1 RETI UARTI1: PUSH ACC PUSH PSW PUSH DPL PUSH DPH PUSH 0 SETB SE1
MOV A,SBU MOV DPL,BP MOV DPH,BPH
CJNE A,#0CH,UAR1 MOV TXBZ1,#01H LJMP UARTI5
UAR1: PUSH ACC MOV A,TXBZ1 CJNE A,#0,UAR101 POP ACC LJMP UARTI5
UAR101: CJNE A,#01,UAR111 POP ACC CJNE A,#41H,UAR108 MOV DPTR,#9200H MOV TXBZ1,#0FFH LJMP UARTI5 UAR108: CJNE A,#42H,UAR109 MOV DPTR,#0FF00H MOV TXBZ1,#0FFH LJMP UARTI5 UAR109: MOV TXBZ1,#0 LJMP UARTI5
UAR111: POP ACC UAR112: MOVX @DPTR,A
CJNE A,#0DH,UARTI49 MOV A,#0FFH MOVX @DPTR,A INC DPTR MOVX @DPTR,A INC DPTR MOVX @DPTR,A INC DPTR MOVX @DPTR,A INC DPTR MOV TXBZ1,#0 MOV BZ,DPH ; MOV JRFS,#1 ; MOV LKFS,#1 ; MOV SD,#1 ; MOV TLSJ,#1 LJMP UARTI5 UARTI49:INC DPTR UARTI5: MOV BP,DPL MOV A,DPH CJNE A,#0FFH,UAR9 UAR9: JC UAR91 MOV A,#0FFH UAR91: MOV BPH,A
POP 0 POP DPH POP DPL POP PSW POP ACC RET |