KEY KEY?
KEY ( --- char)
Waits for a key to be pressed. Pressing a key returns its ASCII code.
Example:
key . \ display 97 if key "a" is active key . \ affiche 65 if key "A" is active
KEY? ( --- fl)
Returns true if a key is pressed.
Example:
: keyLoop begin key? until ;