Рисование линий
Date: 2015-10-07; view: 478.
В Графическом Окне мы можем рисовать различные фигуры, текст и даже картинки. Начнем с рисования простых фигур. Ниже приведена программа, которая нарисует пару линий в Графическом Окне.
GraphicsWindow.Width = 200
GraphicsWindow.Height = 200
GraphicsWindow.DrawLine(10, 10, 100, 100)
GraphicsWindow.DrawLine(10, 100, 100, 10)
| Вместо названий цветов Вы можете использовать систему символов для их обозначения (#RRGGBB). Например, #FF0000 означает Red (красный), #FFFF00 – Yellow (желтый), и т.д. Более подробную информацию о цвете можно будет узнать в пункте [На стадии разработки: глава о Цвете] |
Рисунок 25 – Крест-накрест
Первые две строки программы настраивают окно, а последующие две строки рисуют перекрещенные линии. Первые два числа, следующие за командой DrawLine, задают начальные координаты осей x и y, а другие два числа определяют конечные координаты осей x и y. Интересно отметить то, что в компьютерной графике оси координат (0, 0) начинаются в верхнем левом углу окна. Фактически, в пространственной системе координат считается, что окно находится во 2-м квадранте.
[На стадии разработки: вставить рисунок квадранта]
Рисунок 26 – Карта системы координат
Возвращаясь к программе, в которой мы рисовали линии, интересно отметить, что в Small Basic можно изменять свойства линии, такие как ее цвет и толщина. Сначала, давайте изменим цвет линий так, как показано в следующей программе.
GraphicsWindow.Width = 200
GraphicsWindow.Height = 200
GraphicsWindow.PenColor = "Green"
GraphicsWindow.DrawLine(10, 10, 100, 100)
GraphicsWindow.PenColor = "Gold"
GraphicsWindow.DrawLine(10, 100, 100, 10)
Рисунок 27 – Изменение цвета линии
А сейчас давайте изменим ее размер. В нижеприведенной программе мы изменяем толщину линии до 10 вместо 1, которая присваивается ей по умолчанию.
GraphicsWindow.Width = 200
GraphicsWindow.Height = 200
GraphicsWindow.PenWidth = 10
GraphicsWindow.PenColor = "Green"
GraphicsWindow.DrawLine(10, 10, 100, 100)
GraphicsWindow.PenColor = "Gold"
GraphicsWindow.DrawLine(10, 100, 100, 10)
Рисунок 28 – Толстые цветные линии
Используя команды PenWidth (ширина карандаша) и PenColor (цвет карандаша), мы можем изменить карандаш, с помощью которого рисуются линии. Этими командами можно изменить не только нарисованные линии, но и нарисованные фигуры уже после того, как все свойства изменены.
Используя те же циклические команды, о которых мы говорили в предыдущей главе, мы с легкостью можем написать программу, которая нарисует множество линий, постепенно увеличивающихся в толщине.
GraphicsWindow.BackgroundColor = "Black"
GraphicsWindow.Width = 200
GraphicsWindow.Height = 160
GraphicsWindow.PenColor = "Blue"
For i = 1 To 10
GraphicsWindow.PenWidth = i
GraphicsWindow.DrawLine(20, i * 15, 180, i * 15)
endfor
Рисунок 29 –Линии карандаша разной ширины
Интересно в этой программе то, что мы можем увеличивать ширину карандаша циклически, т.е. с выполнением каждого цикла под старой линией рисуется новая.
| <== previous lecture | | | next lecture ==> |
| Установки графического окна | | | Рисование и заливка фигур |