Сортировка массива

[TaYgA]

Всем доброго времени суток! Мне задали такое задание реализовать на паскале и асемблере сортировку массива. С паскалем я справился т.к. информации по поскалю достаточно, а вот с ассемблером я ничего нужного не нашёл Вот код реализации сортировки на паскале:

procedure CountingSort(var X: array of integer; min, max: integer);
var
counter: array[0..100000] of integer;
i, j, index: Integer;
begin
// для всех элементов массива
// указываем значение ноль
for i:=0 to high(counter)
do tmpX:=0;
for i:=min to max
do counter[ar]:=counter[ar]+1;
// устанавливаем значение
// в правильную позицию
index:=min;
for i:=min to high(counter)-1 do
begin
for j:=0 to counter-1 do
begin
ar[index]:=i;
index:=index+1;
end;
end;
end;

А вот как её реализовать на языке ассемблер я понять не могу Надеюсь на вашу помощь!

[Stilet]

А ты не хочешь открыть отладчик и посмотреть как Паскаль этот код переведет в ассемблер?

[TaYgA]

Сообщение от Stilet

А ты не хочешь открыть отладчик и посмотреть как Паскаль этот код переведет в ассемблер?

Это не выход! Дело в том, что мне нужно сравнить размер и скорость выполненения программы на паскале и асемблере и соответственно на асемблере результаты должны быть лучше! Если сделать как вы говорите, то код для ассемблера будет очень большой и по быстродействию будет равен или уступать паскалю! Т.е. этот код мне требуется упростить, чтоб только соблюдалась сортировка этим методом и всё!

[Mikl___]

TaYgA
Абсолютно верно замечено -- возьмешь код созданный Паскалем, выкинешь всё лишнее и получишь ассемблерную реализацию пузырьковой сортировки. Нельзя же сравнивать сортировку Хоара с пузырьковой... Только давай делай всё сам