Anonymous user
Keyboard input/Keypress check: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 443:
<lang logo>if key? [make "keyhit readchar]</lang>
=={{header|M2000 Interpreter}}==
===without delay===
<lang M2000 Interpreter>
k$=inkey$
</lang>
===Using delay===
<lang M2000 Interpreter>
K$=""
If Inkey(2000)<>-1 then k$=Key$
Print k$
</lang>
===Check specific key===
<lang M2000 Interpreter>
k$=""
If keypress(32) then k$=" "
</lang>
=={{header|Oforth}}==
<lang Oforth>import: console
| |||