RosettaCodeData/Task/Keyboard-input-Keypress-check/M2000-Interpreter/keyboard-input-keypress-che...

4 lines
47 B
Plaintext

K$=""
If Inkey(2000)<>-1 then k$=Key$
Print k$