Процедура (функция)
| Назначение
| Пример вызова
| Примечания
| d := detect
| Определить тип гра-фического режима (номер драйвера)
| d := detect
| d = драйвер экрана (bgi)
(integer)
| initgraph(d, m, путь-bgi)
| Установить графиче-ский режим экрана
| initgraph(d, m,
’c:\bgi’)
| m = режим экрана (vga) (integer)
| cleardevice
| Очистить экран и отменить установки цвета
| cleardevice
|
| setcolor(цвет)
| Установить цвет линии (рисунка)
| setcolor(magenta)
|
| setbkcolor(цвет)
| Установить цвет фона (очистки)
| setbkcolor(0)
|
| putpixel(x,y,цвет)
| Точка (x,y)
| putpixel(5, 5, red)
|
| line(x1,y1,x2,y2)
| Линия (x1,y1)-(x2,y2)
| line(10,10,20,200)
|
| lineto(x,y)
| Чертить линию в (x,y)
| lineto(100,200)
|
| moveto(x,y)
| Вести перо в (x,y)
| moveto(nx, ny)
|
| circle(x,y,радиус)
| Окружность (x,y,r)
| circle(x, y, 20)
|
| arc(x,y,угл1,угл2,радиус)
| Дуга окружности (x,y,r) от угла1 до угла2 (радиан)
| arc(10,10,0,pi,5)
|
| setfillstyle(s,цвет-заливки)
| Установить стиль и цвет заливки
| setfillstyle(1,green)
|
| floodfill(x,y,цветграницы)
| Залить область с границей (цвет) цветом заливки
| floodfill(p,q, 10)
|
| rectangle(x1,y1,x2,y2)
| Прямоугольник
(x1,y1)-(x2,y2)
| rectangle(2,2,5,10)
|
| bar(x1,y1,x2,y2)
| Прямоугольник
(x1,y1)-(x2,y2) с заливкой цвета
| bar(2, 2, m, n)
|
| bar3d(x1,y1,x2,y2,z,n)
| 3-мерный прямоуголь-ник (колонка)
(x1,y1)-(x2,y2)
| bar3d(2,2,20,20,
10,true)
| z = глубина
n = boolean
true = крыша
колонки
| x := getmaxx
| макс. граница для x
| mx := getmaxx
| 0..639 (vga)
| y := getmaxy
| макс. граница для y
| my := getmaxy
| 0..479 (vga)
| closegraph
| Закрыть графический режим экрана
| closegraph
|
|
|