Все линии (а также прямоугольники, окружности), нарисованные после этой команды, будут светло-зеленого цвета. Эта же функция может установить цвет из полной палитры:
Setcolor (COLOR(255,0,255)); // установить фиолетовый цвет
Когда открывается окно для графики, по умолчанию (то есть без дополнительных действий) устанавливается белый цвет.
Работа с отдельными пикселями
Для рисования используются стандартные функции. Для каждого пикселя можно задать свой цвет с помощью функции putpixel:
Putpixel (x, y, 14); // покрасить точку (x,y) в желтый цвет
Функция getpixel позволяет определить цвет любого пикселя окна:
n = getpixel(x, y); // записать цвет точки (x,y) в переменную n
Линии
Отрезок можно нарисовать с помощью команды line:
Line (x1, y1, x2, y2); // отрезок (x1,y1)-(x2,y2)
Есть и другой способ: сначала перевести курсор (указатель текущего положения) в точку
(x1,y1) командой moveto, а затем нарисовать отрезок в точку (x2,y2) командой lineto:
Moveto (x1, y1); // курсор в точку (x1,y1)
Lineto (x2, y2); // отрезок в точку (x2,y2)
После выполнения команды lineto курсор смещается в новую точку
(x2,y2). Особенно удобно использовать эти команды при рисовании
ломаных линий:
Setcolor(12); // красный цвет
Moveto (x1, y1); // курсор в первую точку
Lineto (x2, y2); // отрезок во вторую точку