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

> Правила раздела!

1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!

 
 Ответить  Открыть новую тему 
> Ассем в паскале
сообщение
Сообщение #1


Профи
****

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

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


procedure ShowCursor;
var
regs : registers;
begin
regs.ax := какой - то адрес;
regs.cx := какой - то адрес;
intr($10, regs);
end;

procedure HideCursor;
var
regs : registers;
begin
regs.ax := какой - то адрес;
regs.cx := какой - то адрес;
intr($10, regs);
end;


Как я заметил многие используют данные операции для создания меню в паскале, объясните как эти маленькие процедурки работают.


--------------------
Цитата
Imagination is more important than knowledge.
Albert Einstein
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






У курсора, отображаемого на экране, есть так называемые начальная и конечная линии (в матрице символа). Линии отсчитываются сверху вниз, самая первая - нулевая.

Максимальное значение конечной линии зависит от видеоадаптера (для CGA = 7, для MDA/Hercules = 13, у EGA в зависимости от выбранного текст. режима может быть как 7 - в режиме шрифта 8*8, так и 13 - в режиме шрифта 8*14). Формально прерывание $10 принимает значение нижней линии до 32...

Так вот. Если начальную линию (регистр CH) установить в 0, а конечную (регистр CL) - в значение, максимальное для используемого режима, то получится блочный курсор, как после нажатия Insert. Если установить начальныю линию в 32 - то курсор не будет отображаться вообще. Ну, а остальные значения будут показывать курсор разной "толщины" на разной "высоте"...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Профи
****

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

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


то есть грубо говоря эти ассемблерские вставки изменяют форму обычного курсора на произвольную ?


--------------------
Цитата
Imagination is more important than knowledge.
Albert Einstein
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гость






Почему "грубо говоря"? Так оно и есть... При работе с меню тебе мигающий курсор просто мешает, ты же делаешь выделение элементов другим способом (другой цвет элемента, другой цвет фона)... Так что стандартный курсор просто откючается. А когда нужно запросить ввод данных у пользователя, курсор опять включают...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Профи
****

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

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


Спасибо, буду экспереминтировать!


--------------------
Цитата
Imagination is more important than knowledge.
Albert Einstein
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Иллюзия мира
***

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

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


только работать это будет только в паскале и возможно в первой дельфе, так как это доступно только 16разрядным приложениям которые работают в режиме эмуляции дос, обычным приложениям запрещено использовать прерывания.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Профи
****

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

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


И еще добавленьеце: все это счастье будет работать при установке AH=1 (или ax=$0100), а то функция у 10-го прерывания много, в CH - биты 0..3 указывают верхнюю границу, 4-5 - как он мигать будет.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


Профи
****

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

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


Малис я не уловил смысл этих слов:
Цитата
а то функция у 10-го прерывания много
. Вы не могли бы объяснить, просто очень интересно!

Сообщение отредактировано: Tan -


--------------------
Цитата
Imagination is more important than knowledge.
Albert Einstein
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9


Профи
****

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

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


Функций у 10-го прерывания много, не только установка размера курсора. Например установка видео режима (AH=0), чтение и запись точки на экран, изменение активной видео страницы. Номер функции обычно выбирается в AX.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #10


Профи
****

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

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


Наверно я запутался сейчас попробую описать моё понимание : то есть процедура hidecursos прячет нынешнее положение курсора, как я понимаю основная часть этой процедуры заключается в intr($10, regs); где 10 отвечает за невидимость (пробовал изменять на другие числа этот пераметр, курсор стал видимый). В этой же процедуре регистры AH и CH. C AH вроде всё понятно, как упомянул Малис, что работать будет при AH = 0100 , так как другие параметры этого регистра - это другие функции. То есть сейчас я уже путаюсь, AH = 0100 отвечает за невидимость или процедура intr($10, regs)? Эли intr($10, regs) это и есть interrupt, то есть то прерывание для которого мы находим функцию CH и AH? CH это получается само видоизменение ?
Цитата
в CH - биты 0..3 указывают верхнюю границу, 4-5 - как он мигать будет.
А как эти биты располагать чтобы добиться искомого результата ? Извините если что не так понял, просто хочу найти истину !

Сообщение отредактировано: Tan -


--------------------
Цитата
Imagination is more important than knowledge.
Albert Einstein
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #11


Гость






Цитата
AH = 0100 отвечает за невидимость
Ничего не отвечает за невидимость... Смотри:

Intr($10, regs) - это вызов видео-прерывания, одна из функций которого (в данном случае - № 01) отвечает за изменение формы курсора. То, что ты изменением формы курсора добиваешься его невидимости - прерыванию не важно.

Список функций $10-го прерывания (с описанием) см. здесь:
Основные средства BIOS для работы с видеоадаптерами


Цитата
А как эти биты располагать чтобы добиться искомого результата ?
Вообще-то принято, что биты в байте располагаются так:

76543210
 К началу страницы 
+ Ответить 

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

 





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