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

Выпуск № 1075
от 30.09.2008, 18:05

Вопрос № 144.909

В книге Калашникова в главе 3 есть программа для практики, которая должна отображать символ (01 - рожица в ASCII кодах) ярко-белым цветом на синем фоне. К сожалению у меня она не отразилась, хотя com-файл был создан. Я добавил (по наитию) очистку экрана. Рожица отразилась, но грязно белая на черном экране. Хотелось бы получить обещанное. На всякий случай в приложение помещаю код программы. Помогите разобраться. Изучаю Ассемблер не больше месяца, использую MASM 6.11. Поэтому, прошу побольше комментарий. С уважением, Швецов Приложение: CSEG segment org 100h beg: ;очистка экрана (моя добавка) mov ax,3 int 10h ;опять Калашников mov ax,0b800h;если можно, назначение этой функции. У Калашникова есть объяснение, но я не понял mov es,ax mov di,0;кстати, что это за регистр. Уже третий раз без объяснений mov ah,31;цвета mov al,1;рожица mov es:[di],ax mov ah,10h int 16h int 20h CSEG ends end beg

Отправлен: 24.09.2008, 17:59 Вопрос задал: Швецов Анатолий Прокофьевич (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Швецов Анатолий Прокофьевич! До этого момента Вы работали только в одном сегменте памяти размером 64кб. Все сегментные регистры имели одинаковое значение. Данный пример демонстрирует работу с сегментами, а именно прямую запись в видеобуфер с помощью индексного регистра DI. В реальном режиме работы процессора доступны 16-ть сегментов по 64кб, т.е. 1 мб. Любой физический адрес вычисляется как сумма сегментного регистра(CS,DS,ES,SS) и регистра общего назначения (AX,BX,CX,DX,DI,SI,BP,SP). У каждого регистра общего назначения есть дополнительная функция возложенная на него разработчиками. К примеру: AX - аккумулятор, в нем производятся основные арифметические вычисления, команды использующие этот регистр имеют более которкий код и выполняются быстрее; BX - базовый регистр, очень полезен при работе с массивами, может применятся с регистрами DI и SI([ BX + DI ]); CX - счетчик, используется в оператора цикла и некотороых строковых командах; DX - регистр данных, в некоторых командах используется как разширитель аккумулятора, если результат работы превышает размер 16-ть бит; DI - индекс приемника; SI - индекс источника; Два последних регистра используются в строковых командах. Все выше перечисленные регистры по умолчанию используются вместе с регистром DS; BP - база стека, может применятся с регистрами DI и SI([ BP + SI ]); SP - указатель стека; Эти два регистра по умолчанию работают только с регистром SS. Установленные по умолчанию регистры можно измеять, так как это сделано в приведенном Вами примере mov es:[di],ax, т.е. записать слово по адресу определенному в регистрах ES:DI. Вся физическая память реального режима разбита на области: 00000-А0000 - рабочая и служебная область DOS; А0000-С0000 - буфер видеопамяти; С0000-FFFFF - служебная область BIOS. В контексте Вашего вопроса: область видеопамяти используется видеоконтролером для хранения отображаемой информации. Для каж дого видеорежима установленны свои адреса. Сегментный адрес 0b800h используется в режимах 00-06. Смещение относительно начала сегмента в памяти соответствует отображаемому символу на экране. В данном примере DI=0 т.е. верхний-левый угол. К примеру если Вы запишите mov di,100, то у отображаемый символ сместится. Проверьте. Также Вы можете по эксперементировать и с сегментным регистром, к примеру: mov ax,0b000h mov es,ax mov di,8000h. При получении физического адреса сегментный регистр умножается на 16-ть и складывается с индексным регистром, т.е. получается 0b8000+00000 это равно 0b0000+08000. Для программиста такая процедура получения адреса прозрачна, т.к. это всё реализованно на аппаратном уровне. Для установленого Вами режима на каждый символ отводится два байта: сам ASCII-код и его аттрибут. На нем и остановимся: биты 0-3 определяют цвет символа, биты 4-6 определяют цвет фона, бит 7 - яркость. Цвета располагаются в таком п орядке (00=черный, темно-синий, темно-зеленый, бирюзовый, темно-красный, темно-коричневый, коричневый и 07=серый)- для фона и текста, дальше только для текста(08=темно-cерый, синий, зеленый, голубой, красный, фиолетовый, желтый и 15=белый). Попробуйте менять аттрибуты в строке mov ah,31. Строками: mov ax,3 int 10h Вы переводите видеоконтролер в 3-й текстовый видеорежим. Это нужно делать во всех DOS-примерах(из учебника) запускаемых под ХР. Если страший бит регистра AL установить в 1, то очистки экрана не будет: mov ax,83h. О видах адресации советую почитать С. Зубкова, о работе с видеоконтролерами - В. Кулакова. Эти книги Вам пригодятся в дальнейшем. Удачи! --------- Итерация от человека, рекурсия — от Бога (Питер Дойч)

Ответ отправил: Зенченко Константин Николаевич (статус: Профессор) Украина, Киев Тел.: +380979536619 Адрес: Украина г.Киев ---- Ответ отправлен: 24.09.2008, 22:00

Вопрос № 144.965

Здравствуйте уважаемые эксперты! Подскажите как можно вывести содержимое какого либо регистра: например сложить какие либо числа, а результат вывести

Отправлен: 25.09.2008, 09:03 Вопрос задал: Sharkerr (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Sharkerr! Код в приложении выводит содержимое регистра АХ в 10-ой системе. Удачи! Приложение: настраиваемся на вывод xor cx,cx mov bx,10 ;в получаем последнюю цифру числа и запоминаем в стеке isDiv: xor dx,dx div bx push dx inc cx;считаем количество цифр or ax,ax;повторяем пока не 0 jnz isDiv ;выводим число в нужном порядке в цикле isOut: pop ax or al,30h int 29h loop isOut --------- Итерация от человека, рекурсия — от Бога (Питер Дойч)

Ответ отправил: Зенченко Константин Николаевич (статус: Профессор) Украина, Киев Тел.: +380979536619 Адрес: Украина г.Киев ---- Ответ отправлен: 25.09.2008, 10:42 Оценка за ответ: 5 Комментарий оценки: Большое спасибо

Вопрос № 144.969

Уважаемые эксперты помогите решить следующую задачу. Нужно сделать резидент который бы перехватывал бы ДОС прерывание «вывод строки на экран» и копировал эту строку в файл. Я тут начал это делать но столкнулся с проблемой я не могу использовать прерывания в резиденте так как сам их перехватываю. И не уверен что правильно определил по какому адресу находится строка. Пожалуйста доведите мою программу до ума. Приложение: .286 .model tiny .code My_string db 'c:123.txt$' ; д ©« ¤«п § ЇЁбЁ My_string1 dw 40 dup(?) ; ЃгдҐа ¤«п б®еа ­Ґ­Ёп бва®ЄЁ Handle dw 0 ; yandl д ©«  Adres dw 0 ;  ¤аҐб бва®ЄЁ ORG 100h start: jmp setup ; ЏҐаҐ©¤Ґ¬ Є Їа®Ја ¬¬Ґ Ёбв ««пжЁЁ ; ђҐ§Ё¤Ґвп з бвм Їа®Ја¬¬л зЁв Ґвбп §¤Ґбм----------------------------------------------------------------------------- int9_handler PROC FAR cmp ah,9 ;Џа®ўҐаЁ¬: нв® дгЄжЁп 09h? je Ok_09 ;…б«Ё в Є, в® ¬ҐвЄг Ok_09 jmp qwe5 ;…б«Ё Ґв в® ЁбЇ®«м§гҐ¬ бв ал© ўҐЄв®а ЇаҐалў Ёп Ok_09: pushf ; ‘®еа Ё¬ ॣЁбва д« Ј®ў pusha ; c®еа ­Ё¬ бва®Єг ў ЎгдҐаҐ My_string1 push ds push cs ;Ђ¤аҐб бва®ЄЁ ¤®«¦Ґ­ Ўлвм ў DS:DX pop ds mov cx,40 ; гбв ­®ўЁ¬ бзҐвзЁЄ mov si,0 ; Ё­¤ҐЄб  ¤аҐб  ­  ­®«м lea BX, My_string1 ; ў Bx  ¤аҐб ЎгдҐа  mov Adres, dx ;  ¤аҐб бва®ЄЁ ў DX poperlo: ; жЁЄ« Є®ЇЁа®ў ­Ёп ў ЎгдҐа mov ax,[adres+si] ; ў  е 2 бЁ¬ў®«  Ё§ бва®ЄЁ MOV WORD PTR [BX], ax ; ў ЎгдҐа 2 бЁ¬ў®«  inc bx ; Є б«Ґ¤гойЁ¬ inc bx ; 2 Ў ©в ¬ inc si inc si loop poperlo pop ds ;ў®бв ­®ўЁ¬ DS ;®вЄалў Ґ¬ д ©« ¤«п §aЇЁбЁ mov ax,3d02h ;ЋвЄалў Ґ¬ д ©« ¤«п звҐЁп Ё § ЇЁбЁ mov dx,offset My_string ;€¬п ®вЄалў Ґ¬®Ј® д ©« ў DX int 21 mov HANDLE,AX ;б®еа­Ё¬ ­®¬Ґа д ©«  mov ax,4200h ;“бв ­®®ўЁ¬ гЄ § вҐ«м ­  Є®Ґж д ©«  mov al,02h ; xor cx,cx ;ЋЎг«Ё¬ ॣЁбвал xor dx,dx ; MOV BX,HANDLE int 21 ; § ЇЁбм ў д ©« mov ah,40h ;‡ ЇЁиҐ¬ ў д ©« Є®¤ ¤«Ё®© mov cx,80 ; 80 бЁ¬ў®«®ў lea dx, My_string1 ; ЎгдҐа ®вЄг¤ ў®§м¬Ґ¬ еў®бв int 21 ;§ Єа®Ґ¬ д ©« ¤«п з⥨п mov ah,3Eh ;‡ § Єа뢥¬ дa©« MOV BX,HANDLE ;Ќ®¬Ґа дa©«a int 21 popa popf qwe5: jmp cs:[old_interrupt9] ; ЏҐаҐ©¤Ґ¬ Є бвa஬㠮Ўа Ў®взЁЄг INT 09h old_interrupt9 DWORD ? int9_handler ENDP end_ISR label BYTE ; ------------- (Љ®Ґж १Ё¤Ґв®© з бвЁ Їа®Ја ¬¬л) -------------------------------------------------- setup: mov ax,3521h ; ЋЇаҐ¤Ґ«Ё¬ §­ зҐЁҐ бв а®Ј® ўҐЄв®а INT 09h int 21h mov word ptr old_interrupt9,bx ; ‘®еа­Ё¬ ҐЈ® ў ЇҐаҐ¬Ґ®© mov word ptr old_interrupt9+2,es mov ax,2521h ; “бв ­®ўЁ¬ ­®ўл© ўҐЄв®а ЇаҐалў ­Ёп INT 09h mov dx,offset int9_handler int 21h mov ax,3100h ; ‡ ўҐаиЁ¬ Їа®Ја ¬¬г Ё ®бв ўЁ¬ ҐҐ з бвм १Ё¤Ґв® ў Ї ¬пвЁ mov dx,OFFSET end_ISR ; ‘¬ҐйҐЁҐ Є®­ж  १Ё¤Ґв®© з бвЁ mov cl,4 shr dx,cl ; Џ®¤Ґ«Ё¬ ҐЈ® ­  16, зв®Ўл г§­ вм ¤«Ёг ў ЇaаaЈаaдaе inc dx ; ЋЄагЈ«Ё¬ зЁб«® Ї а Ја д®ў ў Ў®«миго бв®а®г int 21h END start

Отправлен: 25.09.2008, 09:43 Вопрос задал: Sergik1977 (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 5)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Sergik1977! Программа в приложении. Адрес строки у Вас уже есть в паре регистров DS:DX. Неизвестно только длина строки, которая ограничена символом '$'. Именно поэтому копирование в строки в буфер лишнее, т.к. она может быть очень большой, а это может привести к сбою в работе Вашего резидента. Удачи! Приложение: .286 model tiny code ORG 100h start: jmp setup; Перейдем к программе исталляции ; Резидетя часть прогрммы начитается здесь My_string db 'c:123.txt',0; файл для записии Handle dw ?;handl файла new21 PROC FAR cmp ah,9;Проверим: это фукция 09h? je Ok_09;Если т к, то метку Ok_09 db 0eah old21h_o dw ? old21h_s dw ? ;обработчик Ok_09: pushf;Сохраним регистр флагов pusha ;запоминаем адрес строки push ds push dx ;определяем длину строки mov si,dx xor cx,cx cld ;поиск символа "$" CheckString: lodsb inc cx cmp al,'$' jnz CheckString ;заопминаем длину строки push cx;save string length переходим в свой сегмент данных push cs pop ds ;открываем файл для зaписи mov ax,3d02h;Открыв ем ф йл для чтеия и з писи mov dx,offset My_string;Имя открыв емого ф йл в DX ;аналог INT 21h pushf call dword ptr cs:[old21h_o] ;устанавливаем указатель в конец файла mov HANDLE,AX;сохрним номер файла mov bx,ax mov ax,4202h;Устаноовим указатель на коец файла xor cx,cx;Оиулим регистры xor dx,dx ;аналог INT 21h pushf call dword ptr cs:[old21h_o] ;запись в файл mov ah,40h;Запишем в файл код длиой mov bx,HANDLE ;востановим длину строки и её адрес pop cx pop dx pop ds ;аналог INT 21h pushf call dword ptr cs:[old21h_o] ;переходим на свой сегмент push ds push cs pop ds mov ah,3Eh; закрывем фaйл MOV BX,HANDLE;Номер фaйлa ;аналог INT 21h pushf call dword ptr cs:[old21h_o] ;востанавливаем регистры и возвращаемся в старый обработчик pop ds popa popf jmp dword ptr cs:[old21h_o] new21 ENDP ;------------- (Коец резидетой части программы) setup: mov ax,3521h; Определим значеие старого вектор INT 21h int 21h mov old21h_o,bx;Сохрним его в перемеой mov old21h_s,es mov ax,2521h;Установим новый вектор прерывания INT 21h mov dx,offset new21 int 21h ;оставить резидентной mov dx,offset setup int 27h END start --------- Итерация от человека, рекурсия — от Бога (Питер Дойч)

Ответ отправил: Зенченко Константин Николаевич (статус: Профессор) Украина, Киев Тел.: +380979536619 Адрес: Украина г.Киев ---- Ответ отправлен: 25.09.2008, 12:49 Оценка за ответ: 5

Вопрос № 145.023

нужно сделать 3 легких задачки, в ассемблере ни алё помогите пожалуйста! 1 - Если введены символы с 0-9 вывести соощение "ето цифра!" 2 - Ввести символ, занулить в его коде 0,3,5,7 биты и вывести символ который получился 3 - Найти сумму положительных элементов массива. Элементы байты, кол-во 7 Заранее большое человеческое спасибо!

Отправлен: 25.09.2008, 17:09 Вопрос задал: Timeisover (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Boriss Здравствуйте, Timeisover! В приложении решение Вашей задачи. Если что не будет понятно - спросите в минифоруме этого вопроса Приложение: .model tiny code org 100h start: mov ax, 3 int 10h lea dx, msg_new_symbol mov ah, 9 int 21h mov ah, 1 int 21h ; функция DOS для ввода символа с ожиданием ввода cmp al, '0' jb @@1 cmp al, '9' ja @@1 lea dx, msg_yes mov ah, 9 int 21h @1: lea dx, new_line mov ah, 9 int 21h lea dx, msg_new_symbol mov ah, 9 int 21h mov ah, 1 int 21h lea dx, new_line mov ah, 9 int 21h and al, mask int 29h ; вывод символа в AL lea dx, new_line int 21h int 21h xor bx, bx ; это будет сумма lea si, mass cld ; будем использовать строковую инструкцию LODSB - очень удобно mov cx, 7 ; число элементов массива @2: lodsb ; новый элемент массива в AL cbw CALL writeDEC or ax, ax js @@3 ; переход, если установлен знаковый бит cbw ; преобразование байта в слово add bx, ax @3: LOOP @@2 lea dx, msg_summ mov ah, 9 int 21h mov ax, bx CALL writeDEC lea dx, new_line mov ah, 9 int 21h lea dx, PressKey mov ah,9 int 21h xor ax, ax int 16h int 20h msg_new_symbol db 'Введите символ: $' msg_yes db ' - это цифра!',13,10,'$' msg_summ db 13,10,'Сумма положительных элементов массива равна $' new_line db 13,10,'$' mask db 01010110b mass db 1, -2, 3, 4, 12, -10, 3 writeDEC proc ;процедура вывода десятичного представления числа со знаком ; Ожидется слово для вывода в AX push ax push bx push cx push dx push di ; сигнал отрицательного знака xor cx, cx mov bx, 10 xor di, di ; 0 = положительное or ax, ax jns @@next_digit ; переход, если не отрицательное inc di neg ax @next_digit: xor dx, dx div bx push dx inc cx or ax, ax jnz @@next_digit mov dx, count_of_digits sub dx, cx or di, di jz @@_zer dec dx @@_zer: push cx mov cx, dx mov al, ' ' @@next_space: int 29h loop @@next_space pop cx or di, di jz @@next_char mov al, '-' int 29h @next_char: pop ax add al, '0' int 29h loop @@next_char pop di pop dx pop cx pop bx pop ax ret writeDEC endp count_of_digits dw 8 ; обязательное число знаков - недостающие выведутся пробелами PressKey db 'Press any key ...$' end start --------- Вывод - то место в тексте, где вы устали думать

Ответ отправил: Boriss (статус: Профессор) Россия, Саранск Организация: Мордовский госуниверситет, Саранск, Факультет Электронной Техники WWW: Программирование на Паскале ---- Ответ отправлен: 27.09.2008, 20:58

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