ORG 0000H
JMP START
ORG 0BH
JMP TIM0
ORG 23H
JMP USART0
///////////////////////////////
START: MOV TMOD,#21H
MOV TH1,#0FDH
MOV TL1,#0FDH
MOV TH0,#(65536-50000)/256
MOV TL0,#(65536-50000)MOD 256
MOV SCON,#50H
MOV IE,#92H
MOV IP,#10H
SETB TR1
SETB TR0
MOV R1,#30H
MOV R3,#30H
MOV R2,#10
JMP $
////////////////////////////////////
TIM0:
MOV TH0,#(65536-50000)/256
MOV TL0,#(65536-50000)MOD 256
DJNZ R2,EXTI
MOV R2,#10
MOV A,R3
CJNE A,#30H,S3
MOV A,R1
CJNE A,#3AH,S1
MOV A,#30H
MOV R1,A
S1: MOV SBUF,A
JNB TI,$
CLR TI
MOV SBUF,#20H
JNB TI,$
CLR TI
INC R1
JMP EXTI
////////////////////////////////////////
S3: CJNE A,#31H,S5
MOV A,R1
CJNE A,#5BH,S4
MOV A,#41H
MOV R1,A
S4: MOV SBUF,A
JNB TI,$
CLR TI
MOV SBUF,#20H
JNB TI,$
CLR TI
INC R1
JMP EXTI
////////////////////////////////////////
S5: CJNE A,#32H,EXTI
MOV A,R1
CJNE A,#7BH,S6
MOV A,#61H
MOV R1,A
S6: MOV SBUF,A
JNB TI,$
CLR TI
MOV SBUF,#20H
JNB TI,$
CLR TI
INC R1
JMP EXTI
EXTI: RETI
///////////////////////////////////////////
USART0: JNB RI,EXTI1
CLR ES
CLR RI
MOV P0,SBUF
MOV A,SBUF
MOV R3,A
MOV A,R3
CJNE A,#30H,A1
MOV R1,#30H
MOV R2,#10
JMP EXTI1
A1:CJNE A,#31H,A2
MOV R1,#65
MOV R2,#10
JMP EXTI1
A2:CJNE A,#32H,EXTI1
MOV R1,#97
MOV R2,#10
EXTI1:SETB ES
RETI
///////////////////////////////////////////
END
JMP START
ORG 0BH
JMP TIM0
ORG 23H
JMP USART0
///////////////////////////////
START: MOV TMOD,#21H
MOV TH1,#0FDH
MOV TL1,#0FDH
MOV TH0,#(65536-50000)/256
MOV TL0,#(65536-50000)MOD 256
MOV SCON,#50H
MOV IE,#92H
MOV IP,#10H
SETB TR1
SETB TR0
MOV R1,#30H
MOV R3,#30H
MOV R2,#10
JMP $
////////////////////////////////////
TIM0:
MOV TH0,#(65536-50000)/256
MOV TL0,#(65536-50000)MOD 256
DJNZ R2,EXTI
MOV R2,#10
MOV A,R3
CJNE A,#30H,S3
MOV A,R1
CJNE A,#3AH,S1
MOV A,#30H
MOV R1,A
S1: MOV SBUF,A
JNB TI,$
CLR TI
MOV SBUF,#20H
JNB TI,$
CLR TI
INC R1
JMP EXTI
////////////////////////////////////////
S3: CJNE A,#31H,S5
MOV A,R1
CJNE A,#5BH,S4
MOV A,#41H
MOV R1,A
S4: MOV SBUF,A
JNB TI,$
CLR TI
MOV SBUF,#20H
JNB TI,$
CLR TI
INC R1
JMP EXTI
////////////////////////////////////////
S5: CJNE A,#32H,EXTI
MOV A,R1
CJNE A,#7BH,S6
MOV A,#61H
MOV R1,A
S6: MOV SBUF,A
JNB TI,$
CLR TI
MOV SBUF,#20H
JNB TI,$
CLR TI
INC R1
JMP EXTI
EXTI: RETI
///////////////////////////////////////////
USART0: JNB RI,EXTI1
CLR ES
CLR RI
MOV P0,SBUF
MOV A,SBUF
MOV R3,A
MOV A,R3
CJNE A,#30H,A1
MOV R1,#30H
MOV R2,#10
JMP EXTI1
A1:CJNE A,#31H,A2
MOV R1,#65
MOV R2,#10
JMP EXTI1
A2:CJNE A,#32H,EXTI1
MOV R1,#97
MOV R2,#10
EXTI1:SETB ES
RETI
///////////////////////////////////////////
END