Графические операторы в QBasic

Графический режим экрана SCREEN N 1. SCREEN N - этот оператор очищает экран и задает графический режим, где N определяет тип графического режима Если задан оператор SCREEN N, то оператор CLS можно не использовать.

Оператор SCREEN n – устанавливает режим 0-Все текстовые экраны 1-Графика 320*200, 25 строк * 40 столбцов 2-Графика 640*200, 25 строк * 80 столбцов 3-Графика 720*348, 25 строк * 80 столбцов. Только для видеоадаптеров Hercules, Olivetti, AT&T. 4-Графика 640*400, 25 строк * 80 столбцов. Только для видеоадаптеров Hercules, Olivetti, AT&T. 7-Графика 320*200, 25 строк * 40 столбцов, несколько видеостраниц. 8-Графика 640*200, 25 строк * 80 столбцов, несколько видеостраниц 9-Графика 640*350, 25 или 43 строки * 80 столбцов, несколько видеостраниц 10-Графика 640*350 (только для чёрно-белых мониторов), 25 или 43 строки * 80 столбцов, несколько видеостраниц 11-Графика 640*480, 30 или 60 строк * 80 столбцов (чёрно-белый режим) 12-Графика 640*480, 30 или 60 строк * 80 столбцов (16 цветов) 13-Графика 320*200, 25 строк * 40 столбцов, 256 цветов.

Оператор COLOR C1, C2 COLOR C1, C2- оператор, задающий цвет текста и фона

Задание цветов QBasic: 0 Черный 1 Синий 2 Зеленый 3 Голубой 4 Красный 5 Фиолетовый 6 Коричневый 7 Серый 8 Темно-серый 9 Светло-синий 10 Светло-зеленый 11 Светло-голубой 12 Светло-красный 13 Светло-фиолетовый 14 Желтый 15 Белый

Оператор рисования и стирания точки: PSET (X, Y) и PRESET (X, Y) Рисование точки: PSET (X, Y), C, Оператор стирания точки: PRESET (X, Y) Пример: PSET (160, 100), 10 PRESET (160, 100)

Операторы рисования линий Рисование линии: LINE (X1,Y1)-(X2,Y2), C. Пример: LINE (30, 100)-(120, 150), 10 Рисование прямоугольной рамки: LINE (X1,Y1)-(X2,Y2), C, B. Пример: LINE (90, 110)-(140, 170), 10, B Рисование закрашенного прямоугольника: LINE (X1,Y1)-(X2,Y2), C, BF. Пример: LINE (90, 110)-(140, 170), 12, BF

Оператор рисования окружности: CIRCLE (X, Y), R, C Здесь X,Y - координаты центра, R - радиус, C - цвет. Пример: CIRCLE (160, 110), 60, 13

Закраска замкнутой области PAINT (X, Y), C1, C2. Пример: CIRCLE (160, 130), 50, 13 PAINT (160, 110), 11, 13

Рисование дуги и сектора: CIRCLE (X, Y), R, C, Ф1, Ф2 Здесь Ф1, Ф2 начальный и конечный углы дуги в радианах. У сектора перед Ф1 и Ф2 стоит знак минус: CIRCLE (X, Y), R, C, -Ф1, -Ф2. Пример pi= CIRCLE (160, 140), 70, 11, pi / 4, 3 * pi / 4 CIRCLE (160, 140), 60, 10, -pi / 4, -3 * pi / 4

Рисование эллипса: CIRCLE (X, Y), R, C,,, K Здесь K - эксцентриситет эллипса. K 1-эллипс вытянут вдоль малой оси. Пример: CIRCLE (160, 100), 70, 15,,, 0.5

Пример программы с графикой на QBasic: Квадрат, три концентрические окружности и точка: SCREEN 7 COLOR 14, 8 PRINT "Пример графики на QBasic:" LINE (100, 50)-(220, 150), 13, B CIRCLE (160, 100), 20, 11 CIRCLE (160, 100), 30, 12 CIRCLE (160, 100), 40, 14 PSET (160, 100), 15 END

Оператор DRAW. Рассмотрим следующую программу: SCREEN 12 DRAW "U100 L200 D100 R200" С помощью оператора DRAW можно двигать невидимый карандаш в разных направлениях. В этом примере двигаем его на 100 единиц вверх (U100 -UP), затем на 200 единиц влево (L200 -LEFT), затем на 100 единиц вниз (D100 - DOWN) и на 200 единиц вправо (R200 -RIGHT)