求汇编实现三位十进制的加法

xor ax,ax

mov dx,ax "set result into dx

repeat: pop ax "get ax

mov bl,10d "set 10d to bl

div bl "ax div bl

mov bl,ah "save the remainder in bl

xor ah,ah "set ah to 00h

cbw "change al(quotient) to type word

push ax "push the quotient into stack

mov al,bl "save the remainder back to al

cbw "change it to word

mul cx "mul cx

mov bx,dx "add it to old remainder

add ax,bx "

mov dx,ax "

pop ax " pop the quotient from stack

cmp ax,0d "compare with zero

je exit2 " if equ then exit

push ax "else save it back to the stack

mov ax,cx " make cx mul by 10h

mov cx,10h

mul cx

mov cx,ax

jmp repeat

exit2:

mov bx,dx

ret

hexibin endp

binihex proc near

mov ch,4

rotate: mov cl,4