Прямі лінії – відрізки

Оператор LINE призначений для малювання відрізка, що з'єднує дві довільні точки екрана. Загальна форма запису оператора наступна:

LINE (Х_початок, Y_початок) - (X_кінець, Y_кінець),

де X_початок, Y_початок — координати початку відрізка (необов’язкові параметри);

Х_кінець, Y_кінець — координати кінця відрізка (обов'язкові параметри).

Якщо координати початку відрізка відсутні, то відрізок буде починатися в точці останньої вказівки (ТОВ) (Last Point Referenced (LPR)). Подивіться, як це peaлізовано в пpoграмі:

REM Програма 1

' Малювання простих відрізків

SCREEN 9

CLS

LINE (50,50) – (50,150)

LINE – (150,150)

LINE – (150,50)

LINE – (50,50)

END

Перша команда LINE містить усі параметри — координати початку і кінця відрізка. У наступних операторах зазначені тільки координати кінця відрізка Тому кожний відрізок, починаючи з другого, починається в кінцевій точці попереднього, утворити ламану лінію.

В операторі LINE можна використовувати відносні координати для початку і/або кінця відрізка. Наприклад:

LINE STEP (10,-10) - (100,165)

LINE (115,120) - STEP (- 10,15)

LINE STEP ( -5,5) - STEP (5,-5)

Запропоновану вище програму можна переписати наступним чином, використовуючи ТОВ:

RЕМ Програма2

REM Модифікація програми1

'Увага! ТОВ = (З20,100)

SCREEN 2

CLS

LINE STEP(-270, -50) – STEP (0, 150)

LINE –STEP (100, 0)

LINE -STEP(0, -150)

LINE -STEP( -100, 0)

END

Очевидно, що так можна намалювати квадрат, прямокутник і інші фігури.

Оператор circle

Оператор CIRCLE дозволяє малювати коло у будь-якім місці екрана. Форма запису цього оператора:

CIRCLE (Х_центр, Y_центр), радіус — абсолютна форма

CIRCLE STEP (X_центр, Y_центр), радіус — відносна форма,

де Х_центр, Y_центр — координати або зміщення центру кола;

радіус — радіус кола.

Наступна програма є простим прикладом використання даного оператора:

REM Програма 3

REM Малювання окружності

SCREEN 2

CLS

CIRCLE (100,100),25

END

Отримане коло з центром у точці з координатами (100,100) має радіус 25 точок.

Радіусом кола називається відстань від центра до будь-якої його точки. Радіус не може мати від’ємне значення. Якщо як радіус задане від’ємне значення, QBASIC інтерпретує його як помилку і відразу виводить повідомлення Illegal function call (Неправильний виклик функції).

Малювання прямокутників

Що робити, якщо створюване зображення містить прямокутник? Звичайно, можна намалювати прямокутник за допомогою операторів LINE, повторюючи його чотири рази для малювання чотирьох сторін, але можна для цього вибрати більш простий шлях. Гляньте на наступну форму запису оператора LINE:

LINE (X_початок, Y_початок) - (Х_діагональ, Y_діагональ), колір, B[F]

де В — параметр, що вказує на малювання прямокутника;

bf — параметр, що вказує на малювання зафарбованого прямокутника;

(Х_початок, Y_початок) — координати лівого верхнього кута прямокутника;

(Х_діагональ,Y_діагональ) — координати правого нижнього кута прямокутника.

Приклад:

'Програма4. Малювання прямокутників

SCREEN 1

CLS

LINE (10,20) - (135,20) , 3

LINE (150, 20) – (200, 45), 3 , B

LINE (230, 20) - (280, 45), 3, BF

END

У випадку пропуску якого-небудь параметра чи параметрів, ви повинні зберегти необхідну їх кількість розділовими комами.