STANDARD-I/O
* STANDARD-I/O ( -- )

initialize *TYPE* , *EMIT* , *EXPECT* and *KEY*
to point directly to the screen I/O routines,

namely (TYPE) , (EMIT) , (EXPECT) , (KEY)

FORTH/BASE misc ordinary primitive