附 录 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-