3.1 Складові програми
У даній програмі я застосовував стандартні можливості графічного режиму Turbo Pascal. Програма містить модулі:
-
Graph – графічний модуль, який підключають для використання процедур та функцій графічного режиму.
-
Crt – модуль для роботи з текстовим режимом та звуком
-
Dos – модуль для роботи на фізичному рівні.
-
M_mouse – модуль миші
Модуль Graph містить такі процедури та функції:
-
initgraph(драйвер, режим роботи, шлях) – встановлюємо графічний режим.
-
SetColor(колір) – встановлюємо колір.
-
SetBkColor(колір) – встановлюємо колір фону.
-
SetTextStyle(шрифт, напрям тексту, розмір тексту) – встановлюємо стиль тексту.
-
OutTextXY(координати X, координати Y, 'текст') – виводимо текст по заданим координатам X та Y.
-
Rectangle(лівий верхній кут по X, лівий верхній кут по Y, правий нижній кут по X, правий нижній кут по Y) – малює пустий квадрат по заданим координатам. Колір вводиця процедурою SetColor яка вводитясо до того як малювати квадрат.
-
SetFillStyle(тип заливки, колір заливки) – встановлюємо тип заливки.
-
FloodFill(коодинати X, координати Y, колір заливки) – заливає ту границю яка входить в середину якогось квадрата. А також границі квадрата повинні кольорами співпадати з кольром заливки.
-
Closegraph – ця процедура закриває графічний режим.
Модуль Crt містить такі процедури та функції:
-
Readkey; – ця функція дає інформацію яку щойно клавішу натиснули..
-
KeyPressed:boolean – ця функція дає значення True якщо клавіша в даний момент натиснута.Якщо ні то значення буде False.
Модуль Dos містить такі процедури та функції:
-
Registers – за допомогою цієї функції ми в m_mouse.pas об’являємо reg:registers.
-
diskfree(буква диску) – ця функція дає інформацію скільки вільного місця на заданому диску.
Модуль M_Mouse містить такі процедури та функції:
-
Cnf_Mouse – ця процедура інсталює мишку.
-
On_Mouse – ця процедура виводить курсор миші.
-
Off_Mouse – ця процедура ховає курсор миші.
-
Key_Left_Mouse:boolean – провіряє чи натиснута ліва клавіша миші.
-
Key_Right_Mouse:boolean – провіряє чи натиснута права клавіша миші.
-
Key_Mouse:boolean - провіряє чи натиснута люба клавіша миші
-
Mouse_X:integer – в цю функцію присвоюється координати миші за координатами X від 1 до 640.
-
Mouse_Y:integer - в цю функцію присвоюється координати миші за координатами Y від 1 до 480.
-
Mouse_Goto_XY(x, y:integer) – ця процедура переміщує курсор миші по заданим координатам X та Y.
Процедури та функції для обробки зображень:
-
Freemem(змінна, розмір) – Очистити динамічну зміну вказуючи з якої змінної та на який розмір очистити.
-
Imagesize(лівий верхній кут по X, лівий верхній кут по Y, правий нижній кут по X, правий нижній кут по Y) – визначає скільки вільного місця прийдеться виділити для динамічної змінної.
-
Getmem(змінна, розмір) – ця процедура встановлює розмір динамічної зміної.
-
Getimage(лівий верхній кут по X, лівий верхній кут по Y, правий нижній кут по X, правий нижній кут по Y, динамічна змінна) – зберігає зображення на екрані по заданим координатам та зберігає його в динамічну зміну.
-
Putimage(лівий верхній кут по X, лівий верхній кут по Y, динамічна зміна, тип виводу на екран) – вставляємо на екран картинку яка заповнена в динамічній змінній.
Процедури та функції для обробки файлів:
-
Assign(зміна, шлях) – ця процедура об’являє файл як зміну.
-
rewrite(зміна) – відкрити файл для запису.
-
reset(зміна) – відкрити файл для читання.
-
read(зміна_файла, зміна_зчитаного) – зчитати символ із файла.
-
write(зміна_файла, зміна_записувача) – записуємо символ в файл.
-
close(зміна) – закрити файл.