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

2 lines
64 B
Plaintext

K = PEEK(-16384) : IF K > 127 THEN POKE -16368,0 : K$ = CHR$(K)