Автор файлов: Назаров Денис, e-mail: nazar_ov@mail.ru
Circle - от центра к краю экрана ползут круги, причём цвет круга "ползёт" вместе с ним. ellipse, ellipsec - рисуют что-то вроде 3D модели шара. gar - отовсюду ползут увеличивающиеся разноцветные круги, в итоге образуютузор. gu - символ "#" убегает от "*", догнать невозможно. Перемещение: a-влево, s-вниз, w-вверх, d-вправо Описание модуля GL.tpu (Good Life). Модуль GL включает в себя 2 (пока) процедуры для упрощения жизни программиста. Процедура initgr; инициализирует графический режим со стандартными параметрами: driv:=detect; reg:=0; initgraph(driv,reg,''); использование процедуры initgr ускоряет и упрощает написание программы. Процедура delaU([значение задержки в секундах (от 0.1 с шагом в 0.1)] : real) - Аналогична процедуре delaY, отличие delaU только в том, что значение задержки задаётся в секундах (от 0.1 с шагом в 0.1). пример: program delau; uses gl; begin delau(0.8); end. program delau; uses gl; begin delau(3); end.В архиве имеется исходники программ. Скачать