Стандартные модули: Модуль Crt

Модуль Crt используется для работы с экраном в текстовом режиме.

Текстовый режим характеризуется количеством строк на экране и количеством символов в каждой из них. По умолчанию устанавливается режим 25х80 (25 строк по 80 символов), при этом и строки, и символы нумеруются с единицы. Ну, а поле 25х80 строк можно представить так:

При выводе на экран каждого символа можно задать его цвет, яркость и цвет фона. Модуль Crt содержит следующие процедуры, позволяющие управлять этими параметрами:

LowVideo – устанавливает режим минимальной яркости выводимых на экран символов;

NormVideo – устанавливает режим нормальной яркости выводимых на экран символов;

HighVideo – устанавливает режим максимальной яркости выводимых на экран символов;

TextColor(c) – устанавливает цвет символов c, все возможные значения приведены в табл. 6.1;

TextBackGround(c) – устанавливает цвет фона c, который может принимать значения от 0 до 7.

Цветовые константы

Каждый следующий символ выводится с заданными параметрами до тех пор, пока они не будут изменены повторным применением описанных процедур.

Для того чтобы вывести следующий символ не прямо за предыдущим (как обычно и происходит), а в любой указанной позиции экрана, необходимо переместить курсор в эту позицию. Для этого используется процедура GotoXY:

GotoXY(x,y) – перемещает курсор в позицию с координатами (x,y).

Как Вы уже знаете, очистку экрана осуществляет функция ClrScr.

ClrScr – выполняет очистку экрана в текстовом режиме и устанавливает курсор в левый верхний угол.

Кроме того, в модуле Crt содержатся процедуры и функции для управления чтением клавиатуры и звуковым генератором.

KeyPressed – функция, которая возвращает значение true, если была нажата какая-нибудь клавиша, и false в противном случае;

ReadKey – функция, которая считывает код символа с клавиатуры;

Delay(t) – вызывает задержку выполнения программы на заданное число миллисекунд t;

Sound(f) – включает звук с частотой f;

NoSound – выключает звук.

Работа со звуком происходит по схеме Sound-Delay-NoSound.

В модуле Crt также находятся некоторые служебные переменные, в которых содержится информация, необходимая для управления выводом на экран. Например, для нас представляет интерес переменная TextAttr, которая содержит цветовые атрибуты текста – цвет фона и цвет символов:

TextAttr:=<цвет-фона>*16+<цвет символа>