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

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

от roxanne.hauck , в категории: Другие , 8 месяцев назад

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

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

1 ответ

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

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

@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 - цвет линий. Вы можете изменить эти числа, чтобы изменить размер и расположение корабля на экране, а также изменить цвет, используя другие цвета.


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