Tandy 1000 Programmer's Reference Manual page 41

Chapter
1
I System Calls
Example:
The following program sets the system clock to 0 and
continuously displays the time. When any character is
typed, the display stops changing;
typed again, the clock is reset
starts again.
time
t e n d b
1 8
d b " E E : 0 E : E E
,
E 0"
,
1
3
,
1 0
, " $ "
f u n c - E 6 H :
5 e t - t i m e E , E , E , E
r e a d - c l o c k : g e t - t i m e
c o n v e r t c h , t e n , t i m e
c o n v e r t c l , t e n , t i m e [ 3 1
c o n v e r t d h , t e n , t i m e [ 6 1
d i s p l a y t i m e
d i r - c o n s o l e - i o EFFH
J mP
r e a d - c l o c k
] n e
5 t O P
r e a d - k b d
I m p f u n c - 0 6 H
when any character is
to 0 and the display
; s e e F u n c t i o n
E9H
; f o r e x p l a n a t i o n
o f 4
; s e e F u n c t i o n
ZDH
; s e e F u n c t i o n ZCH
; s e e e n d
o f
c h a p t e r
; s e e e n d o f c h a p t e r
; s e e e n d o f c h a p t e r
; s e e F u n c t i o n E9H
; T H I S FUNCTION
; y e 5 ,
5 t o p t i m e r
; n o , keep
timer
; r u n n i n g
; s e e
F u n c t i o n 08H
; s t a r t o v e r
39