QuickBASIC: відмінності між версіями
[перевірена версія] | [перевірена версія] |
Вилучено вміст Додано вміст
Yuriz (обговорення | внесок) Немає опису редагування |
Yuriz (обговорення | внесок) |
||
Рядок 152:
== Графіка ==
Перемикання між режимами роботи відеоконтролера здійснюється командою
SCREEN n
=== Кольори ===
Кольори в програмі задають командою COLOR:
<source lang="BASIC">
COLOR A, B, C
COLOR A, B ' для режимів 7…10
COLOR A
</source>
Тут A, B, C - [[Число|числа]] або [[Змінна|змінні]]. Значення А задає колір зображення, В - колір тіла, С - колір межі.
{| class="wikitable
! id="mwAro" | № ([[Число|номер]])
! id="mwArw" | [[Колір]]
|-
| id="mwAr8" | 0
| id="mwAsA" | [[Чорний колір|чорний]]
|-
| id="mwAsM" | 1
| id="mwAsQ" | [[Синій колір|синій]]
|-
| id="mwAsc" | 2
| id="mwAsg" | [[Зелений колір|зелений]]
|-
| id="mwAss" | 3
| id="mwAsw" | [[Блакитний колір|блакитний]]
|-
| id="mwAs8" | 4
| id="mwAtA" | [[Червоний колір|червоний]]
|-
| id="mwAtM" | 5
| id="mwAtQ" | [[Рожевий колір|рожевий]]
|-
| id="mwAtc" | 6
| id="mwAtg" | [[Коричневий колір|коричневий]]
|-
| id="mwAts" | 7
| id="mwAtw" | [[Світло-сірий колір|світло-сірий]]
|-
| id="mwAt8" | 8
| id="mwAuA" | [[Темно-сірий колір|темно-сірий]]
|-
| id="mwAuM" | 9
| id="mwAuQ" | [[Яскраво-синій колір|яскраво-синій]]
|-
| id="mwAuc" | 10
| id="mwAug" | [[Яскраво-зелений колір|яскраво-зелений]]
|-
| id="mwAus" | 11
| id="mwAuw" | [[Яскраво-блакитний колір|яскраво-блакитний]]
|-
| id="mwAu8" | 12
| id="mwAvA" | [[Яскраво-червоний колір|яскраво-червоний]]
|-
| id="mwAvM" | 13
| id="mwAvQ" | [[Яскраво-рожевий колір|яскраво-рожевий]]
|-
| id="mwAvc" | 14
| id="mwAvg" | [[Жовтий колір|жовтий]]
|-
| id="mwAvs" | 15
| id="mwAvw" | [[Білий колір|білий]]
|}
PSET (X,Y), D
Тут X - горизонтальна координатна точки; Y - вертикальна; D - колір; X, Y, D - сталі змінні або вирази. Якщо кольори задані командою COLOR A, B то засвітити точку (X, Y) кольором А (на тлі В) можна так:
PSET (X,Y)
PSET (50, 100), 2. PRESET (X, Y)
=== Зображення прямих і прямокутників ===
LINE (X1, Y1) - (X2, Y2), D
Рядок 297 ⟶ 293:
! id="mwA1M" | Буква
! id="mwA1Q" | Напрямок
|-
| id="mwA1Y" | '''U'''
| id="mwA1g" | '''↑'''
|-
| id="mwA1s" | '''R'''
| id="mwA10" | '''→'''
|-
| id="mwA2A" | '''D'''
| id="mwA2I" | '''↓'''
|-
| id="mwA2U" | '''L'''
| id="mwA2c" | '''←'''
|-
| id="mwA2o" | '''E'''
| id="mwA2w" | '''↑→'''
|-
| id="mwA28" | '''F'''
| id="mwA3E" | '''↓→'''
|-
| id="mwA3Q" | '''G'''
| id="mwA3Y" | '''↓←'''
|-
| id="mwA3k" | '''H'''
| id="mwA3s" | '''↑←'''
Рядок 331 ⟶ 327:
=== Імітація руху об'єкта на екрані ===
Для імітації руху зображення об'єкта на екрані потрібно виконати такий алгоритм:
▲ 1. Нарисувати об'єкт у заданій точці.
▲ 2. Знищити об'єкт, замалювавши його кольором тла.
▲ 3. Змінити координати об'єкта.
▲ 4. Перейти до пункту 1.
Продемонструємо цей [[алгоритм]] на прикладі програми "Рух кола". На екрані зелене коло на чорному тлі рухатиметься вверх-вниз.
Програма "Рух кола"
<source lang="BASIC">
SCREEN 8
COLOR 2,1
Рядок 348 ⟶ 344:
IF Y < 10 OR Y > 190 THEN SY = -SY
GOTO start 'Рисування кола'
</source>
Перервати виконання цієї програми можна акордом Ctrl+Break.
|