summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/enctex/1250-il2.tex
blob: b0ff6773caf9cd2508737d8614801e9c4985beb8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
%%% The encoding table, v.Aug.1997 (C) Petr Ol\v s\'ak
%%% input: CP1250, in system used: ISO8859-2
\ifx\xordcode\undefined
   \message{Warning: the xord/xchr accessing is not possible}
   \endinput \fi
\let\Xordcode=\relax  \let\Yordcode=\relax
\def\setinputcode #1 #2 {\Xordcode#1=\the\xordcode#2\relax
                         \Yordcode#2=\the\xordcode#2\relax}
\xdef\restoreinputencoding{%
%
%                 1250 il2
   \setinputcode  "BC  "A5  % \v L
   \setinputcode  "BE  "B5  % \v l
   \setinputcode  "8A  "A9  % \v S
   \setinputcode  "9A  "B9  % \v s
   \setinputcode  "8D  "AB  % \v T
   \setinputcode  "9D  "BB  % \v t
   \setinputcode  "8E  "AE  % \v Z
   \setinputcode  "9E  "BE  % \v z
}
\def\Yordcode#1=#2\relax{} \let\Xordcode=\xordcode
\restoreinputencoding  % nyní se nastaví nový xord
\def\Xordcode#1=#2\relax{} \let\Yordcode=\xordcode