Use left shift and subtraction to divide a 4-digit hexadecimal number by a 2-digit hexadecimal number

 ORG 0000H
 JMP A1
 ORG 002BH
A1: MOV R0,#04H; dividend
 MOV R1,#0D2H; dividend
 MOV R2,#0; remainder
 MOV R3,#0; quotient
 MOV R4,#0; quotient
 MOV R5,#34; divisor
 MOV 30H,#16

A2: MOV A,R1; first move the low byte to the high byte
 RLC A;
 MOV R1,A;

 MOV A, R0; first process the high byte and receive the low byte transmitted byte
 RLC A;
 MOV R0, A;

 MOV A,R2; process the shifted number
 RLC A;
 MOV R2,A;

CLR C; clear C because subtraction A = AC-R5

 SUBB A,R5; Subtract the divisor from the number shifted out
 JC A3; Compare the number shifted out with the divisor
 MOV R2,A; If the number shifted out is larger, the quotient should be set to 1 and the remainder should be assigned to R2 for the next shift and then subtracting the divisor
      ; Since the divisor is a 2-digit hexadecimal number, the remainder should not exceed a 2-digit hexadecimal number, so one register is enough
A3: CPL C; Quotient processing
 MOV A,R4; First store it in the low byte
 RLC A;
 MOV R4,A;

 MOV A,R3; store from low byte to high byte
 RLC A;
 MOV R3,A;

 DJNZ 30H,A2;
 JMP $

 END

; Idea--The divisor is a 2-digit hexadecimal number, so the remainder does not exceed a 2-digit hexadecimal number, so one register is enough
; --The divisor is a 4-digit hexadecimal number, so two registers must be used
; R2 R5 R3 R4
;1. 00000000-00100010 is less than 0, and
the quotient is 00000000》00000000B ;2. 00000000-00100010 is less than 0, and the quotient is 00000000》00000000B
;3. 00000000-00100010 is less than 0, and the quotient is 00000000》00000000B
;4. 00000000-00100010 is less than 0, and the quotient is 00000000》00000000B
;5. 00000000-00100010 is less than 0, and the quotient is 00000000》00000000B
; 6. 00000001-00100010 is less than 0, and the quotient is 00000000》00000000B
; 7. 00000010-00100010 is less than 0, and the quotient
is 00000000》00000000B; 8. 00000100-00100010 is less than 0, and the quotient is 00000000》00000000B
; 9. 00001001-00100010 is less than 0, and the quotient is 00000000》00000000B
;10. 00010011-00100010 is less than 0, and
the quotient is 00000000》00000000B;11. 00100110-00100010 is greater than 0, and the quotient is 00000000》00000001B; The remainder is 00000100B and is assigned to R2
;12. 00010010-00100010 is less than 0, and the quotient is 00000000》00000010B
;13. 00100100-00100010 is less than 0, and the quotient is 00000000》00000100B
;14. 00100101-00100010 is greater than 0, the quotient is 00000000》00001001B; the remainder is 00000010B and is assigned to R2
; 15.
00001010-00100010 is less than 0, the quotient is 00000000》00010010B; ;16. 00010100-00100010 is less than 0, the quotient is 00000000》00100100B, and the remainder is 00010100B
; the algorithm is now complete