close

Вход

Забыли?

вход по аккаунту

?

модуль CRT

код для вставки
программирование паскаль, графика
Урок 1: «Модуль CRT. Назначение и возможности»
Цель: познакомить с назначением модуля CRT, научить применять модуль CRT для
создания программ, воспитывать у учащихся корректное отношение к полученным
знаниям.
План
1) Организационный момент. Перекличка
2) Сообщение нового материала.
3) Практическая часть.
4) Домашнее задание
назначение модуля CRT;
Ученик должен знать:
Ученик должен уметь:
применять модуль CRT
Краткий план-конспект
В модуле CRT собраны процедуры и функции, управляющие экраном, клавиатурой и
звуковым динамиком.
Название CRT – английское сокращение от «электронно-лучевая трубка» говорит о том,
что большинство его процедур относится к выводу на экран. В модуле собраны
процедуры и функции, дополняющие основные возможности ввода-вывода (нам знакомы
процедуры WRITE, READ из модуля SYSTEM). Основное отличие новых процедур –
возможности вывода в произвольную позицию экрана и управление цветом фона и
символов.
Для того, чтобы стали доступны указанные в таблице функции и процедуры,
необходимо явно указать модуль CRT командой
USES CRT;
Работа с клавиатурой. Работа с экраном.
Текстовые режимы.
Процедуры вывода на экран, приведенные в модуле CRT, относятся только к
текстовым режимам работы. В текстовом режиме поле экрана разбито на строки и
колонки, и в каждую позицию поля может быть выведен только один символ кодовой
таблицы ASCII. Текстовый режим работы – наследие эпохи ЭВМ с малыми ОЗУ, когда
актуальной была задача экономии памяти, - активно вытесняются графическими
режимами. Простота программирования, высокое быстродействие и надежность
интерфейсов на основе текстовых режимов позволяют использовать их во многих
деловых приложениях, не требующих графического вывода информации.
Координаты экрана, курсор и вывод.
При подключенном модуле CRT для вывода на экран можно использовать
обычные процедуры WRITE и READ. Однако следует отметить, что модуль CRT
применяет эти функции иначе, чем модуль System. Модуль CRT непосредственно
записывает данные в видеопамять компьютера, в то время как модуль System использует
для этого программы BIOS. Поэтому вывод на экран с использованием модуля CRT
выполняется быстрее, чем без него.
1
Очередной вывод текста на экран начинается с текущей позиции курсора на
экране. Колонки и строки пронумерованы: номер колонки, где находится курсор, можно
получить функцией WhereX, а номер строки - функцией WhereY. Т. о., пара целых
чисел X и Y задает координаты курсора на поле монитора.
Ось X – горизонтальная, слева направо, а ось Y направлена вертикально и
сверху вниз.
Верхний левый угол имеет координаты (1,1).
Курсор перемещается в позицию с координатами X, Y процедурой GoToXY(X,Y).
X
Y
Работа с текстом. Модуль CRT
Управление цветом.
Установку цвета символов и фона можно выполнить процедурами TEXTCOLOR и
TextBackGround. Эти функции определяют цвет символа и фона только для тех позиций
экрана, в которые выводится, после соответствующей установки стиля, текст.
Новые установки цвета символов и фона не влияют на ранее выведенный текст. В
текстовых режимах цвет символов и фона определяется константами (см.
ПРИЛОЖЕНИЕ).
Цвет символа устанавливается процедурой , аргументом которой может быть одна
из указанных констант или переменных типа Word. Если к константе цвета прибавить
константу Blink=128, выводимые символы будут мерцать.
Цвет фона ограничен значениями от 0 до 7.
С помощью процедуры TEXTBACKGROUND(COLOR :);можно устанавливать различные цвета экрана или
текстового окна. Допустимые значения переменной Color колеблются от 0 (черный цвет) до 7 (белый цвет).
Для установления цветов символов служит процедура TEXTCOLOR (COLOR : BYTE);
где значение цвета изменяется от 0 до 15, а мерцание символов устанавливается значением 128.
! Цвет фона мерцать не может.
Константа
BLACK
BLUE
GREEN
CYAN
RED
MAGENTA
BROWN
DARKGRAY
Byte
0
1
2
3
4
5
6
8
Значение
Черный
Темно-синий
Темно-зеленый
Бирюзовый
Красный
Фиолетовый
Коричневый
Темно-серый
LIGHTBLUE
LIGHTGREEN
LIGHTCYAN
LIGHTRED
LIGHTMAGENTA
YELLOW
WHITE
BLINK
9
10
11
12
13
14
15
128
Голубой
Салатовый
Светло-бирюзовый
Розовый
Малиновый
Желтый
Белый
Мерцание
2
Урок 2: «Модуль CRT. Окно. Звук »
Управление звуком динамика.
Обязательным системным средством РС является генератор, к которому
подключен встроенный динамик. Подобный звуковой канал способен генерировать
только одноканальный звук заданной частоты. В модуле CRT есть две процедуры
управления встроенным динамиком.
Процедура Sound (частота в герцах) включает звук динамика. Звук будет
продолжаться до тех пор, пока не будет выполнена процедура NoSound.
! Выключение звука – обязательная часть программы, т. к. иначе звук будет
продолжаться и после выполнения программы.
Процедура Delay(время в миллисекундах) приостанавливает выполнение
программы на время, заданное в миллисекундах. (Эта процедура может применяться в
программах, если необходимо задержать на некоторое время звук или выводимую на
экран информацию).
Пример 1, демонстрирующий простейшие звуки, которые можно извлечь из динамика
компьютера с помощью процедур Sound, NoSound, Delay.
Звук занятого телефона
Пример 2. Последовательно извлекаются звуки частот от 100 Гц до 3000 Гц, и обратно (в
результате получается звук, напоминающий звучание сирены)
Окна.
Во многих приложениях требуется выводить текст в пределах некоторой
прямоугольной области экрана – окна, при этом отсчитывать координаты от края экрана
бывает неудобно. Для решения таких задач процедурой
Window(X1,Y1,X2,Y2) устанавливается окно для вывода текста.
Здесь целые числа координаты верхнего левого, а - нижнего правого углов экрана.
В установленном текущем окне координаты курсора отсчитываются от его верхнего
левого угла. Процедура ClrScr очищает экран только в пределах текущего окна.
Процедуры отмена окна не предусмотрены. Текущее окно отменяется введением нового.
Для того, чтобы вернуться к работе в пределах всего экрана, подается команда
Window(1,1,80,25).
Функции
Назначение
KeyPressed
Определяет, была ли нажата клавиша на клавиатуре
Function KeyPressed : boolean;
ReadKey
Читает значение нажатой клавиши
Function ReadKey : char;
TextBackground
Определяет цвет фона
Procedure TextBackground(Color : byte);
TextColor
Определяет цвет выводимых символов
Procedure TextColor (Color : byte) ;
3
TextMode
Определяет текстовый режим
Procedure TextMode (Mode : Word);
CIrScr
Очищает экран и устанавливает курсор в левый верхний угол экрана
Procedure CIrScr;
Window
Определяет текстовое окно на экране
Procedure Window (XI, Yl, X2, Y2 : Byte);
WhereX
Возвращает значение горизонтальной координаты
Function WhereX : Byte;
WhereY
Возвращает значение вертикальной координаты Function WhereY : Byte;
GotoXY
Переводит курсор в указанное место Procedure GotoXY(X, Y : Byte);
DelLine
Уничтожает всю строку с курсором Procedure DelLine;
InsLine
Вставляет строку Procedure InsLine;
CIrEol
Стирает часть строки от курсора до правой границы Procedure CIrEol;
HighVideo
Устанавливает повышенную яркость символов Procedure HighVideo;
NormVideo
Устанавливает нормальную яркость символов Procedure NormVideo;
LowVideo
Устанавливает пониженную яркость символов Procedure LowVideo;
Звук
Delay
Вводит задержку в миллисекундах Procedure Delay (T : Word);
Sound
Заставляет динамик звучать с нужной частотой Procedure Sound (F : Word);
NoSound
Отключает динамик Procedure NoSound;
4
Автор
ovsianik
Документ
Категория
Образование
Просмотров
21
Размер файла
68 Кб
Теги
crt, графика, паскаль
1/--страниц
Пожаловаться на содержимое документа