Keyboard input/Flush the keyboard buffer

From Rosetta Code
Keyboard input/Flush the keyboard buffer is a draft programming task. It is not yet considered ready to be promoted as a complete task, for reasons that should be found in its talk page.

Flush the keyboard buffer.

BASIC

ZX Spectrum BASIC

10 IF INKEY$ <> "" THEN GOTO 10

PureBasic

<lang PureBasic>While Inkey()<>"": Wend </lang>

Retrieved from "https://rosettacode.org/wiki/Keyboard_input/Flush_the_keyboard_buffer?oldid=159861"