1
86
320 LPRINT
330 LPRINT CHR$(9);+-";
340 SCALE$="--+--'I
350 FOR I=2 TO 8 STEP 2
360 LPRINT SCALES;
370 NEXT I
380 LPRINT I'--+"
390 LPRINT CHR$(9);" 'I;
400 FOR I=2 TO 8 STEP 2
410 LPRINT " ";I;
420 NEXT I
430 LPRINT CHR$(27);"%0".
440 LPRINT CHRS(27);"SO";
450 LPRINT CHR$(9);"MILLIONS OF DOLLARS"
460 LPRINT CH.R$(27);"T"
470 END
DEFINING PROPORTIONAL CHARACTERS
Defining proportional characters uses the same process as
above, except that we add additional information. Being able to
specify the width of the character allows you to specify the
precise area inside the grid that the character will occupy, so
that narrow characters will look attractive next to wide ones.
The additional information is carried in the attribute byte, m0.
The first bit carries the descender data, the next three bits
specify the starting column (acceptable values are 0 to 7), and
the last four bits specify the last print column, including space
when desired. Acceptable values are from 4 and 11. The
minimum character width is five dots, anywhere within the
range.