SWAP A MOV P1,A RETI END
3.ORG 0000H AJMP MAIN ORG 0003H AJMP IP0 ORG 0030H
MAIN:MOV SP,#60H SETB IT0 SETB EA SETB EX0 MOV R7,#00H LP:ACALL DISP AJMP LP IP0:INC R7 RETI 4.ORG 0000H SJMP START ORG 000BH AJMP INTR0 ORG 001BH AJMP INTR1 ORG 2000H
START:MOV TMOD,#51H MOV TH0,#15H MOV TL0,#0A0H MOV TH1,#0FCH MOV TL1,#18H MOV IE,#8AH SET TR0 SET IR1 SJMP $
INTR0:MOV TH0,#15H MOV TL0,#0A0H CPL P1.2 RETI
INTR1:MOV TH1,#0FCH MOV TL1,#18H CPL P1.0
RETI END
5.ORG 0000H
MAIN:MOV TMOD,320H MOV TH1,#0F4H MOV TL1,#0F4H SETB TR1 MOV R0,#50H MOV R7,#10H MOV SCON,#0D0H MOV PCON,#00H WAIT:JBC RI,PR1 SJMP WAIT PR1:MOV A,SBUF JNB P,PNP JNB RB8,PER SJMP REGHT PNP:JB RB8,PER RIGHT:MOV @R0,A INC R0
DJNZ R7,WAIT CLR PSW.5 SJMP $ PER:SETB PSW.5 SJMP $ END