Epson FX-80, User Manual

Page: 103 / 376

that are used in different countries. These international characters can
be accessed with:
LPRINT CHR$(27)"R"CHR$(n);
where n is a number from zero to eight. The ESCape “R” sequence
selects one of these nine countries:
0 USA 3 United Kingdom
6
Italy
1
France 4 Denmark
7
Spain
2
Germany 5 Sweden
8 Japan
Once you have selected a country, you can use its special characters.
Choosing a new international character set, however, does not give
you a completely new set of 256 characters. There are 64 international
characters stored in the ROM, 32 in Roman and 32 in Italic typeface,
and of these you can only use
12
characters at a time. Each set of
12
is
stored as the following ASCII numbers:
35, 36, 64, 91, 92, 93, 94, 96, 123, 124, 125, 126
The next program selects each of the international character sets in
turn. When you RUN it, the printout (shown here as Table
6-2)
dis-
plays the special symbols of each set (if you have problems, consult
Appendix F).
NEW
10 DIM ARRAY (12): LPRINT CHR$(27)"M"
20 LPRINT CHR$(27)"D"CHR$(l@)CHR$(@)
30
LPRINT CHR$(l37);
40
LPRINT
“35 36 64
91 92
93 94 96
123 124 125 126"
50 FOR X=1 TO 12: READ ARRAY(X): NEXT X
60 DATA 35,36,64,91,92,93,94,96,123,124,125,126
70 FOR Y=0 TO 8: LPRINT CHR$(27)"R"CHR$(Y);
80 READ C$: LPRINT C$CHR$(137)CHR$(14);
90 FOR X=1 TO 12: LPRINT CHR$(ARRAY(X))"b";
100 NEXT X: LPRINT: NEXT Y
110 DATA "USA","FRANCE","GERMANY","U.K.","DENMARK"
120 DATA "SWEDEN","ITALY","SPAIN","JAPAN"
130 LPRINT CHR$(27)"@"
There are a few items in the program that haven’t been covered yet;
we’ll cover them later. The important thing now is to understand how
you can use the CHR$(27)“R” to gain access to the international
characters.
86