Somma lunghezza stringhe

.586
    .model flat
    .code

    _sommalunghstringhe proc

        push ebp
        mov ebp,esp

        push ebx
        push esi
        push edi

            mov ecx, 0
            mov ebx, dword ptr[ebp + 8]
            call strlen
            add ecx, eax

            mov ebx, dword ptr[ebp + 12]
            call strlen
            add ecx, eax

            mov eax, ecx

        pop edi
        pop esi
        pop ebx

        mov esp, ebp
        pop ebp

        ret

    _sommalunghstringhe endp



    strlen proc

        push ebp
        mov ebp, esp

            mov esi, 0
            iniziociclo:
                cmp dword ptr[ebx + esi], 0
                je fineciclo
                inc esi
                jmp iniziociclo
            fineciclo:
            mov eax, esi

        mov esp, ebp
        pop ebp
        ret

    strlen endp
end