求原码一位乘法汇编语言程序！

;-----------------------------------------------------------
;输入第一个数自动换行,再输入第二个数
;第三行显示的是乘积,如
;7
;8
;56
;-----------------------------------------------------------
code segment
assume cs:code
main proc far
start:
mov ah,01h;接收第一个数字存入CL寄存器
int 21h
sub al,30h
mov cl,al
call crlf
mov ah,01h;接收第二个数字存入BL寄存器
int 21h ;然后再赋予AL防止AL寄存器内容被改变
sub al,30h
mov bl,al
call crlf;回车换行子程序
mov al,bl
mul cl
mov bx,ax;乘积存放在BX寄存器中
call dicidec;转换成十进制子程序
mov ah,4ch;返回DOS
int 21h
ret
main endp
crlf proc near
mov dl,0ah
mov ah,02h
int 21h
mov dl,0dh
mov ah,02h
int 21h
ret
crlf endp

dicidec proc near
mov cx,10d
call dec_div
mov cx,1d
call dec_div
ret
dicidec endp

dec_div proc near
mov ax,bx
mov dx,0
div cx
mov bx,dx
mov dl,al
add dl,30h
mov ah,02h
int 21h
ret
dec_div endp

code ends
end start本回答被提问者采纳