IPB
ЛогинПароль:

> -=FAQ=-
сообщение
Сообщение #1


Lonely_Raven
****

Группа: Пользователи
Сообщений: 640
Пол: Мужской

Репутация: -  1  +


F A Q

Содержание
Все примеры в COM-формате


--------------------
Программа делает то что вы ей приказали а не то что бы ВАМ хотелось бы.
МЕРФИ
---------------------
RTFM - Read the fucking manual
---------------------
http://www.livejournal.com/users/lonley_raven/
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Lonely_Raven
****

Группа: Пользователи
Сообщений: 640
Пол: Мужской

Репутация: -  1  +


Вывод точки средствами BIOS


.8086
.MODEL TINY
.CODE
ORG 100h

START:
mov ax,13h ; Устанавливаем режим 320х200х256цв
int 10h

; Вывод пикселя
; AH = 0C
; AL = цвет (XOR'ится с текущим значением пикселя, если бит 7=1)
; BH = номер видеостраницы
; CX = номер столбца (с нуля)
; DX = номер строки (с нуля)

mov ah,0Ch ; В данном случае: вывод пикселя, на видеостраницу #0, со
mov bh,0 ; стартовым смещением от начала экрана 0,0
lea si,Char_A ; DS:[SI] - адрес матрицы пикселей
xor cx,cx
mov dx,cx ; DX=CX=0
cld ; Инкремент SI

NextStroke:
lodsb ; Получаем в AL очередной байт матрицы
inc cx ; Увеличиваем X
int 10h ; Обращаемся к BIOS
cmp cx,StrokeLength ; Проверяем конец строки
jne NextStroke
xor cx,cx ; Заново обнуляем CX
inc dx ; Инкремент по Y
cmp dx,StrokeNumber
jne NextStroke

mov ah,0 ; Ожидаем нажатия клавиши
int 16h
mov ax,4C00h ; Завершаем работу
int 21h

StrokeLength dw 12 ; Длина строки
StrokeNumber dw 12 ; Количество строк

; Массив данных "ASM"
; 1 2 3 4 5 6 7 8 9 10 11 12
Char_A db 00,00,15,15,00,00,00,15,15,00,00,00; 1
db 00,15,00,00,15,00,15,00,00,15,00,00; 2
db 00,15,00,00,15,00,15,00,00,00,00,00; 3
db 00,15,15,15,15,00,00,15,15,00,00,00; 4
db 00,15,00,00,15,00,00,00,00,15,00,00; 5
db 00,15,00,00,15,00,15,00,00,15,00,00; 6
db 00,15,00,00,15,00,00,15,15,00,00,00; 7
db 00,00,00,14,00,00,00,14,00,00,00,00; 8
db 00,00,00,14,14,00,14,14,00,00,00,00; 9
db 00,00,00,14,00,14,00,14,00,00,00,00; 10
db 00,00,00,14,00,00,00,14,00,00,00,00; 11
db 00,00,00,14,00,00,00,14,00,00,00,00; 12
END START



--------------------
Программа делает то что вы ей приказали а не то что бы ВАМ хотелось бы.
МЕРФИ
---------------------
RTFM - Read the fucking manual
---------------------
http://www.livejournal.com/users/lonley_raven/
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Shadow   -=FAQ=-   9.05.2003 6:53
Shadow   Re: -=FAQ=-   9.05.2003 7:04
Shadow   Re: -=FAQ=-   9.05.2003 7:09
Shadow   Re: -=FAQ=-   9.05.2003 7:11
Shadow   Re: -=FAQ=-   9.05.2003 7:12
GLuk   Re: -=FAQ=-   11.05.2003 18:30


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 19.11.2019 2:36
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name