![](/images/new-backgrounds/1168304/168304187x1.webp)
82 | Delta User’s Manual |
Figure Y-10. The attribute byte (n2) for our heart character.
You’ll probably recognize ml. . .mll from the top of our lay- |
| - | |||||||
|
| ||||||||
out grid. That’s right, each column is described by one byte. Now |
|
| |||||||
we’ve | got everything | we | need to download | one | character | to the | - | - | |
printer. The complete command for our heart character is shown |
|
| |||||||
in Figure |
|
|
|
|
|
|
| - | |
| CHR$(27) CHR$(42) CHR$(I) | CHR$(72) CHR$(ll) | CHR$(4) |
|
|
| |||
| Escape | * | 1 | n, | n2 | ml |
|
| |
|
|
|
| ||||||
| CHR$(lO)CHR$(2O)CHR$(IO)CHR$(52)CHR$(72) |
|
|
|
| ||||
| m2 | 4 | m4 | m5 | 3 |
|
|
|
|
| CHR$(52)CHR$(lO)CHR$(20)CHR$(lO) CHR$(4) |
|
|
|
| ||||
| m, | me | m, | 9, | ml, |
|
|
|
|
Figure |
|
|
| . | . | . |
| - | |
|
printer.
-
Now let’s send the information to the printer. The following program will send the character definitions for all four characters to the printer. Enter the program and run it.
10 FOR I=1 TO 4
2@ LPRINTCHR$(27)"*" CHR$(l);
39READ Nl,N2
4p LPRINTCHR$(Nl)CHR$(N2); 5pI FOR M=l TO 11
69READ Ml
70LPRINTCHR$(Ml);
80NEXT M
90NEXT
-
-
-