Найти максимум в двумерном массиве - Assembler

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

Доброго времени суток. Опять-таки переписываю с дельфи на ассемблер. Задача проста - найти максимум в двумерном массиве. Числа DWORD (integer, unsigned 32bit), я насколько знаю, с 64-битными гемор жуткий. Помогите реализовать полностью! Оригинал:

Type DATArray = array of array of integer;

- это ширина и высота. У меня возникли трудности с этими условиями. Подскажите, пожалуйста!

function MaxSearch(Its: DATArray; mx, my: integer): longint;
var
  i, j: integer;
  max: longint;
begin
  max := 0;
  for i := 0 to mx - 1 do
    for j := 0 to my - 1 do
      if (i < mx div 2 - 320) or (j < my div 2 - 160) or (i > mx div 2 + 320) or
        (j > my div 2 + 160) then
      begin
        if (max < Its[i, j]) then
          max := Its[i, j];
      end;
  exit(max);
end;

Дельфи почему-то не любит процедур без переменной RESULT. прошу сохранять в неё.

function add_arr(p:pointer; i,j:integer):integer; assembler;
asm
    lds si, p

Это так грузит одномерный массив. Как загрузить двумерный? Я полагаю, аналогично...

Решение задачи: «Найти максимум в двумерном массиве»

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