Tandy 1000 Programmer's Reference Guide

Chapter 1 I System Calls
Example:
The following program prints the file names TEXTEILE.ASC
that is on the disk in Drive
B. If a partial record is in the buffer
at end
of file, the routine that prints the partial record prints
characters until it encounters an end of file mark (ASCII
26, or
CONTROL-Z).
fcb
buffer
func- 0FH:
read- line:
print-it:
check- more:
f ind-eof :
all- done:
db 2, "TEXTFILEASC"
db 25 dup (7)
db 128 dup (7)
set-dta buffer
open fcb
read-5eq fcb
CmP
le
CmP
19
al, 02H
all-done
ai ,00H
check-more
mov
xor
print-
i nc
loop
JmP
CmP
Jne
mov
xor
CmP
close
cx,128
char buffer [ 51 1
51,51
51
print-it
read-1 ine
al,03H
all- done
cx,128
bufferl5il,26
fcb
51,51
;see Function IAH
;THIS FUNCTION
;5ee Function 14H
;end of file?
!yes, o home
,more 90 come?
;no, check for partial
;Record
!yes, print the buffer
,set index to 0
;see Function 05H
;bump index
;print next character
;read another record
!part. record to print?
,no
;ye5, print it
;set index to 0
;end of file mark?
;5ee Function 10H
50

Tandy 1000 Specifications

General

Processor	Intel 8088
Processor Speed	4.77 MHz
RAM	128 KB (expandable to 640 KB)
Operating System	MS-DOS 2.11
Manufacturer	Tandy Corporation
Release Year	1984
Storage	Single or double 5.25" floppy disk drive (360 KB), optional hard drive
Sound	Tandy 3-voice sound
Ports	Parallel, Serial
Graphics	CGA (Color Graphics Adapter)
Graphics Modes	320x200, 640x200