Epson LX-90TM Manuale Utente

Pagina di 122
Definition program 
1
The BASIC program below will help you translate your design into
a character your LX-90 can print. Type it in now so that you can run it
soon.
NEW
100 DIM F(9)
110 FOR I=1 TO 9
120 PRINT "WHICH ROWS HAVE DOTS IN COLUMN";I
130 
INPUT R
: IF R=0 TH
E
N 150
140 F(I)=F(I)+2ˆ(R-1)
150 
IF 
R=0 
THEN 
NEXT I ELSE GOTO 
130
160 LPRINT CHR$(27) ":"CHR$(0)CHR$(0)CHR$(0);
179 LPRINT CHR$(27)"%"CHR$(l)CHR$(0);
180 LPRINT CHR$(27)"&"CHR$(0)"<<";
190 LPRINT CHR$(128);
200 
FOR X=1 TO 9
210 LPRINT CHR$(F(X));: NEXT X
220 LPRINT CHR$($l)CHR$(0);
239 
LPRINT 
"YOUR CHARACTER IN PICA: <<<"
240 LPRINT "IN EXPANDED EMPHASIZED PICA: ";
250 LPRINT CHR$(27)"!*<<<"
260 LPRINT CHR$(27) "!"CHR$(0)"YOUR DATA NUMBERS:"
270 FOR K=l TO 9: LPRINT F(K);: NEXT K
300 LPRINT: END
So that you can see how the program works, the next paragraphs
present the steps used to create the symbol for Mercury. First is the
grid used to design the character.
Figure 
7-4. 
Design 
for 
character
44