给个 51模拟加减法器 程序供参考~~~
ORG 0
MOV R7,#0A8H
MOV R5,#05FH
LCALL ADD_UINT8
NOP
NOP
NOP
MOV R7,#0A8H
MOV R5,#0EFH
LCALL SUB_UINT8
NOP
NOP
NOP
SJMP $
ADD_UINT8:
MOV R0,#8 ;R7 + R5 --> R7
ADD_1:
MOV A,R7
XRL A,R5
XCH A,R7
ANL A,R5
CLR C
RLC A
MOV R5,A
DJNZ R0,ADD_1
RET
SUB_UINT8:
MOV A,R5 ;R7 - R5 --> R7
CPL A
INC A
MOV R5,A
LCALL ADD_UINT8
RET
END |