200
data
152,152,254,254,146,146,255,255
210
data
146,146,254,254,152,152,128,128
Results:
Combining
Bit
Images
to
Form
a
Larger
Image
You
can create images larger than the seven
row
grid allows by
combining
grids.
The
following
program
provides an example
of
how
you
can design a larger character
by
using
DATA
statements
to place three
programmed
bit images
together
to form a larger
character.
10
opeh
1,4,7
20
f(Jt'
t'=l
tel
3
30
for
c=l
to
16
40
read
a:a$(r)=a$(r)+chr$(a)
50
ne:·:t
c
60
ne:·:t
t'
70
print#i,chr$(8);
80
few
t':=1
to
3
90
pt'int#1,
a$
(t-·)
100
lie:·: t
t'
110
print#l,chr$(15)
120
for
1=1
to
8:print#1:next
1
130
close
1
140
end
200
data
129,129,250,250,158,158,255,255
210
data
158,158,250,250,129,129,128,128
220
data
128,128,159,159,243,243,179,179
230
data
243,243,159,159,128,128,128,128
240
data
128,128,
130,
130,
131,131,
12H,
LTI
:~50
data
131,1.31,130,130,128,128,
l2f.:1,
L?U
7-3