Figure 5-3. Dress-up combinations

Master Select base and then add the sequence(s) that you want to embellish it. Here is a program that does just that, several times.

NEW

10 N=4: GOSUB 70: LPRINT CHR$(27)"S1THE FX"CHR$(27)"T"

20 N=17: GOSUB 70: LPRINT CHR$(27)"-1PRINTERS"

30 N=8: GOSUB

70: LPRINT

CHR$(27)"-0HAVE EVER"

40 N=49: GOSUB

70: LPRINT

"EXPANDING"

50 N=56: GOSUB 70: LPRINT

CHR$(27)"4POSSIBLITIES"

60 LPRINT

CHR$(27)"@": END

70 LPRINT

CHR$(27)"!"CHR$(N);: RETURN

Notice that we‘ve stored the Master Select sequence as a subroutine in line 70 to save typing. As we’ve called up the subroutine and given it a new number, we’ve three times added the ESCape codes for Subscript (line 10), Underline (line 20), and Italic (line 50) Modes. The Reset in line 60 returns the printer to its defaults.

To aid you in quickly finding your way around in this forest of possibilities, we offer Table 5-2.

77