Хостинг Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг на Windows 2008

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

Чемпионы рейтинга экспертов в этой рассылке

Лысков Игорь Витальевич Статус: Специалист Рейтинг: 92 ∙ повысить рейтинг >>

Зенченко Константин Николаевич Статус: Профессор Рейтинг: 70 ∙ повысить рейтинг >>

Airyashov Статус: Студент Рейтинг: 25 ∙ повысить рейтинг >>

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Assembler (Ассемблер)

Выпуск № 1131
от 12.12.2008, 04:35

Вопрос № 153187: Здравствуйте. В 16 главе книге Калашникова приводится в пример программа !debug16.com которая создает такойже файл и перезаписывает себя же. Почему после запуска этой программы и второго запуска ее под отладчиком nop меняется на int3, ведь там был п...

Вопрос № 153.187

Здравствуйте. В 16 главе книге Калашникова приводится в пример программа !debug16.com которая создает такойже файл и перезаписывает себя же. Почему после запуска этой программы и второго запуска ее под отладчиком nop меняется на int3, ведь там был пустота? Поясните пожлуйста. Приложение: CSEG segment assume cs:CSEG, ds:CSEG, es:CSEG, ss:CSEG org 100h Begin: call Create_file ;Создадим файл с именем "!Debug16.com" ;Иначе говоря, перезапишем сами себя... nop ;<=== Это для теста. Все внимание на эту строку! ret ;Выходим в DOS ; === Процедура создания файла с именем "!DEBUG16.COM" === Create_file proc mov ah,3Ch ;Функция создания файла xor cx,cx ;Атрибуты обычные mov dx,offset File ;Имя создаваемого файла int 21h push ax ;Сохраним номер файла mov bx,ax mov ah,40h ;Функция записи в файл mov cx,offset Finish-100h ;Кол-во записываемых байт: ;Конец нашей программы (Finish)-100h (PSP) mov dx,offset Begin ;Адрес, с которого начинаем писать ;(самое начало нашей программы) int 21h pop ax mov ah,3Eh ;Закрываем файл int 21h ret File db '!Debug16.com',0 ;Имя файла, которое создается Create_file endp Finish equ $ ;Метка конца программы CSEG ends end Begin

Отправлен: 06.12.2008, 12:37 Вопрос задал: Емельянов Дмитрий Алексеевич (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 3)

Отвечает: Лысков Игорь Витальевич Здравствуйте, Емельянов Дмитрий Алексеевич! Все дело в том, что Вы сделали шаг (по F2) в отладчике... И что при этом произошло? А произошло следующее: 1) Отладчик поменял первый байт следующей команды за текущей на int3 (а это nop). 2) запускает на работу 3) останавливается на int3 4) меняет байт на тот, что был раньше. Итак, у нас работает за один шаг процедура Create_file, которая пишет образ программы на диск. При этом следующий байт за вызовом (nop) изменен на int3. Естественно, именно в таком виде и будет записано на диск! Вот если запустить программу под отладчиком по g, то программа запишется без изменений... --------- Удачи!

Ответ отправил: Лысков Игорь Витальевич (статус: Специалист) Ответ отправлен: 08.12.2008, 09:22 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 238055 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Вопрос № 153.225

Уважаемые эксперты, помогите с решением задачи, не получается занести элементы массива из одного сегмента памяти в другой Приложение: .model small data ; сегмент данных n equ 8 ; число элементов массива x db 1,4,35h,67h,0aah,0ffh,55h,33h ; примерный исходный массив y db n dup (0) ; (8 байт результата) stack 100h code ; сегмент кода main: mov ax, @data mov ds, ax mov cx,n ; число элементов массива lea si,x ; адрес исходного массива lea di,y ; адрес результата xor_loop: ; начало цикла формирования нового массив lodsb ; считываем очередной элемент в al из DS:[SI], после чего SI автоматом увеличится на 1 xor al,0fh ; делаем "побитовое исключающее ИЛИ" stosb ; сохраняем значение al по адресу ES:[di], DI увеличивается на 1 loop xor_loop ; CX уменьшается на 1 и если не 0, то идем на начало mov ax, 4C00h int 21h end main

