Ответы на вопрос:
.model tiny
.code
.startup
call GetString ;вводим строку с числами
call GetNumbers ;разбираем строку и выводим числа в виде hex и в обратном порядке
lea dx, sPress ;сообщение нажать любую клавишу
mov ah, 9 ;функция вывода строки
int 21h
mov ah, 0 ;ждем нажатие на клавишу
int 16h
.exit 0 ;выход из программы (эквивалентно mov ax, 4c00h / int 21h)
;ввод строки с консоли
GetString proc
lea dx, sNumbers ;сообщение 'Enter Numbers: '
mov ah,9
int 21h
lea dx, InputString ;адрес параметра функции ввода строки (формат описан ниже)
mov ah, 0ah ;номер функции ввода строки
int 21h
ret
GetString endp
;разбор строки и вывод результата
;числа будем хранить в стеке, чтобы вывести их в обратном порядке!
GetNumbers proc
mov bp, 10 ;будем умножать на 10 (при преобразовании строки в число)
xor cx, cx ;счетчик введенных чисел (хранятся в стеке)
lea si, InputString+2 ;адрес самой строки
;+2, т.к. в первых двух байтах длина строки и число введенных символов
;длину строки не используем, строку будем анализировать до кода конца строки (0dh)
num_loop: ;цикл формирования очередного числа
xor bx, bx ;здесь будем накапливать число
xor di, di ;счетчик цифр очередного числа,
; т.о. если =0, то числа нет (для контроля лишних пробелов)
sym_loop: ;цикл преобразования числовой строки в число
lodsb ;читаем очередной байт в регистр al из ds:[si], автоинкремент si
;анализируем байт
до конца строки?
je cmp_last ;да, учтем последнее число из строки
cmp al, ' ' ;пробел?
je space_found ;или конец введенного числа, или дополнительные разделители,
; которые проигнорируем
;ждем только цифры '0' <= al <= '9'
cmp al, '0' ;проверим на цифру
jb sym_loop ;нецифры игнорируем
cmp al, '9'
ja sym_loop
inc di ;есть очередная цифра, считаем, чтобы знать, что что-то есть
;вдвинем в формируемое число введенный десятичный разряд
;для этого предыдущие разряды умнодим на 10 и сложим с введенным
xchg ax, bx ;ax = предыдущим разрядам, bx = введенной цифре
mul bp ;dx:ax = предыдущим старшим разрядам * 10
and bx, 000fh ;превратим символ цифры 30h-39h в число 0-9
add bx, ax ;bx = введенному числу (на данный момент)
jmp sym_loop ;повторяем анализ символов строки
space_found: ;встретили пробел
test di, di ;есть число?
jz sym_loop ;нет - дополнительные пробелы игнорируем
push bx ;число сохраняем в стеке!
inc cx ;считаем
jmp num_loop ;на формирование следующего числа
cmp_last: ;встретили 0dh-конец строки
test di, di ;проверим, было ли у нас сформировано число
jz output_hex ;если в конце строки есть пробелы, то счетчик di=0
;если строка заканчивается цифрой, то di не равен 0
;и тогда это последнее число также надо сохранить в стеке
push bx ;в стек!
inc cx ;считаем
output_hex: ;выводим результат
lea dx, sHex ;сообщение 'Hex values: '
mov ah,9
int 21h
mov si, cx ;счетчик введенных чисел в si
hex_loop: ;цикл вывода hex-значений
test si, si ;проверим на 0
jnz hex_continue
ret ;все выведено или не было ни одного - выходим!
hex_continue: ;продолжаем вывод
pop bp ;извлекаем из стека очередного числа
;(в обратном порядке! так работает стек!)
mov cx, 4 ;счетчик hex-цифр
form_hex_loop: ;цикл вывода hex-цифр, начиная со старшей
rol bp, 1 ;циклически сдвигаем 4 раза, чтобы старшие 4 бита
rol bp, 1 ;(старшая hex-цифра) попали на мели младших бит
rol bp, 1
rol bp, 1
mov bx, bp ;получаем код очередной цифры в младших битах
and bx, 0fh ;маскируем все остальные биты
mov dl, byte ptr Hex[bx] ;получаем символ hex-цифры из строки Hex
mov ah, 2 ;и выводим на экран
int 21h
loop form_hex_loop ;по всем 4 цифрам
mov dl, ' ' ;разделим числа пробелом
mov ah, 2
int 21h
dec si ;уменьшим счетчик чисел
jmp hex_loop ;и на повтор
GetNumbers endp
;
Hex db '0123456789ABCDEF'
sNumbers db 0dh,0ah,"Enter numbers: $"
sHex db 0dh,0ah,"Hex values: $"
sPress db 0dh,0ah,"Press any key$"
InputString db 128,0,128 dup(?)
end
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
nastya0904217.06.2022 21:33
-
Macsum20412.10.2021 06:58
-
tanysha2901.03.2020 04:46
-
marcidus3Marcidus311.08.2021 17:00
-
е7гроошишгини05.11.2021 01:32
-
0011010010107.10.2022 22:41
-
gulyaaxundova17.02.2023 14:26
-
dVioletta07.03.2022 11:17
-
kiki12116.04.2020 14:03
-
vikysa2726.07.2020 23:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.