Разработка анимационного проекта «Город»

Подготовка эскиза работы

Чтобы создать графический рисунок с помощью языка программирования Pascal необходимо заранее подготовить эскиз. Для данной работы эскиз был выбран из сети Интернет. Рисунок выполнен в «мультипликационном» стиле. Подобранный эскиз показан ниже на рисунке 1.

Рисунок 1. Эскиз работы Данный эскиз был выбран для курсовой работы, так как с его помощью можно показать все возможности графики языка Pascal. Подобранный прообраз будущего проекта очень красочный и необычный, в нем можно дать волю своей фантазии и немного дополнить проект анимацией.

Разработка эскиза на Pascal

В курсовой работе была поставлена цель — с помощью анимации реализовать движение облаков, но сначала необходимо создать фоновую картинку города. На картинке несколько объектов, изображение которых в принципе схоже. Поэтому достаточно рассмотреть, как выполняется один из «домиков» .

Например, «домик 7» на рисунке изображен в центре.

Рисунок 2. «Домик 7» .

Чтобы запрограммировать данный объект следует начать с рисования боковых границ. Эти границы рекомендуется выполнить с помощью команды line (x1,y1,x2,y2):

line (430,400,425,310);{l.bok}.

line (425,310,440,230);

line (507,230,523,310);{p.bok}.

line (523,310,507,400);

Для того, чтобы «крыша» получилась в «сказочном» стиле используем две команды: line (x1,y1,x2,2) и ellipse (x, y,0,360,Rx, Ry).

ellipse (474,228,180,360,45,5);{krisha niz}.

line (428,228,440,195);{l.b}.

line (520,228,508,195);{p.b}.

Арка выполняется с помощью команды: ellipse (x, y,0,360,Rx, Ry). Данную команду рекомендуется использовать дважды, чтобы арка выглядела объемно и более интересно.

ellipse (465,400,360,180,25,70);{arka}.

ellipse (467,400,360,180,22,60);

Далее следует, добавить «домику» окна, и снова можно воспользоваться командой line (x1,y1,x2,2):

line (450,270,460,250);{okno1}.

line (460,250,470,270);

line (470,270,460,290);

line (460,290,450,270);

line (450,270,470,270);

line (460,250,460,290);

Для того, чтобы город выглядел красочно, можно менять цвет линий рисуемого объекта с помощью команды: setcolor (х), а также закрасить «домик» с помощью команд: setfillstyle (x, y) и floodfill (x, y, k).

setfillstyle (5,6);

floodfill (260,365,15);

Таким образом, код программы объекта «домик» будет выглядеть так:

{dom s krasnoi krishei}.

line (430,400,425,310);{l.bok}.

line (425,310,440,230);

line (507,230,523,310);{p.bok}.

line (523,310,507,400);

line (430,400,507,400);{pol}.

ellipse (474,228,180,360,45,5);{krisha niz}.

line (428,228,440,195);{l.b}.

line (520,228,508,195);{p.b}.

ellipse (475,195,180,360,35,5);{verh}.

line (450,270,460,250);{okno1}.

line (460,250,470,270);

line (470,270,460,290);

line (460,290,450,270);

line (450,270,470,270);

line (460,250,460,290);

line (480,275,470,295);{okno 2}.

line (470,295,480,310);

line (480,310,490,295);

line (490,295,480,275);

line (480,275,480,310);

line (470,295,490,295);

ellipse (465,400,360,180,25,70);{arka}.

ellipse (467,400,360,180,22,60);

Готовый рисунок предоставлен ниже:

Рисунок 3. Анимационный проект.

Дополнение проекта анимацией

Для того, чтобы выполнить анимацию нужно нарисовать объект, который будет пребывать в движении. В данной курсовой работе этим объектом является «облако». Чтобы его изобразить, используется элемент: ellipse (x, y,0,360,Rx, Ry). Далее следует занести облако в процедуру, чтобы в дальнейшем была возможность вызвать его в любом месте рисунка.

procedure oblako (x, y, z: integer);

begin.

{oblako x=200,y=50}.

setcolor (z);

ellipse (x, y,360,180,10,5);

ellipse (x+10,y, 0,90,20,5);

ellipse (x+30,y+10,260,90,5,10);

ellipse (x+20,y+20,180,360,10,5);

ellipse (x-10,y+20,180,360,20,15);

ellipse (x-30,y+10,100,270,5,10);

ellipse (x-21,y, 360,180,10,5);

setfillstyle (1,z);

floodfill (x, y+10,z);

end;

Чтобы облако начало движение, необходимо заключить его в цикл:

repeat.

for i:=1 to 300 do begin.

oblako (150+i, 70,15);

oblako (200+2*i, 30,15);

delay (10 000);

oblako (150+i, 70,9);

oblako (200+2*i, 30,9);

end;

until keypressed;

Аналогично объекту «домик 7» выполняются и другие «домики». Также анимационный проект город был дополнен «цветочками», «солнышком», а также был перемещен дом с правого угла рисунка в левый угол.