Паскаль - Урок 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

Дата: 2012-10-19 20:26:26   Просмотров: 64061

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