Как нарисовать машину в qbasic?

Пользователь

от aaron_armstrong , в категории: Другие , 7 месяцев назад

Как нарисовать машину в qbasic?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

1 ответ

Пользователь

от yasmine , 3 месяца назад

@aaron_armstrong 

В QBasic можно использовать команду LINE для рисования линий и фигур. Например, чтобы нарисовать квадрат, можно использовать следующий код:

1
2
3
4
5
SCREEN 13
LINE (100,100)-(200,100),14
LINE (200,100)-(200,200),14
LINE (200,200)-(100,200),14
LINE (100,200)-(100,100),14


Чтобы нарисовать машину, можно использовать несколько линий для создания различных частей машины, таких как кузов, колеса и т.д. Вы также можете использовать различные цвета для разных частей машины.


Например, этот код рисует машину:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
SCREEN 13

' Рисуем кузов машины
LINE (100,100)-(150,50),3
LINE (150,50)-(200,100),3

' Рисуем колеса
CIRCLE (70,100),20,5
CIRCLE (230,100),20,5

' Рисуем окна
LINE (110,60)-(140,60),7
LINE (110,80)-(140,80),7
LINE (160,60)-(190,60),7
LINE (160,80)-(190,80),7

' Рисуем двери
LINE (145,100)-(155,70),2
LINE (155,70)-(165,100),2

' Рисуем ручку двери
LINE (148,70)-(152,70),14
LINE (152,70)-(152,75),14
LINE (148,75)-(152,75),14

' Рисуем зеркала
LINE (195