VIEW(x1 ,у1)-(x2,y2), С
х1, у1 - координаты левого верхнего угла х2, у2 - координаты правого нижнего угла С – номер цвета
Пример. Screen 12 VIEW (150, 50)-(550, 350) В этом примере мы задаем графический режим с разрешением 640 х 480 точек и выделяем на экране прямоугольник Р, т.е. х изменяется от 150 до 550, значит ширина прямоугольника Р = 400; у изменяется от 50 до 350, длина прямоугольника 300. Все дальнейшие операторы в программе будут работать только в прямоугольнике Р. Оператор WINDOW предназначен для задания на экране удобной для задачи на построение графика функций декартовой системы координат. WINDOW (ха, уа) - (х 2, у 2) (т.е. х изменяется от х1 до х 2, а у изменяется от у1 до у2) Пример 1. Задать в прямоугольнике Р систему координат для построения графика функции у = sin х, когда х изменяется от - 6.28 до 6. 28 (от –2п до 2п). Т.к. sin х изменяется от -1 до 1, то для задания нужной системы координат используются операторы. Screen 12 VIEW (150, 50)-(550, 350),14- выделение прям, области размерами по х = 400, по у = 300 WINDOW (-6.28, 1) - (6.28 -1) - задание мысленной системы координат, где х изменяется от –2п до 2п, а у от -1 до 1. Для построения осей координат добавили перед циклом две строки с оператором LINE. line (-6.28, 0) - (6.28, 0) 14 (ось ох) line (0,-1)-(0, 1), 14 (ось оу) Пример 2. В центре экрана в графическом режиме 12 выделить прямоугольник размером 400 х 340 точек и построить график функции у = sin х для х, изменяющегося от –2п до 2п с шагом 0.1. Screen 12 VIEW (150, 50)-(550, 350),14 WINDOW (-6.28, 1) - (6.28, -1) Line (-6.28,0)-(6.28,0),1 Line(0,-1)-(0,1),1 for x = - 6.28 to 6.28 step 0.1 y=sin(x) pset (x, y),14 next x или Screen 12 VIEW (150, 50)-(550, 350),14 WINDOW (-6.28, 1) - (6.28, -1) Line (-6.28,0)-(6.28,0),1 Line (0,-1)-(0,1),1 for x = - 6.28 to 6.28 step 0.1 pset (x, sin(x)),14 next x
Для того, чтобы построить на одной оси два графика, допечатаем в программу еще следующие строки. Screen 12 VIEW (150, 50)-(550, 350),14 WINDOW (-6.28, 1) - (6.28, -1) Line (-6.28,0)-(6.28,0),1 Line(0,-1)-(0,1),1 for x = - 6.28 to 6.28 step 0.1 y=sin(x) у1 = cos (x) pset (x, y),14
|