Help finding arraymax element?

See more:

compiler

MASM

How do I return the maximum number of a SWORD array

Given: ESI holds the base of this array, and EBX holds the number of elements in the array.
Returns: AX has the maximum

This is what I have so far:

ArrayMax PROC
    L1:     cmp ax, [esi]
            JL  L2      ;ax<[esi]
        add esi, TYPE array
        loop L1
    L2:     mov ax, [esi]
        add esi, TYPE array
        loop L1

ret AX

ArrayMax ENDP

I'm concerned with the looping situation, and the logic.