global mystrlen

section .text

mystrlen:			;ebp + 8 = endereco vector
		push	ebp
		mov		ebp, esp	
		push	esi
		push	ebx
	
		mov		eax, [ebp + 8]
		mov		esi, 0
loop:	mov		bl, [eax + esi]
		cmp		bl, 0
		je		fim
		inc		esi
		jmp 	loop

fim:
		mov		eax, esi
		pop 	ebx
		pop 	esi
		pop		ebp
    	ret