Разработать программу на языке Ассемблер, выполняющую обработку одномерного массива - Assembler

.386
.model flat, stdcall
.stack 4096
ExitProcess proto, dwExitCode:dword
 
.data
array word 4, 4, 4, 12, 33
 
.code
main proc
    mov esi, offset array
    mov ecx, lengthof array
    call findSum
    invoke ExitProcess, 0
main endp
 
findSum proc
    push ebx
    push edx
    push ecx
    push esi
 
    xor ebx, ebx
    xor edx, edx
 
L1:
    xor eax, eax
    cmp word ptr [esi], 0
    je L2
    inc ebx
    movzx eax, word ptr [esi]
    push edx
    mul word ptr [esi]
    shl eax, 16
    mov ax, dx
    rol eax, 16
    pop edx
    add edx, eax
L2:
    add esi, type word
    loop L1
 
    mov eax, edx
    xor edx, edx
    div ebx
 
    pop esi
    pop ecx
    pop edx
    pop ebx
    ret
findSum endp
 
end main