Отправлен: 06.12.2008, 18:10 Вопрос задал: Dagra (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 7)

Отвечает: Шевченко Александр Владимирович Здравствуйте, Dagra! Что делает команда xor в данном случае? Может, она лишняя?

Ответ отправил: Шевченко Александр Владимирович (статус: 3-й класс) Ответ отправлен: 06.12.2008, 18:54 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 237931 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Отвечает: an42 Здравствуйте, Dagra! Приложение чуть подправил (поставил точки .data; .stack; .code) и добавил строку mov es, ax чтоб DS и ES имели один сегментный адрес. Удачи Приложение: .model small data ; сегмент данных n equ 8 ; число элементов массива x db 1,4,35h,67h,0aah,0ffh,55h,33h ; примерный исходный массив y db n dup (0) ; (8 байт результата) stack 100h code ; сегмент кода main: mov ax, @data mov ds, ax mov es,ax mov cx,n ; число элементов массива lea si,x ; адрес исходного массива lea di,y ; адрес результата xor_loop: ; начало цикла формирования нового массив lodsb ; считываем очередной элемент в al из DS:[SI], после чего SI автоматом увеличится на 1 xor al,0fh ; делаем "побитовое исключающее ИЛИ" stosb ; сохраняем значение al по адресу ES:[di], DI увеличивается на 1 loop xor_loop ; CX уменьшается на 1 и если не 0, то идем на начало mov ax, 4C00h int 21h end main

Ответ отправил: an42 (статус: Студент) Ответ отправлен: 07.12.2008, 12:30 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 237982 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Вопрос № 153.268

Уважаемые эксперты, у меня возникла проблема по выводу результат на экран. Задача такова, что нужно введенные данные с клавиатуры общитать c=a+b и вывести результат на экран. Помогите пожалуйста. Приложение: data segment ;начало сегмента данных mes1 db 'Vvedite pervoe chislo $' mes2 db 'Vvedite vtoroe chislo $' mes3 db 'Vash rezultat slosheniya $' a dw 1000 b dw 1000 x dw ? data ends ;конец сегмента данных code segment ;начало сегмента кода assume cs:code,ds:data ;связываем сегменты с сегментными регистрами cls proc ;начало процедуры cls ;очищаем экран mov ah,2h mov bh,0 mov dx,0 int 10h mov al,' ' mov ah,0ah mov bh,0 mov cx,2000 int 10h mov ax,data mov ds,ax ;mes1 mov ah,2h mov bh,0 mov dh,1 mov dl,0 int 10h mov dx,OFFSET mes1 mov ah,9h int 21h ;начало ввода строк 1 mov ah,2h mov bh,0 mov dh,3 mov dl,0 int 10h mov dx,OFFSET a mov cx,80 mov bx,0 mov ah,63 int 21h ;конец ввода строк 1 ;mes2 mov ah,2h mov bh,0 mov dh,5 mov dl,0 int 10h mov dx,OFFSET mes2 mov ah,9h int 21h ;начало ввода строк 2 mov ah,2h mov bh,0 mov dh,7 mov dl,0 int 10h mov dx,OFFSET b mov cx,80 mov bx,0 mov ah,63 int 21h ;конец ввода строк 2 ;операция mov ax, [a] adc ax, [b] mov [x], ax ;mes3 mov ah,2h mov bh,0 mov dh,10 mov dl,0 int 10h mov dx,OFFSET mes3 mov ah,9h int 21h ;вывод введенных строк на экран 1 mov ah,2h mov bh,0 mov dh,12 mov dl,0 int 10h mov dx,OFFSET x mov ah,9h int 21h ;конец вывода строк на экран 1 mov ah,7h int 21h ;завершаем работу программы mov ah,4Ch int 21h cls endp ; конец процедуры cls code ends ; конец сегмента кода end cls ; конец программы

