Computer
Graphics
Operation
Manual
-----------TRS-SO
®
----------
1.0'
DATA
"OR",
"AND",
"PRESET",
"PSET",
"XOR"
2.0'
CLR
: SCREEN
.0'
3.0'
FOR
Y=
1.0'
TO
21.0'
STEP
5.0'
4.0'
FOR
X=
.0'
TO
4.0'.0'
STEP
2.0'.0'
5.0'
LINE
(X+4g,Y-5)-(X+lgg,Y+25),1,B
6.0'
NEXT
X
7.0'
LINE
(5g,Y)-(9g,Y+lg),1,BF
ag
FOR
X=
2.0'.0'
TO
4.0'.0'
STEP
2.0'.0'
9.0'
LINE
(x+sg,Y)-(X+7g,Y+2g),1,BF
1.0'.0'
NEXT
X
11.0'
NEXT
Y
12.0'
DIM
vngg)
13.0'
GET
(5g,lg)-(9g,3g),V
14.0'
FOR
N=
1
TO
5
15.0'
R=
(N-l)*5+1
16.0'
READ
A$
165
GLOCATE
(136,R*lg),g
17.0'
PRINT
#-3,
A$;
175
GLOCATE
(36g,R*lg),g
lag
PRINT
#-3,
"=
";
19.0'
ON
N
GOTO
2.0'.0',
21.0',
22.0', 23.0',
24.0'
2.0'.0'
PUT (45.0',1.0'),
V,OR:
GOTO
25.0'
21.0'
PUT
(45~,6g),
V,AND:
GOTO
25.0'
22.0'
PUT
(45~,11g),
V,PRESET:
GOTO
25.0'
23~
PUT
(45~,16g),
V,PSET:
GOTO
25.0'
24.0'
PUT
(45~,21g),
V,XOR
25.0'
NEXT
N
26.0'
CMD
"I",
"GPRINT"
27.0'
SCREENl
~
OR
IJ
[rJ
~
AND
IJ
~
~
PRESET
IJ
[;;]
~
PSET
IJ
~
~
XOR
IJ
~
Figure
17
----------Itadlolhaell----------
-5.0'-