More Related Content
What's hot (20)
Viewers also liked (12)
Similar to «Анимация в PascalABC» (20)
«Анимация в PascalABC»
- 1. Лабораторная работа по теме: «Анимация в PascalABC» Цели Закрепить знания о командах языкапрограммирования Pascal; Отработать навыки использования операторов языка Pascalдля построения графическихизображений; Проверить своинавыки работы в средеPascalABC. План 1. Организационная часть урока. 2. Постановкацелей и задач урока, а также планирование будущего результата. 3.Ознакомление с заданием и последующее его выполнение. 4. Завершение и сохранение работ. Теоретический материал Uses GraphABC; SetWindowWidth(w) - Устанавливает ширину графического окна; SetWindowHeight(h) - Устанавливает высотуграфического окна; SetPixel(x,y,color)- Закрашивает одинпиксел с координатами(x,y) цветом color Line(x1,y1,x2,y2) - рисует отрезокс началом в точке (x1,y1) и концом в точке (x2,y2). SetPenColor(color)- устанавливает цвет пера, задаваемый параметром color. Rectangle(x1,y1,x2,y2)- рисует прямоугольник, заданный координатамипротивоположныхвершин (x1,y1) и (x2,y2). FloodFill(x,y,color)- заливает область одного цвета цветом color, начиная с точки (x,y). Circle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом r.
- 2. Arc(x,y,r,a1,a2)- Рисует дугу окружностис центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующимиуглы a1 и a2 с осьюOX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовойстрелки). LockDrawing - Блокирует вывод в графическоеокно, осуществляя рисованиетолько во внеэкранном буфере. Redraw - Перерисовываетокна вывода при заблокированном выводев графическоеокно. SetBrushColor(color) - благодаря этойкоманде, мы заливаем нашу фигуру полностьюв нужный нам цвет. Пример анимации: uses GraphABC; var i: integer; begin lockDrawing; for i:=1 to 500 do //для i от 1 до 500 делать begin ClearWindow; //очистка экрана SetBrushColor(clGreen); //заливка фигуры Circle(50+i,50,30); //рисование окружности Redraw; Sleep(1); //скорость движения окружности end; end. Практическая работа Необходимо написать код программы, используя различныекоманды для создания графическихобъектов и анимации, для получения анимированного изображения. Итогом работы будет готовая открыткак 8 марта. На выполнение задания отводится время до конца урока. После истечения времени все работы сохраняются в соответствующуюпапку (в имени файла указать фамилию и тему, например: Иванов_8 ).
- 3. Критерии оценки результатов выполнения лабораторной работы «5» - ставится в том случае, если задание выполнено, добавленне один элемент, используется цвет и различныеграфические примитивы, создана анимация, движения объектов. «4» - ставится в том случае, если задание выполнено, верно, с использованием различныхграфическихпримитивов, анимации, но в черно- белом варианте. «3» - ставится в том случае, если задание выполнено с применением самых простыхграфическихпримитивов. «2» - ставится в том случае, если ученик не использовалразличные возможности построения изображенийв среде PascalABC.