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
9

