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