附 录 ACALL WRITE
MOV SCON #00000000B A2:
JNB 00H A2 ; MOV A #38H ACALL WRITE RDATA：
AJMP WRITE: NOP
MOV ACALL RET
NU1: NU2: NU3: RDATA:
RD1:
A2 R0 NU1 RLC JNC CLR SETB SETB SJMP CLR CLR SETB DEC DJNZ RET MOV MOV MOV CLR MOV CLR MOV SETB #08H A NU2 0B1H 0B0H 0B1H NU3 0B1H 0B0H 0B1H R0
R0 R2 R3 R4 C
A 0B1H
C 0B1H
-43-
NU1 #02H #08H #20H #00H 0B0H 河北联合大学信息工程学院
RLC A
DJNZ R3 RD1 MOV R4 A INC R4
DJNZ R2 RD1 RET ADINT:
ORG JMP ORG
START: MOV MOV MOV CALL SETB MAINB:
JB MOV CALL CALL SETB MOV MOV DIV MOV MOV CALL MOV CALL
SETB 00H RETI 0000H START 0100H
SP P1 DATA_OUT SEND CS KEY DATA_OUT SEND RECEIVE CS
B A AB
TEN DATA_OUT SEND
DATA_OUT SEND
#2FH #11011011B #10100100B MAIN #00010101B ; #10 DATA_IN A #10100001B #10100001B -44-