SMSUB:
CLR 07H
MOV A,R0
MOV R2,A
MOV A,R3
MOV R7,A
CLR C
LP:
MOV A,@R0
SUBB A,@R1
MOV @R0,A
INC R0
INC R1
DJNZ R7,LP
JB OV,ERR
DEC R0
MOV A,@R0
JNB E7H,LP0
SETB 07H
LP0:
MOV A,R2
MOV R0,A
RET
ERR:
……...
RET