International Characters; Program For International Characters - Epson FX-80 User Manual

International characters or ... Around the world inFX-80 days
Your FX-80 has the makings of quite a world traveler. Hidden in the
ROM are letters and special characters used in nine different coun-
tries. These international characters can be accessed with:
LPRINT CHR$(27)"R"CHR$(n);
where n is a number from 0 to 8. The (ESC) "R" sequence selects one
of the nine countries:
o
USA
3 England 6 Italy
1 France 4 Denmark
7 Spain
2 Germany 5 Sweden
8 Japan
Choosing a new international character set does not give you a com-
pletely new set of 256 characters. There are 64 international characters
stored in the ROM; 32 in roman and 32 in italic typeface. But they are
stored as codes 0 to 31 and 128 to 159, which are not normally accessi-
ble (see Chapter 17).
The (ESC) "R" command makes these symbols available to us-12
characters at a time-as the following ASCII numbers:
35,36,64,91,92,93,94,96,123,124,125,126
The program shown as FigUre 6-1 runs through the different inter-
national character sets. When you RUN it, the printout (shown here
as Table 6-2) displays the symbols used in each set:
72
NEW
11i' DIM ARRAY(12): LPRINT CHR$(27)"M"
21i' LPRINT CHR$(27)"D";: FOR N
=
15 TO 81 STEP 6
31i' LPRINT CHR$(N);: NEXT N: LPRINT CHR$(1)
41i' FOR X
=
1 TO 12: READ ARRAY(X)
51i' LPRINT CHR$(9);ARRAY(X);: NEXT X: LPRINT
55 ' Apple see Appendix I
61i' DATA 35,36,64,91,92,93,94,96,123,124,125,126
71i' FOR Y
=
Ii' TO 8: LPRINT CHR$(27)"R"CHR$(Y);
75 ' Model I see Appendix I
81i' READ C$: LPRINT C$;TAB(17);CHR$(14);
91i' FOR X
=
1 TO 12: LPRINT " "CHR$(ARRAY(X))"
If;
11i' 1 i' NEXT X: LPRINT: NEXT Y
111i'DATA "U.S.A.","FRANCE","GERMANY","ENGLAND"
121i'DATA "DENMARK", "SWEDEN", "ITALY", "SPAIN", "JAPAN"
Figure 6·1. Program for international characters.