4.8. Масштабирование изображений

Масштабирование изображений позволяет увеличивать/ уменьшать отрезки. Масштабирование задается командой SN. После этой команды длины отрезков, вычерченные последующими команда ми, будут уменьшены или увеличены.

Коэффициент масштабирования вычисляется как N / 4.

4.9. Построение графика функции.

Масштабирование изображений позволяет уменьшить или уве-

личить рисунки на экране , соблюсти пропорции фигур и соот-

ветствие между некоторыми изображениями.

Пример 22. Построить оси координат и график функции Y = SIN(x)

на отрезке [ -10; 10 ] с шагом 1. Точка пересечения осей должна

располагаться в центре экрана. Перевести декартовы координаты

в пиксельные для конкретного режима экрана. Составить программу.

1. Выберем режим экрана. Режим установим оператором

SCREEN 12,

т. е. 640 пикселей по оси Х, и 480 пикселей по оси У .

2. Масштабируем по оси Х. Координата Х меняется на отрезке

Х = [-10; 10 ]

В новых, пиксельных координатах XPIC меняется на отрезке

[0; 640], так как максимальное число точек в строке 640:

XPIC = [0; 640].

Коэффициент масштабирования по Х равен

KOEFX = 640/(10 + 10) = 32.

Формула связи декартовых и пиксельных координат для Х

XPIC = ( X- A ) * KOEFX

3. Масштабирование по У. Оценим функцию Y = SIN( x ).

Определим наибольшее по модулю значение функции

на выбранном отрезке [-10; 10]

MAX = 1.

Координата У меняется на отрезке [-1; 1]

В новых, пиксельных координатах YPIC меняется на отрезке

[0; 480], так как максимальное число точек по вертикали 480

YPIC = [ 0; 480 ].

Коэффициент масштабирования по У равен

KOEFY = 480/( MAX*2) = 480/(1*2) = 240

Формула связи декартовых и пиксельных координат для У

YPIC = ( MAX – SIN(X) ) * KOEFY.

4. Построение осей координат. Центр экрана должен совпа-

дать с центром декартовых координат. Для этого должны выпол-

няться соотношения :

YOPIC = 480/2 =240;

XOPIC= 640/2 = 320

По полученным данным строим оси координат.

5. Программа.

DEF FNF(X) = SIN(X)

INPUT “ВВЕДИТЕ ИНТЕРВАЛ А, В, И ШАГ Н”; A, B, H

SCREEN 12 : CLS

MAX = 1

KOEFX = 640/(B-A)

KOEFY = 480/( MAX*2)

YOPIC = 240

LINE( 0, YOPIC ) - (640, YOPIC ) , 10

XOPIC = 320

LINE( XOPIC, 0 ) - ( XOPIC, 480 ) , 10

FOR X = A TO B STEP H

XPIC = ( X – A ) * KOEFX

YPIC = ( MAX – FNY(X) ) * KOEFY

PSET( XPIC, YPIC ), 11

NEXT X

PRINT “Y = SIN(X)”

END

6. После команды RUN нужно ввести следующие данные:

“ВВЕДИТЕ ИМНТЕРВАЛ А, В, И ШАГ Н” ? -10, 10, .1

На экране появятся линии осей координат и график функции.