Radio Shack TRS-80 User Manual page 198

10 IN.
"WHICH
CAR'
S
ENGINE, COLOR
t
STYLE DO
YOU WANT
TO
KNOW";W
130
FOR
B
=
201 TO 210
135
READ ACB)
140
NEXT
B
180 P.
"LICENSE #", "ENGINE SIZE", "COLOR CODE", "BODY STYLE
210
P.
W,A(
W) ,A<
W+100) ,A(W+200)
400
DATA 20,20,10,20,30,20,30,10,20,20
SAMPLE
ANSWER FOR EXERCISE
22-1
:
Insert
the following lines:
105 IF
Y=46 THEN 180
115
IF
Y=l
THEN
180
150
PRINT AT
Y*64+32," "
160
G.90
*i^tv^^'ii>ujin
^n
i\iu^ iHiiHi
*i
IN
w
j'^m <'.u*
i
i mii>i>MnjrTirriiifTr^T~iTTTnT;
n"vr
180
PRINT
AT Y*64+32,
"PING
"
190
G.90
Note
that line
180 prints the
"ping"
and
line
150 makes
it
disappear
by
printing
blanks
in
its
place.
196