
30 LPRINT "This line is CONDENSED pitch."
4@ LPRINT CHR$(27) "B" CHR$(2) ; 'Select elite pitch. 541LPRINT "This line is ELITE pitch."
60 LPRINT CHR$(27) "p" CHR$(l) ; 'Select proportional. 741LPRINT "This line is PROPORTIONAL spacing."
88 LPRINT CHR$(27) "p" CHR$(@) ; 'Cancel proportional. 98 LPRINT CHR$(27) "By CHR$(l) ; 'Select pica pitch. 188 LPRINT "This line is PICA pitch (normal)."
When you run this program you should get this:
This lineisCONDENSED pitch.
This line is ELITE pitch.
-
This line is PROPORTIONhL spacing.
This | line | is F'ICA pitch Incwmal). |
| - | |
Line 20 turns on condensed pitch with < ESC > “B” CHR$(3). |
|
| |||
Line 30 prints a line at 17 characters per inch. The < ESC > “B” |
|
| |||
CHR$(2) in line 40 changes |
|
| |||
prints a line in elite pitch. Line 60 turns on proportional spacing |
|
| |||
with < ESC > “p” CHR$(l), and line 70 prints a line with |
|
| |||
proportional spacing. Line 80 and line 90 reset |
|
| |||
pitch and line 100 prints a line in pica pitch. |
|
| |||
Pica pitch and condensed pitch can be set with “shortcut” codes. |
|
| |||
Instead | of using < ESC > “B” CHR$(n), | you can set them with |
| ||
a single code. CHR$( 18) sets pica pitch and CHR$( 15) sets |
|
| |||
condensed pitch. You can not set elite pitch with a single code. |
|
| |||
N Expanded |
|
|
| ||
Each | of | can be enlarged to twice | v’ | - | |
its normal width. This is called expanded print.Try this program |
| - | |||
|
|
|
|
|
to see how it works:
10 'Demo expanded mode.
2@ LPRINT "Demonstration of " ;
30 LPRINT CHR$(14) ; 'Expanded mode on.
40 LPRINT "EXPANDED" ;
50 LPRINT CHR$(2Q)) ; 'Expanded mode off.
60 LPRINT " printing."
70 LPRINT "Notice that " ;
84)LPRINT CHR$(14) ; 'Expanded mode on.
98 LPRINT "EXPANDED mode"
100 LPRINT "automatically turns off at end of a line."
-
-
-
-
-
42-