У нас: 141825 рефератів
Щойно додані Реферати Тор 100
Скористайтеся пошуком, наприклад Реферат        Грубий пошук Точний пошук
Вхід в абонемент


можна задавати в межах: по горизонталі - від 0 до 640 т., а по вертикалі від 0 до 200, 0 - 350 точок 0 - 480 точок. Для визначення положення кожної точки потрібно задати її координати. Графіка реалізується за допомогою процедур та функцій graph tpu. (модуль). Необхідно також для роботи в графічному режимі мати драйвер відповідного адаптера, який називається egavga.bgi. Цей драйвер повинен бути записаний в робочому каталозі. Для роботи в графічному режимі використовуються такі процедури: Initgraph задає графічний режим; Detectgraph повертає знач. х-р. driver і mode Setcolor (<колір)> задає колір майбутнього зображен¬ня; Setbckcolor - (<колір)> задає колір фону; Putpixel - (х,у<колір)> висвітлює точку з координита-ми [х,у] заданим кольором; Line - (xl,yl;х2,у2) молюе лінію по координатах. Lineto (x,y) - малює лінію від поточної точки до точки [х,у]. Lineral(x,y) малює лінію від поточної точки з заданими приростами. Rectangle - (xl,yl;x2,y2) малює прямокутник з заданими вершинами. Setviewport - (xl,yl;x2,y2,true) задає координати вікна, якщо значення 5 периметру приймає значення true, тотоді відбувається відсічене зобра-ження, яке попадає за межі вікна; Bar- (xl,yl;x2,y2) малює кольором прямокутник; Bar 3d- малює паралелепіпед (х1,у1;х2,у2;<глибина>, true). Circle- (х,у,К)малюе коло з центром[х,у], радіусом-R; Arc Pieslice- (х,у, <поч. кут>,<кінц. кут>,Н) малює дугу; Ellipse Setbillstyle- (х,у, <поч. кут>,<кінц. кут>,К) малює зафарбований сектор; floodfill (х,у, <поч. кут>, <кінц. кут>, <горизонт.К>, <вертик. R>) малює еліпс або дугу. Також для створення динамічного зображення я використовував оператор циклу while i<=a do begin end; Завдяки цьому оператору створюється рух створеного раніше зображення. В тексті оператора вписуються змінні – точки які малюють фігури, як ми вже знаємо площа екрану монітора складається із точок, координати яких і присвоюються змінним. В тілі оператора циклу описуються оператори разом із змінними – точками котрі і малюють фігури, у нашому випадку коло та прямокутник. Оскільки у нас рухається білий прямокутник, то в кінці оператора циклу до змінних що представляють собою перед прямокутника додається 5 одиниць, тобто 5 точок екрану монітора, а спереду прямокутника цих 5 одиниць віднімаються, що створює рух, ось як це виглядає на мові програмування Turbo Pascal: while i<=500 do begin //тут вдно що оператор 500 разів повторюється, тобто 500 разів знову малює білий прямокутник; setcolor(1); circle(320,240,239);// цей оператор малює коло; setfillstyle(1,1); floodfill(320,10,1); setcolor(0); rectangle(x1,y1,x2,y2); setfillstyle(1,0); floodfill(i,240,0); delay(6000); rectangle(x1,y1,x2,y2); setfillstyle(1,1); floodfill(i,240,1); i:=i+5; x1:=x1+5; x2:=x2+5; //тут видно як до змінних прямокутника після кожного виконаного циклу додається 5 одиниць – точок екрану; end; 3. Практична частина 3.1. Опис вхідних та вихідних даних Оскільки програма створює рух то в програмі користувачу ніяких даних непотрібно вводити, в тілі програми, дані, які я ввів обробляються за допомогою операторів. Також вихідні дані представлені у вигляді вже обробленої інформації, котру я ввів, тобто останній рух зображення. 3.3. Етапи розробки програми Розробка програми поділяється на такі етапи: - Потрібно вибрати який саме рух будемо висвітлювати, у мому випадку це рух білого прямокутника на фоні синього кола: circle(320,240,239);//малюється коло setfillstyle(1,1); floodfill(320,10,1);//заповнюється кольором setcolor(0); rectangle(x1,y1,x2,y2); //малюється прямокутник setfillstyle(1,0); floodfill(i,240,0); //заповнюється кольором - Далі потрібно вибрати яка саме фігура буде рухатися, у нашому випадку білий прямокутник. Рух тут виглядає у швидкому стиранні та малюванні нового зображення, людське око не помічає таких швидких рухів, тому створюється ілюзія руху: while i<=500 do begin//тут видно що малюнок стирається і малюється 500 раз setcolor(1); circle(320,240,239); setfillstyle(1,1); floodfill(320,10,1); setcolor(0); rectangle(x1,y1,x2,y2); setfillstyle(1,0); floodfill(i,240,0); delay(6000); rectangle(x1,y1,x2,y2); setfillstyle(1,1); floodfill(i,240,1); i:=i+5; x1:=x1+5; x2:=x2+5; //тут видно які саме точки будуть рухатися і на скільки одиниць за один цикл руху. end; Висновки Виконавши дану курсову роботу я отримав програму, що будує динамічне зображення: рух білого прямокутника на фоні синього кола. Дана програма підійде для прикладу побудованого динамічного зображення на мові програмування Turbo Pascal. Оскільки програма виконана на мові програмування Turbo Pascal це забезпечує їй широке коло використання. Програма не є вимогливою до ресурсів ПК, як технічних так і до програмного забезпечення. Перелік посилань: 1. Барціховська К.І., Анісімов В. В., Баумкетнер Л. Я. Методичні вказівки для виконання курсових робіт для студентів спеціальності 5.080405 “Програмування для електронно обчислювальної техніки і автоматизованих систем ”. – Гусятин.:ГК ТДТУ. 2003.-60с. 2. Архангельський А. Я. Інтегрірованная середовище розробки Delphi – М.:ЗАО, Біном; 1999. 3. Мазке Кенту для професіоналів Delphi 6: видавництво Пітер, 2002. 4. Фаронов В. У. DELPHI 6: Учбовий курс (+ дискета) – СПб: Пітер, 2002. Додаток А. Текст програми. Program Mykurs; uses crt,graph; var x1,y1,x2,y2,i,driver,mode:integer; begin driver:=detect; initgraph(driver,mode,''); setbkcolor(15); i:=86; x1:=85; y1:=220; x2:=145; y2:=260; while i<=500 do begin setcolor(1); circle(320,240,239); setfillstyle(1,1); floodfill(320,10,1); setcolor(0); rectangle(x1,y1,x2,y2); setfillstyle(1,0); floodfill(i,240,0); delay(6000); rectangle(x1,y1,x2,y2); setfillstyle(1,1); floodfill(i,240,1); i:=i+5; x1:=x1+5; x2:=x2+5; end; end. Додаток Б. Загальна блок-схема алгоритму Початок i:=86;x1:=85; y1:=220; x2:=145; y2:=260; while i<=500 do begin Оператори зображення Кінець Гусятинський коледж Тернопільського державного технічного університету Відділення: технологічне Циклова комісія програмування та комп’ютеризації Спеціальність: 5.080405 “Програмування для електронно–обчислювальної техніки і автоматизованих систем” ЗАТВЕРДЖЕНО: Голова ЦК ПК ___________ Протокол №__ “__” _____________ 2005 р. ЗАВДАННЯ на курсову роботу Дисципліна: Основи програмування та алгоритмізації студенту Зарівному Ігору Володимировичу Тема роботи: Створення та обробка динамічних зображень Термін здачі студентом закінченої роботи: 9.06.2005р. Зміст розрахунково-пояснювальної записки Реферат Вступ 1. Теоретична частина 1.1. Основні поняття мови програмування Turbo Pascal 1.2.
Сторінки: 1 2 3