Поиск максимального по модулю числа в массиве ( Assembler )

[Forversc]

Помогите составить программу на Assembler, вот есть программа, которая вычисляет максимальный элемент массива "A", как видно в массиве есть отрицательные числа, необходимо изменить эту программу так что бы максимальный элемент массива вычислялся без учета знака элемента массива. Например (-3) программа сравнивала как 3: Измените программу приведенную ниже так что бы она выполняла эти условия. Заранее большое спасибо

TITLE Program4
.MODEL small
.STACK 100h
.DATA
A DW 5, -3, 9, -4, 5
Max DW 0
.CODE
main PROC
mov AX, @data
mov DS, AX
mov SI, OFFSET A
mov CX, 5 
mov AX, [SI]
mov Max, AX

L1:
mov AX,[SI]
cmp AX, Max
jbe L2
mov Max, AX

L2:
inc SI
inc SI
loop L1

mov AX,4C00h
int 21h
main ENDP
END main

________
1) Название темы по правилам форума должно адекватно отражать суть решаемой задачи/проблемы.
На первый раз я исправил.
В последующем, темы с подобным названием будут закрываться или удаляться,
а автор такой темы будет получать штрафные баллы.

2) Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)

Не забывайте об этом!

Модератор.

[Ulex]

.MODEL small
.STACK 100h
.DATA
A DW 5, -3, 9, -4, 5
Max DW 0
.CODE
main PROC
	mov	AX, @data
	mov	DS, AX
	mov	SI, OFFSET A
	mov	CX, 5 

	xor	ax, ax
	lea	di, [A]
L1:
	fild	word ptr [si]
	fabs
	fistp	[Max]
	cmp	[Max], ax
	jbe	L2
	mov	ax, [Max]
	mov	di, si
L2:
	add	si, 2
	loop	L1

	mov	ax, word ptr [di]
	mov	[Max], ax

	mov	AX,4C00h
	int	21h
main ENDP

[Step_UA]

Если работу с сопроцесором не проходили, то можно так:

TITLE Program4
.MODEL small
.STACK 100h
.DATA
A DW 5, -3, 9, -4, 5
Max DW 0
.CODE
main PROC
        mov AX, @data
        mov DS, AX
        mov SI, OFFSET A
        mov CX, 5 
        xor BX,BX   ; максимальное значение по модулю

L1:
        mov AX,[SI]
        cmp ax,0
        jge no_minus
        neg ax
no_minus:
        cmp AX, BX
        jbe L2
        mov BX, AX

L2:
        inc SI
        inc SI
        loop L1

        mov Max,BX
        mov AX,4C00h
        int 21h
main ENDP
END main

[Forversc]

Спасибо большое!! очень благодарен