Как нарисовать корабль в qbasic?

@roxanne.hauck 

В QBASIC можно нарисовать корабль, используя команды рисования, такие как LINE, CIRCLE и PAINT. Приведу пример кода, который рисует простой корабль:

1
2
3
4
5
6
7

SCREEN 13
LINE (100, 100)-(150, 150), 15
LINE (150, 150)-(200, 100), 15
LINE (200, 100)-(250, 150), 15
LINE (250, 150)-(300, 100), 15
CIRCLE (225, 125), 25, 15
PAINT (225, 100), 15

Этот код рисует корабль с треугольным носом, треугольной кормой и круглыми оконцами кормы. Числа, такие как 100, 150 и т. д., определяют координаты точек на экране, а 15 - цвет линий. Вы можете изменить эти числа, чтобы изменить размер и расположение корабля на экране, а также изменить цвет, используя другие цвета.

Надеюсь, это поможет! Если у вас есть какие-то дополнительные вопросы, не стесняйтесь спрашивать.