3260
DATA
15, 15,
0, 0,
0,
0, 0,
0, 0, 0
3270
DATA 0, 1, 3, 3.
7. 7. 15. 14. 14. 14
3280 DATA 14; 15; 7; 7; 7; 3; 0; 0; 0; 0
3290
DATA 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
3300
DATA 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
3310
DATA 1, 3, 7, 7, 7, 15, 14, 14, 14, 14
3320
DATA 14, 7, 7, 3, 3, 15, 15, 15, 0, 0
3330
DATA 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
3340
DATA 0, 0, 60,255,255,255,255,255,143, 15
3350
DATA 7, 7, 7, 7, 3, 3, 3,131,193,241
3360
DATA 240,240, 0, 0, 0, 0, 0, 0, 0, 1
3370
DATA 121,253,253,255,255,255,143, 7, 7, 7
3380
DATA 31,253,252,248,248,240,192, 0, 7, 15
3390
DATA 31, 31, 15, 7, 3, 0, 0, 0, 0, 0
3400
DATA 0, 0, 0, 0, 0, 0, 0, 0, 60,255
3410
DATA
255,255,255,255,143, 15, 7, 7, 7, 7
3420
DATA 3, 3, 3,131,193,241,240,240, 0, 0
3430
DATA 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
3440
DATA 0, 31, 31, 3,129,128,192,192,192,192
3450
DATA
192,224,224,224,224,240,255,255,255,255
3460
DATA 255,127, 0, 0, 0, 0, 63,127,255,255
3470
DATA
255,255,193,128,128,128,192,224,224,240
3480
DATA 252,255,255,255,127, 63, 31, 7, 7, 31
3490
DATA
254,252,248,224,128, 0, 0, 3, 7, 7
3500
DATA 7, 3, 0, 0, 0, 0, 0, 31, 31, 3
3510
DATA 129,128,192,192,192,192,192,224,224,224
3520
DATA 224,240,255,255,255,255,255,127, 0, 0
3530
DATA 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
3540
DATA 0,248,248,240,224,224,112,112, 56, 56
3550
DATA 56, 56, 56,120,120,240,240,224,224,192
3560
DATA 128, 0, 0, 0, 0, 0,192,224,240,240
3570
DATA 240,248,248,248,120,120, 56, 56, 56, 56
3580
DATA 48,112,224,224,224,224,240,240,248,248
3590
DATA 120,120, 56, 56, 56, 56,120,240,224,224
3600
DATA 192,128, 0, 0, 0, 0, 0,248,248,240
3610
DATA 224,224,112,112, 56, 56, 56, 56, 56,120
3620
DATA 120,240,240,224,224,192,128, 0, 0, 0
3630
DATA 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
How the program works
This program begins by assigning a number of printer commands to
BASIC string variables (lines 1000 to 1090). You can find most of these
commands near the beginning of Appendix B.
The WIDTH “LPTl:” 255 statement in line 1110 means infinite line
width. It prevents the IBM-PC from inserting unwanted carriage returns
and line feeds in graphics data.
42