;По запросу программы пользователь вводит с клавиатуры
;последовательность целых трехзначных положительных десятичных чисел,
;разделенных пробелами. Ввод последовательности заканчивается нажатием <Enter>.
;Программа выводит эти же числа на экран в порядке возрастания величины числа,
;причем в шестнадцатеричной системе счисления.
;======================================================================
.model small ;определили модель памяти как small
.stack 128 ;выделели под программу 128 байт памяти
.data ;объявили сегмент данных
;mess db 'Hi man!$' ;определили переменную типа databyte размером 1 байт
next db '', 0Dh, 0Ah, '$' ;определили переменную типа databyte размером 1 байт
mess db 'vvedite chisla?', 0Dh, 0Ah, '$' ;определили переменную типа databyte размером 1 байт
endpr db 'end program', 0Dh, 0Ah, '$'
;db 0Dh,0Ah,24h
.code ;объявили сегмент кода
main:
;следующими двумя строками мы связываем адрес сегмента данных с его реальным расположением в памяти.
;Это связано с тем, что сегмент кода и сегмент данных расположены по одному и тому же
;адресу в памяти при инициализации программы.
mov ax,@data
mov ds,ax
;следующие три строки кода выводят на экран надпись "'vvedite chisla?"
lea dx,mess
mov ah,09h
int 21h
;================================
in_out:
mov ah,0 ; Ожидаем нажатия и
int 16h ; читаем код клавиши
mov bl,al ; Сохраняем код
mov ah,0eh ; Выводим символ
int 10h ; на экран
cmp bl,' ' ; Если не нажата клавиша
je space ; пробел, повторяем ввод
cmp bl,13 ; это клавиша ENTER?
je enter ; если нажата кнопке ENTER, перейти в подпрограмму ENT
:если не нажаты клавиши пробела и ентера, предполагаем что нажаты
;цифры, и последовательно сохраняем их (наверно, в ОЗУ?)
jmp in_out
;================================
;по нажатию пробел нужно последовательно извлечь все введенные
;цифры и вычислить значение введенного числа в десятичном виде
space:
lea dx,next;перевод на следующую строку
mov ah,09h
int 21h
lea dx,next;перевод на следующую строку
mov ah,09h
int 21h
jmp in_out
;================================
;по нажатию ентера вычислять числа в порядке возрастания,
;преобразовывать их в 16-ричные и выводить
enter:
lea dx,next;перевод на следующую строку
mov ah,09h
int 21h
lea dx,endpr;вместо ендпрограмм должен быть вывод чисел
mov ah,09h
int 21h
jmp in_out
;================================
;собственно последние две строчки корректно завершают программу
mov ax,4c00h
int 21h
end main

;Ввод числа в виде строки
MOV AH,0AH ;в AH номер функции
LEA DX,BUF ;DS:DX адрес буфера для ввода
INT 21H

;Перевод строки в число, результат в DI
MOV DI,0
LEA BX,BUF+1 ;в BX адрес второго элемента буфера
MOV CX,[BX] ;в CX количество введенных символов
XOR CH,CH
MOV SI,1 ;в SI множитель
MET:
PUSH SI ;сохраняем SI (множитель) в стеке
MOV SI,CX ;в SI помещаем номер текущего символа
MOV AX,[BX+SI];в AX помещаем текущий символ
XOR AH,AH
POP SI ;извлекаем множитель (SI)из стека
SUB AX,30H ;получаем из символа (AX) цифру
MUL SI ;умножаем цифру (AX)на множитель (SI)
ADD DI,AX ;складываем с результирующим числом
MOV AX,SI ;помещаем множитель (SI) в AX
MOV DX,10
MUL DX ;увеличиваем множитель (AX) в 10 раз
MOV SI,AX ;перемещаем множитель (AX) азад в SI
LOOP MET;переходим к предыдущему символу

Ввести строку (0A int 21h)
dst_index = 0
цикл
пропустить до цифры
если конец строки - выйти из цикла
прочесть цифры
записать в dst[dst_index]
увеличить dst_index
повторить
отсортировать dst[0 до dst_index-1]
цикл по i от 0 до dst_index-1
напечатать в hex dst[i]
повторить
exit

пропустить до цифры:
цикл
если достигнут конец массива с символами - выйти с флагом 'конец строки'
если текущий символ цифра - выйти
пропустить текущий символ
повторить

прочесть цифры:
ret = 0
цикл
если достигнут конец массива с символами - выйти из цикла
если текущий символ не цифра - выйти из цикла
ret = ret * 10 + (<текущий символ> - <код цифры '0'>)
пропустить текущий символ
повторить
вернуть ret