求汇编实现两个多位数相乘的程序

实现多为相乘

Data segment
a1 db 50 dup(?)
a2 db 50 dup(?)
a3 db 101 dup(?)
a9 db 100 dup(?)
a10 db 100 dup(?)
a11 db 1 dup(?)
a4 db 0dh,0ah,'are you ready?(y/n)$'
a5 db 0dh,0ah,'please enter your first number:$'
a6 db 0dh,0ah,'please enter your second number:$'
a7 db 0dh,0ah,'the answer is:$'
a8 db 0dh,0ah,'your enter number is error',0dh,'$'
Data ends
mysta segment para stack 'stack'
db 20 dup(?)
mysta ends
code segment
assume cs:code,ds:data,ss:mysta
start: mov ax,data
mov ds,ax
mov ax,mysta
mov ss,ax
begin proc
l1: mov a11[00],00h
mov dx,offset a4
mov ah,09h
int 21h
l2: mov ah,01h
int 21h
mov bl,al
cmp bl,'y'
je l3
cmp bl,'y'
je l3
cmp bl,'n'
je l4
cmp bl,'n'
je l4
jmp l1
l3: call num1
call