summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/omega/otp/antomega/koirus2uni.otp
blob: ac1e118c3e991695ef29830c099c5c24447a1051 (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
%% This file is part of the ANTOMEGA project version 0.6
%% -----------------------------------------------------
%% 
%% It may be distributed under the terms of the LaTeX Project Public
%% License, as described in lppl.txt in the base LaTeX distribution.
%% Either version 1.0 or, at your option, any later version.
%% Copyright (C) 2003 by Alexej Kryukov
%% Please report errors to: A.M. Kryukov <basileia@yandex.ru>

%% Conversion to Unicode from Russian/Ukrainian KOI8-RU encoding.

input:	1;
output:	2;

tables:

tabkoi8[@"40] = {
@"044E, @"0430, @"0431, @"0446, @"0434, @"0435, @"0444, @"0433,
@"0445, @"0438, @"0439, @"043A, @"043B, @"043C, @"043D, @"043E,
@"043F, @"044F, @"0440, @"0441, @"0442, @"0443, @"0436, @"0432,
@"044C, @"044B, @"0437, @"0448, @"044D, @"0449, @"0447, @"044A,
@"042E, @"0410, @"0411, @"0426, @"0414, @"0415, @"0424, @"0413,
@"0425, @"0418, @"0419, @"041A, @"041B, @"041C, @"041D, @"041E,
@"041F, @"042F, @"0420, @"0421, @"0422, @"0423, @"0416, @"0412,
@"042C, @"042B, @"0417, @"0428, @"042D, @"0429, @"0427, @"042A
};

expressions:

% Basic ASCII symbols
@"00-@"7F	=> \1;

% Basic Russian alphabet
@"C0-@"FF	=> #(tabkoi8[\1-@"C0]);

% Russian capital letter YO
@"B3		=> @"401;

% Russian small letter YO
@"A3		=> @"451;

% Ukrainian capital letter IE
@"B4		=> @"404;

% Ukrainian small letter IE
@"A4		=> @"454;

% Ukrainian-Byelorussian capital letter I
@"B6		=> @"407;

% Ukrainian-Byelorussian small letter I
@"A6		=> @"457;

% Ukrainian capital letter YI
@"B7		=> @"407;

% Ukrainian small letter YI
@"A7		=> @"457;

% Ukrainian capital letter GHE with upturn
@"BD		=> @"407;

% Ukrainian small letter GHE with upturn
@"AD		=> @"457;

% Byelorussian capital letter short U
@"BE		=> @"40E;

% Byelorussian small letter short U
@"AE		=> @"45E;

% all other symbols, including Unicode characters
.		=> \1;