Поиск максимального значения в массиве - Assembler

Формулировка задачи:

Пишу на emu8086 Цель программы найти максимальный элемент массива, у меня получается так, что он сравнивает элементы a[1] и a[2], а потом не a[2] и a[3], а идет сравнивать a[3] и a[4] и т.д. Помогите разобраться в чем проблема, или предложите свой вариант программы под emu8086.

assume CS:code, DS:data ; инициализируем сегментные регистры - CS будет указывать на код, DS - на данные
code segment ; начало сегмента кода
start: 
mov AX, data ; помещаем в AX указатель на начало сегмента данных
mov DS, AX ; копируем адрес начала сегмента данных в регистр DS из регистра AX
; т.к. прямая запись указателя в регистр DS запрещена 

mov CX,5 ;сколько всего элементов
mov BX,0 ;индекс 
mov AL,mas[0] 
 
lap: 
mov BH,mas[BX] ; и следующий за ним 
inc BX ; увеличиваем на 1
cmp BH,AL ; сравниваем их
jb Goe ; если первый больше второго то идем на GoE 
jmp NGoE ;если нет то начинаем сначала
 
GoE: 
mov AL,BH ;и запоминаем элемпент в AL 
 
NGoE:
loop lap 

int 21h ; вызываем прерывание DOS
code ends ; конец сегмента кода
data segment ; начало сегмента данных
 
mas db 1,2,3,4,8
; Все строковые массивы должны заканчиваться символом ;
data ends ; конец сегмента данных
end start ; конец программы

Решение задачи: «Поиск максимального значения в массиве»

Листинг программы

mov BH,mas[BX] ; и следующий за ним 
inc BX ; увеличиваем на 1

Объяснение кода листинга программы

Переменная BH содержит байт, который будет использоваться для хранения максимального значения.
Переменная BX содержит индекс текущего элемента массива.
Команда mov BH,mas[BX] загружает значение текущего элемента массива в переменную BH.
Команда inc BX увеличивает значение BX на 1, переходя к следующему элементу массива.