![](/images/new-backgrounds/1185826/185826143x1.webp)
65
You can turn
20 A$="" : INPUT " TYPE A CHARACTER ",A$ 30 IF A$="" THEN 50
40 LPRINT A$; : GOT0 20
50 LPRINT : LPRINT CHR$(27);"@"
Now type several characters, and after each press the RETURN key. True to form, the printer just stuffs the characters into its buffer while it waits for a carriage return code. (In this program the RETURN key doesn’t send a car- riage return code.) To end this program and print the contents of the buffer, press RETURN alone.
Now add this line:
10 LPRINT CHR$(27);"il";
And RUN the program. Your printer responds to your typing - immediately.
’When you are finished, press RETURN alone.
nAdjusting the width of space between characters
This printer provides a command that adjusts the space be- tween the NLQ characters that it prints when the DIP switch l- 6 is set on. The (ESC) CHR$(32) CHR$(n) command adds blank space between the characters. The units of space that are added vary in
Try thisprogram toseehow thisworks.
10 ’ Demo of adjusting spaces
20 LPRINT CHR$( 27);"xl";
30 FOR I=10 TO 1 STEP
40 LPRINT CHR$(27);" ";CHR$(I);
50 LPRINT "This line is added";I;"spaces."
60 NEXT I