Tandy 1000 Programmer's Reference Manual page 57

Chapter 1
I System Calls
Example:
The following program displays the number of files on the disk
in Drive
B.
message
f i l e s
t e n
t e n
f c b
b u f f e r
f u n c - 1 2 H :
s e a r c h - d i r :
d o n e :
a 1 1-done:
db
d b
0
db 1 0
db
1 0
"No f
I
I es"
,
1 0
,
1 3,
" $ ' I
d b
2 ,
" 7 7 7 7 7 7 7 7 7 7 7 "
db
db
s e t - d t a b u f f e r
search-first fcb
CmP a1,BFFH
le
a l l - d o n e
i
nc f i l e s
s e a r c h - n e x t f c b
CmP a1,EFFH
l e
d o n e
i n c f i l e 5
Imp
s e a r c h - d i r
c o n v e r t f i l e s , t e n , m e 5 5 a g e
d i s p l a y message
;see F u n c t i o n 1AH
; 5 e e
F u n c t i o n 1 1 H
; d i r e c t o r y e n t r y f o u n d ?
; n o , n o f i l e 5 o n d i s k
; y e s , i n c r e m e n t f i l e
; c o u n t e r
;THISFUNCTION
; d i r e c t o r y e n t r y f o u n d 7
; n o
; y e s , i n c r e m e n t f i l e
; c o u n t e r
; c h e c k a g a i n
; 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 09H
55