Using The Display - Tandy Color Computer 3 Manual

Using
the
Display
Note:
All
the characters
in
the
program must appear
in
normal colors (black with
a green background).
If
they
appear
in
reversed
colors
(green
with
a black background),
you need
to start
over.
Turn the
computer
off,
wait
15
seconds,
turn
it
back on
again,
and
(with
the characters
in
normal
colors)
enter the
program:
10 ON
BRK GOTO 190 (ENTER)
20
HSCREEN
2
CEEEED
30
60SUB 150
(
ENTER)
40 FOR
R
= TO
1
5
(ENTER)
50
HC0L0R R,15
CEHIHD
60
HLINE
<R*20,0)-((R+1)*20,192),
PSET,
BF
CEHUBD
70
HCOLOR 0,0 (ENTER)
80
NEXT
R
(ENTER)
90 FOR
N =
TO
3
(ENTER)
100 GOSUB 150
(
ENTER
)
__
110
A$=INKEY$:
IF
A$ =
'"
THEN 110 (ENTER)
120 NEXT
N
(ENTER)
130
PALETTE CMP (ENTER)
140 END
dHHBD
^_^
150 FOR
R
=
TO
15
(ENTER)
160
PALETTE
R,
<N*16)+R (ENTER)
170 NEXT
R
(ENTER)
180
RETURN (ENTER)
190
PALETTE
CMP:
END (ENTER)
This
program
is
too long
to
all
fit
on one
screen. So,
to
check
your
program
for
typing
errors,
display
(list)
only
a
portion of
the
program
at
a
time.
First
type:
LIST 10-100 (ENTER)
The
first
10
lines of
your
program appear on
the screen.
They should
look
like this:
10
ON BRK GOTO 190
20
HSCREEN
2
30
GOSUB 150
40 FOR R=0 TO
15
50
HCOLOR R,15
60
HLINE (R*20,0)-((R+1)*20,192), PSET,
BF
70
HCOLOR 0,0
80
NEXT
R
90 FOR N=0 TO
3
100 GOSUB 150
Then,
type:
LIST
110-190LENIERJ
18