Keyboard input/Keypress check: Difference between revisions
Add Plain English
(Add solution in Common Lisp) |
(Add Plain English) |
||
Line 1,060:
=={{header|PicoLisp}}==
<lang PicoLisp>(setq *LastKey (key))</lang>
=={{header|Plain English}}==
Print the numeric value of any key pressed without waiting.
<lang plainenglish>To run:
Start up.
Handle any events.
Shut down.
To handle any events:
Deque an event.
If the event is nil, exit.
Handle the event.
Repeat.
To handle an event:
If the event's kind is "key down", handle the event (key down).
To handle an event (key down):
Put the event's key into a key.
Write "" then the key to the console.
If the key is the escape key, relinquish control.</lang>
=={{header|PowerShell}}==
|