MBCDD:
MOV R0,#11H
MOV R7,#08H
LOOP1:
MOV @R0,#00H
INC R0
DJNZ R7,LOOP1
MOV R0,#25H
MOV R7,#04H
LOOP2:
MOV @R0,#00H
INC R0
DJNZ LOOP2
MOV R3,#10H
LOOP0:
MOV R4,#04H
LOOP3:
MOV R0,#21H
MOV R7,#08H
CLR C
LOOP4:
MOV A,@R0
RLC A
MOV @R0,A
INC R0
DJNZ R7,LOOP4
DEC R4
MOV A,R4
JNZ A,LOOP3
LOOP5:
MOV R1,#25H
MOV R0,#2AH
MOV R7,#04H
CLR C
LOOP6:
MOV A,#9AH
SUBB A,@R0
ADD A,@R1
DA A
MOV @R1,A
INC R0
INC R1
CPL C
DJNZ R7, LOOP6
JC C,LOOP6
MOV R0,# 11H
INC @R0,
SJMP LOOP5
LOOP7:
MOV R1,#25H
MOV R0,#2AH
MOV R7,#04H
CLR C
LOOP8:
MOV A,@R1
ADDC A,@R0
DA A
MOV @R1,A
INC R0
INC R1
DJNZ R7,LOOP8
DEC R3
MOV A,R3
JZ A,LOOP11
MOV R2,#04H
LOOP9:
MOV R0,#11H
MOV R7,#08H
CLR C
LOOP10:
MOV A,@R0
RLC A
MOV @R0,A
INC R0
DJNZ R7,LOOP10
DEC R2
MOV A,R2
JNZ A,LOOP9
SJMP LOOP0
LOOP11:
RET
|
