Паскаль - Урок 12: Использование модуля CRT

Паскаль - Урок 12: Использование модуля CRT

Итак, уважаемые читатели ZedPost.Ru, продолжаем наши уроки по паскалю. В прошлый раз мы узнали о том, что такое двумерные массивы, сегодня мы узнаем о моудле CRT. Подробнее далее...

Что такое модуль CRT? Это модуль в Паскаль, который может выводить в отдельном диалоговом окне цветные символы на цветном фоне. Также с помощью него можно настроить размер этого окна, переместить курсор в определённую точку экрана, а также очищать это диалоговое окно.
Модуль CRT в паскале поддерживает 16 цветов, нумерация которых начинается с 0 (от 0 до 15 включительно). Также можно просто прописывать названия цветов не используя цифры.
Для того чтобы использовать модуль CRT его нужно подключить с помощью следующей строчки:

uses crt; 


Для того чтобы закрасить фон нужно использовать такую команду:

textbackground (2); //Фон залит зелёным цветом


Надо сказать, что textbackground следует применять вместе с процедурой очистки экрана, которая описана ниже.

Для очистки экрана (1) и установки позиции курсора (2) используются соответственно следующие команды:

clrscr; // (1) – очистка курсора
gotoxy (9,6); // (2) –Курсор установлен в точку (9;6)


Цвет текста определяет процедура:

textcolor (13);


Для временной задуржки существует процедура delay

delay (1500);


Запускать программу в Pascal с использованием модуля CRT нужно при помощи клавиш Shift+F9.

С помощью этого модуля игры для компьютера, телефона не напишешь. Для windows phone 7 игры написаны на совсем другом языке программирования.

Пример программы на Паскаль с использованием модуля CRT:

uses //Подключение модуля
crt;

begin
textbackground (2); //Перекраска фона в зелёный
clrscr; //Очистка экрана и применени цвета фона
textcolor (13); //Текст будет розовым цветом
gotoxy (9,6); //Курсор будет перемещён в точку (9;6)
write ('Hi, people!'); //Вывод текста
delay (1500); //Задержка
textbackground (3); //Фон будет салатного цвета
clrscr; //Очистка экрана
gotoxy (20,20); //Курсор перемещён в точку (20;20)
textcolor (red); //Цвет текста - красный
write ('Hi!'); //Вывод текста
readln;
end. //Конец программы


Этот модуль должен работать во всех программах - компиляторах.

Скачать пример паскаль с модулем CRT: modcrt.pas

Новости компьютерного железа на Hardliner
Автор: Zed от 2012-10-19 20:26:26   Просмотров: 26145

Теги: уроки урок CRT Паскаль Pascal Uses исходник