COM1
\ Example: Simple terminal program
0 value Com1Hndl
variable Com1key-val \ a place to save last key received
0 value Com1key-flg? \ have we already got a key?
fload ComX/COM1/Com1key_.f
fload ComX/COM1/Com1key.f
fload ComX/COM1/Com1emit .f
fload ComX/COM1/do-Com1key.f
fload ComX/COM1/Com1talk.f