DBCMHEX:
CLR A
MOV 20H,A
MOV 21H,A
MOV 22H,A
MOV 23H,A
LOOP0:
CLR C
MOV A,@R0
RRC A
PUSH PSW
JNB ACC3,LOOP1
CLR C
SUBB A,#03H
LOOP1:
JNB ACC7,LOOP2
CLR C
SUBB A,#30H
LOOP2:
MOV @R0,A
DEC R0
POP PSW
DJNZ R6,LOOP0
CLR A
LOOP3:
MOV A,@R1
RRC A
MOV @R1,A
DEC R1
DJNZ R5,LOOP3