Описание языка Turbo Basic для студентов всех специальностей — страница 8

фона можно выбрать один из 16 цветов (0 - черный, 1 - синий, 2 - зеленый, 3 - бирюзовый, 4 - красный, 5 - лиловый, 6 - корич- невый, 7 - белый, 8 - серый, 9 - голубой, 10 - ярко-зеленый, 11 - ярко-бирюзовый, 12 - ярко-красный, 13 - ярко-лиловый, 14 - жел- тый, 15 - ярко-белый) Оператор COLOR 2  0имеет вид COLOR 2  0i, 2  0j[,k] - 17 - где i - цвет фона, j - номер палитры, k - цвет рамки. Например, операторы SCREEN 1,0 COLOR 9,0 устанавливают цветной графический режим при средней

разрешающей способности; цвет фона - голубой; последующие операторы должны использовать цвета из 0-й палитры. В графическом режиме (для получения на экране неподвижных изображений) могут использоваться следующие операторы: PSET 2  0(PRESET) - включает (или выключает) точку; LINE 2  0- чер- тит линию; CIRCLE 2  0- чертит окружность или ее часть; PAINT 2  0- зак- рашивает указанную часть экрана. Более сложные операторы для получения

движущихся изображений (DRAW, GET, PUT) рассматриваются в п.4. Оператор PSET (x, y) включает точку с координатами x,y. Оператор PSET STEP (x, y) включает точку, отстоящую на x позиций по горизонтали и на y по- зиций по вертикали от текущей точки. Например, если в предыдущем положении точка имеет координаты (60, 75), то оператор PSET (10, 20) определяет точку с координатами (10, 20), а оператор PSET STEP (10, 20) определяет точку с координатами (70, 95). Операторы PSET (x, y), 0 или

PRESET 2  0(x, y) стирают точку (x, y) с экрана. Оператор LINE 2  0позволяет начертить отрезок прямой, указав его начало (x1, y1), конец (x2, y2) и цвет k LINE 2  0[(x1, y1)] 2  0- 2  0(x2, y2), 2  0k Если начальная точка отсутствует, то линия будет прочерчена, на- чиная с точки, в которой остановился предыдущий оператор. С помощью оператора LINE 2  0можно также чертить и закрашивать прямоугольники LINE (x1, y1) - (x2, y2), 2  0[k], 2  0B[F] Точки

(x1, y1) и (x2, y2) трактуются при этом как левая нижняя и - 18 - правая верхняя вершины прямоугольника. Если цвет k отсутствует, то прямоугольник будет начерчен 3-м цветом палитры. При наличии параметра F площадь внутри прямоугольника будет закрашена. Напри- мер, оператор LINE (80, 175) - (100, 25), 2, BF закрашивает красным цветом прямоугольник, расположенный между 80-ой и 100-ой позициями по горизонтали и 175-ой и 25-ой позициями по вертикали.  _Оператор

CIRCLE . 2  0позволяет строить окружности, дуги, секторы и эллипсы. Оператор CIRCLE 2  0(x, 2  0y), 2  0r, k чертит окружность радиуса r с центром в точке (x, y) цветом k. После вычерчивания окружности последней использованной точкой считается ее центр. Оператор CIRCLE (x, y), r, k, ALPHA1,ALPHA2 вычерчивает дугу, имеющую начало под углом ALPHA1 и конец - под углом ALPHA2. Например, оператор (при PI = 3.1416) CIRCLE (160, 100), 80, 2, PI/2, PI строит дугу от PI/2 до PI ок-