9. Bar code and enlarged character
Enlarged character print samples
This page shows examples of a BASIC program for printing enlarged characters and the printed enlarged characters (actual size).
100 OPEN "LPT1:"AS #1
110DC4$=CHR$(&H14)
120'
130 | PRINT #1, DC4$;DC4$;"@"; | 'Initializing |
140 | PRINT #1,DC4$;DC4$;"c";CHR$(8); | 'Expansion of cell: x8 |
150 | PRINT #1,DC4$;DC4$;"f";CHR$(4); | 'Font typeface: SCRIPT |
160 | PRINT #1,DC4$;DC4$;"p";CHR$(1); | 'Character pitch: 12 CPI |
170 | PRINT #1,DC4$;DC4$;"l";CHR$(1); | 'Expansion mode on |
180 | ' |
|
190 | PRINT #1,"8"; | 'Default size print |
200 | PRINT #1,DC4$;DC4$;"h";CHR$(2); | ' Vertical expansion: x2 |
210 | PRINT #1,DC4$;DC4$;"w";CHR$(2); | 'Horizontal expansion: x2 |
220 | PRINT #1,DC4$;DC4$;"a";CHR$(3); | 'Alignment: ascender |
230 | PRINT #1,"ASCE"; |
|
240 | PRINT #1,DC4$;DC4$;"a";CHR$(2); | 'Alignment: center |
250 | PRINT #1,"CENT"; |
|
260 | PRINT #1,DC4$;DC4$;"a";CHR$(1); | 'Alignment: descender |
270 | PRINT #1,"DESC"; |
|
280 | PRINT #1,DC4$;DC4$;"a";CHR$(0); | 'Alignment: baseline |
290 | PRINT #1,"BASE"; |
|
300 | ' |
|
310 | PRINT #1,DC4$;DC4$;"w";CHR$(8); | 'Horizontal expansion: x8 |
320 | PRINT #1,"H"; |
|
330 | PRINT #1,DC4$;DC4$;"w";CHR$(1); | 'Horizontal expansion: x1 |
340 FOR N=1 TO 8 |
| |
350 | PRINT #1,DC4$;DC4$;"h";CHR$(N); | 'Vertical expansion: xn |
360 | PRINT #1,RIGHT$;(STR$(N),1); ' |
|
370 NEXT N |
| |
380 | PRINT #1,DC4$;DC4$;"w";CHR$(8); | ' Horizontalexpansion: x8 |
390 | PRINT #1,DC4$;DC4$;"r";CHR$(1); | 'Rotate: 90 degree |
400 PRINT #1, "R" ; |
| |
410 | PRINT #1,CHR$;(13);CHR$(10); ' CR+LF | |
420 | ' |
|
430 | PRINT #1,DC4$;DC4$;"l";CHR$(0); | 'Expansion mode off |
440 CLOSE #1
450 END
94
