Epson LX-90TM Manuale Utente

7-5. 

bottom 

Once the character looks right, type in the next program. The pro-

gram as listed creates the symbol for Mercury, but you can use it for

characters you create if you make one or two changes explained

after the program listing.

NEW
90 FOR P=58 TO 63: LPRINT CHR$(P);: NEXT P

95 LPRINT

100 K=l: IF K>3 THEN A=58 ELSE A=60

110 LPRINT CHR$(27) ":"CHR$(@)CHR$(@)CHR$(@);
120 LPRINT CHR$(27)"%"CHR$(l)CHR$(@);

138 LPRINT CHR$(27)"&"CHR$(0)CHR$(A)CHR$(A-l+K);

FOR Z=l TO K

150 LPRINT CHR$(139);

FOR X=1 TO 9

170 READ R

180 LPRINT CHR$(R);: NEXT X

190 LPRINT CHR$(0)CHR$(0);

200 NEXT Z

DATA 

290 FOR P=58 TO 63: LPRINT CHR$(P);: NEXT P

300 LPRINT: END

To use program 2 for your own character or characters, change the

DATA numbers in line 

210 

by substituting the numbers generated by

program 

1. 

If you have created more than one character, put the

DATA numbers for each character on separate lines as you see in the

example on the next page.

46