Вывести матрицу любого размера (исправить код)

.model small
.stack 100
.data
    BUFR db 14h,0,13h dup(?)
    string db "Gorodeckij N.V. 107221",0Dh,0Ah,'$'             
    
.code
begin:
    mov ax, @data
    mov ds,ax
 
 
 
    ;ввести размерность массива
    mov bx,03h
    mov cx,03h
    mov si,bx
    mov di,si
    mov ax,bx
    mul cx
    mov cl,al
 
 
 
    ;перевести на след. строку
    mov ax,0200h
    mov dl,0dh
    int 21h
    mov dl,0ah
    int 21h
    
    mov ch,00
    mov sp,0000
    ;собсна сам вывод матрицы в бп+2 число на 1 больше чем позиция первого символа
    mov ds:[42h],024fh
    mov ds:[40h],0930h
 
    ;поставіть курсор на 2 строку
    push dx
    mov ax,0200h
    ;позіція первого сімвола
    mov dx,024eh
    mov ds:[46h],dx
    int 10h 
    mov di,0000
 
 
m_loop: mov ax,ds:[40h]
    cmp dl,4fh
    jz next
    push cx
    mov bx,0000h
    mov bl,0ch
    mov cx,0001h
    int 10h ;вывод на экран символа
    pop cx
    inc bp
    inc dl
    inc ch
    dec cl
    inc ax
    mov ds:[40h],ax
    cmp dl,4fh
    jz next
 
    ;нужно перейти на след. позицию
 
    push dx
 
    mov dx,ds:[42h]
 
    
    mov ax,0200h
    int 10h
    inc dl
    inc dl
    inc di
    inc di
    mov ds:[42h],dx
 
    mov dl,32
    int 29h
    mov ax,ds:[40h]
    pop dx
    ;div
    push dx
    mov dx,0000h
    mov dl,ch
    mov ax,dx
    pop dx
    mov bx,si
    div bl
    cmp ah,00h
    JNZ cont
 
    ;ппереввод строки
    mov ax,0200h
    add ds:[42h],0100h
    sub ds:[42h],di
    mov dl,0dh
    int 21h
    mov dl,0ah
    int 21h
    mov dx,ds:[42h]
    dec dx
    int  10h
    mov di,0000
    jmp cont
 
 
next:   mov di,0000h
    mov ds:[44h],di ;халтурка для наращивания номера символа
    mov ds:[44h],bp
    mov di,si
    sub di,ds:[44h]
    add ax,di
    sub cx, di
    mov dx, ds:[46h]
    inc dh
    mov ds:[46h],dx
    mov ds:[40h],ax
    mov ax,0200h
    int 10h
    cmp cl,00h
    jz m_exitloop
    mov bp,0000h
    jmp  m_loop
 
cont:   dec cl
    jz m_exitloop
    jmp m_loop
    m_exitloop:
 
    
    
 
 
    ;intput string
    mov ah,0ah
    lea dx,BUFR
    int 21h 
 
    
    mov ax,04c00h
    int 21h
 
 
end begin