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
  ;