Отправлен: 07.12.2008, 01:48 Вопрос задал: Николаенко Антон Юрьевич (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Лысков Игорь Витальевич Здравствуйте, Николаенко Антон Юрьевич! Когда данные вводятся с клавиатуры, то они вводятся как строка (или как отдельные символы) Чтобы можно было было работать как с числами, сначала надо преобразовать строку в число. И обратно, перед выводом на экран, сначала надо преобразовать число в строку. Подправленная программа в приложении. Обратите внимание, что предполагается, что числа < 65536 (значение помещается в 16-битный регистр) И ожидается строка только из цифр (нет проверки на корректность символа) Приложение: data segment ;начало сегмента данных mes1 db 'Vvedite pervoe chislo $' mes2 db 'Vvedite vtoroe chislo $' mes3 db 'Vash rezultat slosheniya $' a dw 1000 b dw 1000 x dw ? input label byte ;буфер для приема строки с клавиатуры (для ф-и 0ah) max db 64 ;макс размер буфера len db ? ;реальная длина принятой строки buffer db 64 dup (?) ;сама строка data ends ;конец сегмента данных code segment ;начало сегмента кода assume cs:code,ds:data ;связываем сегменты с сегментными регистрами cls proc ;начало процедуры cls ;очищаем экран mov ah,2h mov bh,0 mov dx,0 int 10h mov al,' ' mov ah,0ah mov bh,0 mov cx,2000 int 10h mov ax,data mov ds,ax ;mes1 mov ah,2h mov bh,0 mov dh,1 mov dl,0 int 10h mov dx,OFFSET mes1 mov ah,9h int 21h ;начало ввода строк 1 mov ah,2h mov bh,0 mov dh,3 mov dl,0 int 10h call GetNumber mov [a], ax ;mes2 mov ah,2h mov bh,0 mov dh,5 mov dl,0 int 10h mov dx,OFFSET mes2 mov ah,9h int 21h ;начало ввода строк 2 mov ah,2h mov bh,0 mov dh,7 mov dl,0 int 10h call GetNumber mov [b], ax ;операция mov ax, [a] add ax, [b] ;зачем складывать с битом переноса по ADC ? mov [x], ax ;mes3 mov ah,2h mov bh,0 mov dh,10 mov dl,0 int 10h mov dx,OFFSET mes3 mov ah,9h int 21h ;вывод введенных строк на экран 1 mov ax, [x] call PrintNumber ;завершаем работу программы mov ah,4Ch int 21h cls endp ; конец процедуры cls GetNumber proc ;ввод числовой строки в буфер и преобразование строки в число lea dx, input mov ah, 0ah int 21h ;в буфере строка xor bx, bx ;здесь будет наше число xor cx, cx mov cl, len ;длина строки jcxz GetNumber_ret ;ничего не введено lea si, buffer ;адрес строки GetNumber_loop: mov ax, 10 ;будем умножать на 10 (число десятичное) mul bx ;ранее обработанные разряды умножаем на 10 mov bx, ax lodsb and ax, 0fh ;символ '0'-'9' -> число 0-9 add bx, ax ;и прибавим очередной разряд loop GetNumber_loop GetNumber_ret: mov ax, bx ;в ax принятое число ret GetNumber endp PrintNumber proc ;преобразование числа в строку и вывод на экран mov bx, 10 ;будем делить на 10 xor cx, cx ;счетчик разрядов div_loop: xor dx, dx ;будем делить dx:ax/bx div bx push dx ;сохраним остаток (очередной разряд) inc cx ;считаем разряды test ax, ax ;пока есть что, повторяем jnz div_loop pr_loop: ;выводим в обратном порядке! pop dx ;извлекаем очередную цифру из стека or dl, '0' ;преобразуем число в символ! mov ah, 2 ; и выведем int 21h loop pr_loop ret PrintNumber endp code ends ; конец сегмента кода end cls ; конец программы --------- Удачи!

Ответ отправил: Лысков Игорь Витальевич (статус: Специалист) Ответ отправлен: 08.12.2008, 10:03 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 238059 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5

© 2001-2008, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале ∙ Версия системы: 5.13 от 01.12.2008
RusFAQ.ru | MosHoster.ru | MosDesigner.ru RusIRC.ru | Kalashnikoff.ru | RadioLeader.ru