Voila! It should have printed out the three characters we de- fined. Your printout should look like this:

(If it doesn’t, check the last program we ran for errors, then rerun it.)

Let’s find out if there are any other characters in the download RAM. Try this program:

10 LPRINT CHR$(2i')"$1"

20 FOR I=33 TO 126 : LPRINT CHR$(I); : NEXT I

30 FOR I=160 TO 254 : LPRINT CHR$(I); : NEXT I 44)LPRINT

50 LPRINT CHR$(27) "$8"

As you can see, in addition to the characters you have defined (they are the last ones on the printout), SR-lo/15 also printed all characters. This makes it very easy to combine user-defined characters with regular text.

If SR-lo/15 didn’t have this feature, mixing download and standard characters would be rather inconvenient: every time you wanted to use a download character you would have to switch back and forth between character sets.

To demonstrate how to use these characters, let’s use this character set to print a small graph. This program, which has been built around the first program in this chapter, will do just that:

5 ESC$= CHR$(27) : TB$=CHR$(9)

-

10 LPRINT ESC$ "*l" CHR$(lGQ) CHR$(162);-z20 FOR ~=160 TO 162

30 FOR M=@ TO 11

40 READ MM

50 LPRINT CHR$(MM);

60 NEXT M

70 NEXT N

80 LPRINT

90 DATA 139,2,5,8,241,0,0,241,8,5,2,0

100 DATA 139,124,0,66,4,64,36,16,2,16,12,0

110 DATA 139,46,16,2,60,0,48,0,48,0,48,0 120 LPRINT ESC$ "D" CHR$(ll) CHR$(@

130 LPRINT CHR$(14) " U.S. Exports"

92

Page 102
Image 102
Star Micronics SR-10/I5 user manual Read MM Lprint CHR$MM Next M Next N