Нарисовать  мигающую надпись- QBasic(Бейсик)

SCREEN 12
WHILE INKEY$ = ""
  COLOR (TIMER * 5) AND 1
  LOCATE 5, 5: PRINT "Nadpis..."
WEND

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment