Помощь - Поиск - Пользователи - Календарь
Полная версия: Вывод строки на экран 2 способами
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Ассемблер
Neon6868
Задание: Написать на ассемблере IBM PC 2 программы вывода строки на экран:
1)прямой записью в видеопамять
2)с использованием функций BIOS.
Направление строки снизу вверх, в цветности задать цвет фона, символы вывести разными цветами.

Проверьте плиз правильно работают программы или нет? Я сам проверить не могу. У меня на виндусе вообще ничего не выводится, могу проверить только на линуксе в универе. У меня есть сомнения, что вторая программа не правильно работает! Заранее спасибо! smile.gif

Программа №1.

 model small
  stack 100h
  .data
  message db 'Operacionnaya sistema'
  .code
  main:
  mov ax,@data
  mov ds,ax
  mov ax,0B800h
  mov es,ax
  mov di,0C8Ah
  mov si,0
  mov ah,00010000b
  mov cx,21
m1:
  mov ax,es:[di]
  mov al,message[si]
  add ah,00000001b
  inc si
  mov es:[di],ax
  sub di,160
  loop m1
  mov ax,4c00h
  int 21h
  end main


Программа №2.

 model small
  .stack 100h
  .data
  message db 'Operacionnaya sistema'
  .code
main:
  mov ax,@data
  mov ds,ax
  mov cx,1
  mov si,1
  mov dh,21
  mov dl,5
  mov bh,0
m1:
  mov ah,02h
  int 10h
  mov ah,09h
  mov al,message[si]
  add bl,00000001b
  int 10h 
  inc si
  dec dh
  inc bl
  loop m1
  mov ax,4c00h
  int 21h
  end main
xds
Программа №1 работает в Windows после небольших дополнений (под словом "линукс" имелся в виду DosBox? smile.gif) :
 model small
  stack 100h
  .data
  message db 'Operacionnaya sistema'
  .code
  main:

  mov ax,3		;! установка видеорежима 80 x 25
  int 10h		;!

  mov ax,@data
  mov ds,ax
  mov ax,0B800h
  mov es,ax
  mov di,0C8Ah
  mov si,0
  mov ah,00010000b
  mov cx,21
m1:
  mov ax,es:[di]
  mov al,message[si]
  mov ah,70h
  inc si
  mov es:[di],ax
  sub di,160
  loop m1

  mov ah,8		;! задежка перед выходом до нажатия любой клавиши
  int 21h		;!

  mov ax,4c00h
  int 21h
  end main

xds
Второй вариант я переделал:
model small
.186

.stack 2048

.const
msg	db 'Operating system',0

.code
start:
	mov ax,@data
	mov ds,ax

	lea si,msg	;ds:si -> msg
	cld		;lodsb будет увеличивать si

	mov dh,22	;начальная строка
	mov dl,5	;начальная колонка
	mov bl,1	;начальный цвет

put_char:
	cmp byte ptr [si],0	;провека на конец строки
	je exit

	mov ah,2	;установка положения курсора
	int 10h

	xor bh,bh	;ah = аттрибут на экране в позиции курсора
	mov ah,8	
	int 10h
	
	shr ah,4	;ah = цвет фона

	cmp bl,ah	;не допускаем слияния символа с фоном
	jne load_char
	inc bl

load_char:
	lodsb		;очередной символ: al = ds:[si], si = si + 1

	mov bh,ah	;вывод символа
	mov cx,1
	mov ah,9
	int 10h

	dec dh		;следующая строка
	inc bl		;следующий цвет
	and bl,0Fh
	jmp put_char

exit:
	mov ah,8	;ждем нажатия любой клавиши
	int 21h
	mov ax,4C00h	;выход
	int 21h

end start
Neon6868
Спасибо за помощь! А нельзя мне сказать где во 2 программе ошибки и помочь их исправить? Просто я хочу понять что я делал не так, да и твою программу еще понять надо, а я в ассемблере пока не очень разбираюсь.
xds
Основные ошибки:
1. cx одновременно используется и как счетчик цикла, и как параметр функции вывода символа (int 10h, ah = 2); в итоге, сделали cx = 1 - выводить один экземпляр символа, а про loop забыли.
2. Забыли сохранять цвет фона (по условию). Перед выводом символа надо узнать атрибут в позиции вывода - функция int 10h, ah = 8.

В моем варианте для чтения строки используются команда lodsb, которая делает следующее:
al = ds:[si], если df = 0, то si = si + 1 иначе si = si - 1.

Значение флага направления df задается командами cld и std:
cld: df = 0;
std: df = 1.


В моем варианте признаком конца строки является нулевой байт.

Вообще, достаточно подробно откомментировано - читай по порядку и разбирайся.
Jil
А можете если не трудно.сказать что и где нужно исправить что бы как в видео режиме так и в биосе что бы цвет фона был цветом символов???=)
Федосеев Павел
Покажи, что ты делаешь.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.