Псевдографика. Пример

6:18 пп | Программирование Автор: prepod

В курсовой работе 10 класса «Программирование тестовой оболочки» необходимо добавить в программу псевдографическую заставку.
Если дать волю фантазии, то вполне можно создать оригинальную заставку. Даже целый интерактивный псевдографический мультфильм:)
Просто для иллюстрации возможностей предлагаю несколько вариантов псевдографических эффектов

Случайные символы появляются в случайных местах екрана

Program N2;
uses crt;
var
i: byte;
BEGIN
randomize;
textbackground (0);
clrscr; {- первоначальная очистка экрана и заливка черным цветом}

for i:=1 to 100 do
       begin
          GoToXY (random(80),random(24));
          textcolor (random(16));
          writeln (chr (random(255)));
          delay (100);

       end;
writeln ('Программа завершена');
END.
VN:F [1.9.22_1171]
Rating: 10.0/10 (1 vote cast)
VN:F [1.9.22_1171]
Rating: +1 (from 1 vote)
Псевдографика. Пример , 10.0 out of 10 based on 1 rating

Related posts:

  1. Псевдографика. Или как можно рисовать в текстовом режиме
  2. Как создавать окна в текстовом режиме работы монитора
  3. Оператор цикла
  4. Подпрограммы для обработки числовых массивов
  5. Использование подпрограмм для работы с окнами в Pascal