@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 |