summaryrefslogtreecommitdiff
path: root/tex/context/base/unic-004.mkii
blob: b6e210193a70b3a4741b9c3f141c685a2bd83479 (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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
%D \module
%D   [       file=unic-004,
%D        version=2005.01.27,
%D          title=\CONTEXT\ \UNICODE\ Macros,
%D       subtitle=Vector 4,
%D         author=Mikael Persson \& Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

\unprotect

\startunicodevector 4
  \expandafter\strippedcsname
  \ifcase\numexpr#1\relax
    \cyrillicEgrave             \or % 04-00 \uchar0{200} aswell
    \cyrillicYO                 \or % 04-01 Capital YO (or IO)
    \cyrillicDJE                \or % 04-02
    \cyrillicGJE                \or % 04-03 not in enco-uc.tex
    \cyrillicIE                 \or % 04-04 Ukrainian IE
    \cyrillicDZE                \or % 04-05
    \cyrillicII                 \or % 04-06 Byelorussian-ukrainian I
    \cyrillicYI                 \or % 04-07
    \cyrillicJE                 \or % 04-08 same letter as latin J?
    \cyrillicLJE                \or % 04-09
    \cyrillicNJE                \or % 04-0A
    \cyrillicTSHE               \or % 04-0B
    \cyrillicKJE                \or % 04-0C
    \cyrillicIgrave             \or % 04-0D I with grave
    \cyrillicUSHRT              \or % 04-0E
    \cyrillicDZHE               \or % 04-0F
    \cyrillicA                  \or % 04-10
    \cyrillicB                  \or
    \cyrillicV                  \or
    \cyrillicG                  \or
    \cyrillicD                  \or
    \cyrillicE                  \or
    \cyrillicZH                 \or
    \cyrillicZ                  \or
    \cyrillicI                  \or
    \cyrillicISHRT              \or
    \cyrillicK                  \or
    \cyrillicL                  \or
    \cyrillicM                  \or
    \cyrillicN                  \or
    \cyrillicO                  \or
    \cyrillicP                  \or
    \cyrillicR                  \or
    \cyrillicS                  \or
    \cyrillicT                  \or
    \cyrillicU                  \or
    \cyrillicF                  \or
    \cyrillicH                  \or
    \cyrillicC                  \or
    \cyrillicCH                 \or
    \cyrillicSH                 \or
    \cyrillicSHCH               \or
    \cyrillicHRDSN              \or
    \cyrillicERY                \or
    \cyrillicSFTSN              \or
    \cyrillicEREV               \or
    \cyrillicYU                 \or
    \cyrillicYA                 \or
    \cyrillica                  \or % 04-30
    \cyrillicb                  \or
    \cyrillicv                  \or
    \cyrillicg                  \or
    \cyrillicd                  \or
    \cyrillice                  \or
    \cyrilliczh                 \or
    \cyrillicz                  \or
    \cyrillici                  \or
    \cyrillicishrt              \or
    \cyrillick                  \or
    \cyrillicl                  \or
    \cyrillicm                  \or
    \cyrillicn                  \or
    \cyrillico                  \or
    \cyrillicp                  \or
    \cyrillicr                  \or
    \cyrillics                  \or
    \cyrillict                  \or
    \cyrillicu                  \or
    \cyrillicf                  \or
    \cyrillich                  \or
    \cyrillicc                  \or
    \cyrillicch                 \or
    \cyrillicsh                 \or
    \cyrillicshch               \or
    \cyrillichrdsn              \or
    \cyrillicery                \or
    \cyrillicsftsn              \or
    \cyrillicerev               \or
    \cyrillicyu                 \or
    \cyrillicya                 \or % 044F
    \cyrillicegrave             \or % 0450 not i enco-uc.tex but same as \uchar0{232}
    \cyrillicyo                 \or % 0451 small yo (or io)
    \cyrillicdje                \or % 0452 serbian letter
    \cyrillicgje                \or % 0453 macedonian letter not in enco-uc.tex
    \cyrillicie                 \or % 0454 ukrainian ie
    \cyrillicdze                \or % 0455 macedonian zelo
    \cyrillicii                 \or % 0456 byelorussian-ukrainian i.
    \cyrillicyi                 \or % 0457
    \cyrillicje                 \or % 0458 not in enco-uc.tex same as latin j?
    \cyrilliclje                \or % 0459
    \cyrillicnje                \or % 045A
    \cyrillictshe               \or % 045B
    \cyrillickje                \or % 045C macedonian, not in enco-uc.tex
    \cyrillicigrave             \or % 045D macedonian, cyr i with grave not in enco-uc.tex
    \cyrillicushrt              \or % 045E
    \cyrillicdzhe               \or % 045F
    \cyrillicOMEGA              \or % 0460 Omega not in enco-uc.tex
    \cyrillicomega              \or % 0461 omega not in enco-uc.tex
    \cyrillicYAT                \or % 0462 Yat not in enco-uc.tex
    \cyrillicyat                \or % 0463 Yat not in enco-uc.tex
    \cyrillicEiotified          \or % 0464 iotified E not in enco-uc.tex
    \cyrilliceiotified          \or % 0465 iotified e not in enco-uc.tex
    \cyrillicLITTLEYUS          \or % 0466 Little Yus not in enco-enc.tex
    \cyrilliclittleyus          \or % 0467 Little yus not in enco-enc.tex
    \cyrillicLITTLEYUSiotified  \or % 0468 Little Yus iotified not in enco-enc.tex
    \cyrilliclittleyusiotified  \or % 0469 Little yus iotified not in enco-enc.tex
    \cyrillicBIGYUS             \or % 046A Big Yus not in enco-enc.tex
    \cyrillicbigyus             \or % 046B Big yus not in enco-enc.tex
    \cyrillicBIGYUSiotified     \or % 046C Big Yus iotified not in enco-enc.tex
    \cyrillicbigyusiotified     \or % 046D Big yus iotified not in enco-enc.tex
    \cyrillicKSI                \or % 046E Ksi not in enco-enc.tex
    \cyrillicksi                \or % 046F ksi not in enco-enc.tex
    \cyrillicPSI                \or % 0470 Psi not in enco-enc.tex
    \cyrillicpsi                \or % 0471 psi not in enco-enc.tex
    \cyrillicFITA               \or % 0472 Fita not in enco-enc.tex
    \cyrillicfita               \or % 0473 fita not in enco-enc.tex
    \cyrillicIZHITSA            \or % 0474 Izhitsa not in enco-enc.tex
    \cyrillicizhitsa            \or % 0475 izhitsa not in enco-enc.tex
    \cyrillicIZHITSAdoublegrave \or % 0476 Izhitsa double grave not in enco-enc.tex
    \cyrillicizhitsadoublegrave \or % 0477 izhitsa double grave not in enco-enc.tex
    \cyrillicUK                 \or % 0478 UK not in enco-enc.tex
    \cyrillicuk                 \or % 0479 uk not in enco-enc.tex
    \cyrillicOMEGAround         \or % 047A Round Omega not in enco-enc.tex
    \cyrillicomegaround         \or % 047B Round omega not in enco-enc.tex
    \cyrillicOMEGAtitlo         \or % 047C Omega with titlo not in enco-enc.tex
    \cyrillicomegatitlo         \or % 047D omega with titlo not in enco-enc.tex
    \cyrillicOT                 \or % 047E OT not in enco-enc.tex
    \cyrillicot                 \or % 047F ot not in enco-enc.tex
    \cyrillicKOPPA              \or % 0480 KOPPA not in enco-enc.tex
    \cyrillickoppa              \or % 0481 koppa not in enco-enc.tex
    \unknownchar                \or % 0482
    \cyrillicTITLO              \or % 0483 TITLO not in enco-enc.tex
    \cyrillicPALATALIZATION     \or % 0484 PALATALIZATION not in enco-enc.tex
    \cyrillicDASIAPNEUMATA      \or % 0485 DASIA PNEUMATA not in enco-enc.tex
    \cyrillicPSILIPNEUMATA      \or % 0486 PSILI PNEUMATA not in enco-enc.tex
    \unknownchar                \or % 0487
    \unknownchar                \or % 0488
    \unknownchar                \or % 0489
    \cyrillicISHRTtail          \or % 048A ISHRT with tail not in enco-enc.tex
    \cyrillicishrttail          \or % 048B ishrt with tail not in enco-enc.tex
    \cyrillicSEMISOFT           \or % 048C SEMISOFT not in enco-enc.tex
    \cyrillicsemisoft           \or % 048D semisoft not in enco-enc.tex
    \cyrillicERtick             \or % 048E ER with tick not in enco-enc.tex
    \cyrillicertick             \or % 048F er with tick not in enco-enc.tex
    \cyrillicGHEupturn          \or % 0490 GHE with upturn not in enco-enc.tex
    \cyrillicgheupturn          \or % 0491 ghe with upturn not in enco-enc.tex
    \cyrillicGHEstroke          \or % 0492 GHE with stroke not in enco-enc.tex
    \cyrillicghestroke          \or % 0493 ghe with stroke not in enco-enc.tex
    \cyrillicGHEmidhook         \or % 0494 GHE with middle hook
    \cyrillicghemidhook         \or % 0495 ghe with middle hook
    \cyrillicZHEdescender       \or % 0496 ZHE with descender
    \cyrilliczhedescender       \or % 0497 zhe with descender
    \cyrillicZDSC               \or % 0498 ZE with descender
    \cyrilliczdsc               \or % 0499 ze with descender
    \cyrillicKADC               \or % 049A KA with descender
    \cyrillickadc               \or % 049B ka with descender
    \cyrillicKAvertstroke       \or % 049C KA with vertical stroke
    \cyrillickavertstroke       \or % 049D ka with vertical stroke
    \cyrillicKAstroke           \or % 049E KA with stroke
    \cyrillickastroke           \or % 049F ka with stroke
    \cyrillicKAbashkir          \or % 04A0 KA bashkir
    \cyrillickabashkir          \or % 04A1 ka bashkir
    \cyrillicENDC               \or % 04A2 EN with descender
    \cyrillicendc               \or % 04A3 en with descender
    \cyrillicENGHE              \or % 04A4 EN GHE
    \cyrillicenghe              \or % 04A5 en ghe
    \cyrillicPEmidhook          \or % 04A6 PE with middle hook
    \cyrillicpemidhook          \or % 04A7 pe with middle hook
    \cyrillicHA                 \or % 04A8 Abkhasian HA
    \cyrillicha                 \or % 04A9 Abkhasian ha
    \cyrillicSDSC               \or % 04AA S with descender
    \cyrilliccdsc               \or % 04AB s with descender
    \cyrillicTEDC               \or % 04AC TE with descender
    \cyrillictedc               \or % 04AD te with descender
    \cyrillicYstr               \or % 04AE Y straight
    \cyrillicystr               \or % 04AF y straight
    \cyrillicYstrstroke         \or % 04B0 Y straight with stroke
    \cyrillicystrstroke         \or % 04B1 y straight with stroke
    \cyrillicHADC               \or % 04B2 HA with descender
    \cyrillichadc               \or % 04B3 ha with descender
    \cyrillicTETSE              \or % 04B4 TE TSE
    \cyrillictetse              \or % 04B5 te tse
    \cyrillicCHEDC              \or % 04B6 CHE with descender
    \cyrillicchedc              \or % 04B7 che with descender
    \cyrillicCHEvertstroke      \or % 04B8 CHE with vertical stroke
    \cyrillicchevertstroke      \or % 04B9 che with vertical stroke
    \cyrillicSHHA               \or % 04BA SHHA
    \cyrillicshha               \or % 04BB
    \cyrillicCHEabkhasian       \or % 04BC Abkhasian CHE
    \cyrilliccheabkhasian       \or % 04BD Abkhasian che
    \cyrillicCHEDCabkhasian     \or % 04BE Abkhasian CHE with descender
    \cyrillicchedcabkhasian     \or % 04BF Abkhasian che with descender
    \cyrillicPALOCHKA           \or % 04C0 PALOCHKA
    \cyrillicZHEbreve           \or % 04C1 ZHE with breve
    \cyrilliczhebreve           \or % 04C2 zhe with breve
    \cyrillicKAhook             \or % 04C3 KA with hook
    \cyrillickahook             \or % 04C4 ka with hook
    \cyrillicELtail             \or % 04C5 EL with tail
    \cyrilliceltail             \or % 04C6 el with tail
    \cyrillicENhook             \or % 04C7 EN with hook
    \cyrillicenhook             \or % 04C8 en with hook
    \cyrillicENtail             \or % 04C9 EN with tail
    \cyrillicentail             \or % 04CA en with tail
    \cyrillicCHEkhakassian      \or % 04CB Khakassian CHE
    \cyrillicchekhakassian      \or % 04CC Khakassian che
    \cyrillicEMtail             \or % 04CD EM with tail
    \cyrillicemtail             \or % 04CE em with tail
    \unknownchar                \or % 04CF Added to fix off-by-1 error
    \cyrillicAbreve             \or % 04D0 A with breve (\uchar1{2})
    \cyrillicabreve             \or % 04D1 a with breve (\uchar1{3})
    \cyrillicAdiaeresis         \or % 04D2 A with diaeresis (\uchar0{196})
    \cyrillicadiaeresis         \or % 04D3 a with diaeresis (\uchar0{228})
    \cyrillicAE                 \or % 04D4 AE (\uchar0{198})
    \cyrillicae                 \or % 04D5 ae (\uchar0{230})
    \cyrillicEbreve             \or % 04D6
    \cyrillicebreve             \or % 04D7
    \cyrillicSCHWA              \or % 04D8
    \cyrillicschwa              \or % 04D9
    \cyrillicSCHWAdiaeresis     \or % 04DA
    \cyrillicschwadiaeresis     \or % 04DB
    \cyrillicZHEdiaeresis       \or % 04DC
    \cyrilliczhediaeresis       \or % 04DD
    \cyrillicZEdiaeresis        \or % 04DE
    \cyrilliczediaeresis        \or % 04DF
    \cyrillicDZEabkhasian       \or % 04E0
    \cyrillicdzeabkhasian       \or % 04E1
    \cyrillicImacron            \or % 04E2
    \cyrillicimacron            \or % 04E3
    \cyrillicIdiaeresis         \or % 04E4
    \cyrillicidiaeresis         \or % 04E5
    \cyrillicOdiaeresis         \or % 04E6
    \cyrillicodiaeresis         \or % 04E7
    \cyrillicObarred            \or % 04E8
    \cyrillicobarred            \or % 04E9
    \cyrillicObarreddiaeresis   \or % 04EA
    \cyrillicobarreddiaeresis   \or % 04EB
    \cyrillicEdiaeresis         \or % 04EC
    \cyrillicediaeresis         \or % 04ED
    \cyrillicUmacron            \or % 04EE
    \cyrillicumacron            \or % 04EF
    \cyrillicUdiaeresis         \or % 04F0
    \cyrillicudiaeresis         \or % 04F1
    \cyrillicUdoubleacute       \or % 04F2
    \cyrillicudoubleacute       \or % 04F3
    \cyrillicCHEdiaeresis       \or % 04F4
    \cyrillicchediaeresis       \or % 04F5
    \unknownchar                \or % 04F6
    \unknownchar                \or % 04F7
    \cyrillicYERUdiaeresis      \or % 04F8
    \cyrillicyerudiaeresis      \else
    \unknownchar
  \fi
\stopunicodevector

\protect \endinput

% \enableregime[utf]
%
% \definetypeface [russian] [rm] [serif] [computer-modern] [default] [encoding=t2a]
%
% \setupbodyfont[russian]
%
% \starttext
%
% \startbuffer
% Мама и Папа % Some russian characters
% \stopbuffer
%
% \chardef\utfunicodetracer=0 \blank \getbuffer \blank
% \chardef\utfunicodetracer=2 \blank \getbuffer \blank
% \chardef\utfunicodetracer=7 \blank \getbuffer \blank
%
% \stoptext