pfe-facility-ext ? Facility + extensions
AT-XY ( col# row# -- ) ?=>? ( | ); | ? |
"[ANS] FORTH";KEY? ( -- key-flag ) ?=>? ( | ); | ? |
"[ANS] FORTH";PAGE ( -- ) ?=>? ( | ); | ? |
"[ANS] FORTH";EKEY ( -- key-code# ) ?=>? ( | ); | ? |
"[ANS] FORTH";EKEY>CHAR ( key-code# -- key-code# 0 | char# true! ) ?=>? ( | ); | ? |
"[ANS] FORTH";EKEY? ( -- ekey-flag ) ?=>? ( | ); | ? |
"[ANS] FORTH";EMIT? ( -- emit-flag ) ?=>? ( | ); | ? |
"[ANS] FORTH";MS ( milliseconds# -- ) ?=>? ( | ); | ? |
"[ANS] FORTH";TIME&DATE ?=>? ( | ); | ? |
"[ANS] FORTH";
AT-XY ( col# row# -- ) [ANS] => "[ANS] FORTH"
move the cursor position to the given row and column of the screen. If the output device is not a terminal this will have no effect but can still send an escape sequence.
KEY? ( -- key-flag ) [ANS] => "[ANS] FORTH"
if a character is available from the keyboard, return true.
The KEY word will retrieve the actual character.
PAGE ( -- ) [ANS] => "[ANS] FORTH"
CLRSCR
EKEY ( -- key-code# ) [ANS] => "[ANS] FORTH"
return a keyboard event, the encoding may differ, esp. that it can contain special keys.
EKEY>CHAR ( key-code# -- key-code# 0 | char# true! ) [ANS] => "[ANS] FORTH"
EKEY? ( -- ekey-flag ) [ANS] => "[ANS] FORTH"
check if a character is available from the keyboard
to be received - unlike KEY? it will not discard
non-visible codes.
EMIT? ( -- emit-flag ) [ANS] => "[ANS] FORTH"
if EMIT can safely output characters without
blocking the forth by waiting for an indefinite time.
MS ( milliseconds# -- ) [ANS] => "[ANS] FORTH"
wait at least the specified milliseconds (suspend the forth tasklet)
TIME&DATE - no description, sorry