Example 10 REM justification and centering
20 WIDTH "LPT1:",255
30 LPRINT CHR$(27);"Q";CHR$(48);:REM set right margin
40 LPRINT CHR$(27);"a";CHR$(1);"CENTERED"
50 LPRINT "HEADLINE"
55 LPRINT CHR$(27);"a";CHR$(3)
60 LPRINT "Now the right and the left justification ";
70 LPRINT "is on. The lines are filled with blanks ";
80 LPRINT "until they are long enough to reach the ";
90 LPRINT "right margin."
100 LPRINT
110 LPRINT CHR$(27);"a";CHR$(2);"These lines are only"
120 LPRINT "justificated on the"
130 LPRINT "right margin."
140 LPRINT
150 LPRINT CHR$(27);"a";CHR$(0);"Now the default setting"
160 LPRINT "is selected again. The lines are"
170 LPRINT "justified on the left margin."
180 END
Paper and Text Formatting
15