RosettaCodeData/Task/Keyboard-input-Flush-the-ke.../QBasic/keyboard-input-flush-the-ke...

5 lines
63 B
Plaintext

DO WHILE INKEY$ <> ""
LOOP
PRINT "Keyboard buffer flushed"
END