Вычисление суммы двух массивов байт

Name Program_summa
Data segment
    x1 db 14h, 2h, 3h, 12h, 64h                                 
    mas1_end label word
    len1 = (mas1_end - offset x1)/type x1
    y1 dw 0
    x1_dec db 5 dup (0)
        
    x2 db 8h, 54h, 32h, 5h                  
    mas2_end label word
    len2 = (mas1_end - offset x2)/type x2
    y2 dw 0
    x2_dec db 5 dup (0)
    
Data ends
 
Stack segment
    dw 16 dup (?)
    StkTop label word
Stack ends
 
Code segment
    Assume cs:code, ds:data, ss:stack
Summa proc
    mov bp,sp                       
    mov cx,[bp+2]                   
    mov di,[bp+4]                   
    mov si,[bp+6]               
    xor dx,dx                       
 
M1: mov al,[si]                     
    add [di],al         
    adc dx,0                        
    add si,type x1                  
    loop M1
    
    mov [di+1], dl      
    ret 6
Summa endp
 
gorner proc
    mov bp,sp
    mov si,[bp+4]
    mov bx,[si]
    mov cx,16
g2: 
    mov di,[bp+2]
    shl bx,1
    push cx
    mov cx,5
g1:
    mov al,[di]
    adc al,[di]
    aaa
    mov [di],al
    inc di
    loop g1
    pop cx
    loop g2
    ret 4
gorner endp
 
; Основная программа
 
Start:  
    mov ax,data
    mov ds,ax
    mov ax,stack
    mov ss,ax
    lea sp, StkTop
    
    mov y1, 0
    mov y2, 0                           
    mov word ptr x1_dec, 0
    mov word ptr x1_dec+2, 0
    mov x1_dec+4, 0
    
    mov word ptr x2_dec, 0
    mov word ptr x2_dec+2, 0
    mov x2_dec+4, 0
;Передача параметров через стек:
    lea ax, x1                      
    push ax
    lea ax, y1                      
    push ax
    mov ax,6                        
    push ax
        call Summa
    
    nop
    
    lea ax,y1
    push ax
    lea ax,x1_dec
    push ax
        call gorner
    nop
    nop
    
    lea ax, x2                      
    push ax
    lea ax, y2                      
    push ax
    mov ax,4                            
    push ax
        call Summa
    lea ax,y2
    push ax
    lea ax,x2_dec
    push ax
        call gorner
    
    mov ah, 4ch                     
    int 21h 
Code ends
end Start