|
Packit Service |
b70e42 |
# liblouis: Russian literary text translation table
|
|
Packit Service |
b70e42 |
#
|
|
Packit Service |
b70e42 |
# Copyright (C) 2013 Igor B. Poretsky <poretsky@mlbox.ru>
|
|
Packit Service |
b70e42 |
#
|
|
Packit Service |
b70e42 |
# This file is part of liblouis.
|
|
Packit Service |
b70e42 |
#
|
|
Packit Service |
b70e42 |
# liblouis is free software: you can redistribute it and/or modify it
|
|
Packit Service |
b70e42 |
# under the terms of the GNU Lesser General Public License as
|
|
Packit Service |
b70e42 |
# published by the Free Software Foundation, either version 3 of the
|
|
Packit Service |
b70e42 |
# License, or (at your option) any later version.
|
|
Packit Service |
b70e42 |
#
|
|
Packit Service |
b70e42 |
# liblouis is distributed in the hope that it will be useful, but
|
|
Packit Service |
b70e42 |
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit Service |
b70e42 |
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit Service |
b70e42 |
# Lesser General Public License for more details.
|
|
Packit Service |
b70e42 |
#
|
|
Packit Service |
b70e42 |
# You should have received a copy of the GNU Lesser General Public
|
|
Packit Service |
b70e42 |
# License along with liblouis. If not, see
|
|
Packit Service |
b70e42 |
# <http://www.gnu.org/licenses/>.
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Display and character definitions:
|
|
Packit Service |
b70e42 |
include ru-letters.dis
|
|
Packit Service |
b70e42 |
include ru-chardefs.cti
|
|
Packit Service |
b70e42 |
include chardefs.cti
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Braille indicators:
|
|
Packit Service |
b70e42 |
numsign 3456 number sign, just a dots operand
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Emphasis indication signs:
|
|
Packit Service |
b70e42 |
firstwordital 456
|
|
Packit Service |
b70e42 |
lastworditalafter 456
|
|
Packit Service |
b70e42 |
firstwordbold 34
|
|
Packit Service |
b70e42 |
lastwordboldafter 34
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# The decimal digits:
|
|
Packit Service |
b70e42 |
include litdigits6Dots.uti
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Punctuations:
|
|
Packit Service |
b70e42 |
decpoint , 2
|
|
Packit Service |
b70e42 |
prepunc " 236
|
|
Packit Service |
b70e42 |
postpunc " 356
|
|
Packit Service |
b70e42 |
postpunc ,\s 2
|
|
Packit Service |
b70e42 |
postpunc ;\s 23
|
|
Packit Service |
b70e42 |
hyphen - 36
|
|
Packit Service |
b70e42 |
always . 256
|
|
Packit Service |
b70e42 |
always , 2
|
|
Packit Service |
b70e42 |
always ; 23
|
|
Packit Service |
b70e42 |
always : 25
|
|
Packit Service |
b70e42 |
always ? 26
|
|
Packit Service |
b70e42 |
always ! 235
|
|
Packit Service |
b70e42 |
always ' 3
|
|
Packit Service |
b70e42 |
always ` 4
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Special symbols:
|
|
Packit Service |
b70e42 |
always @ 4-1
|
|
Packit Service |
b70e42 |
always # 4-1345
|
|
Packit Service |
b70e42 |
always $ 4-145
|
|
Packit Service |
b70e42 |
always % 3456-245-356
|
|
Packit Service |
b70e42 |
always ^ 56-26
|
|
Packit Service |
b70e42 |
always & 6-12346
|
|
Packit Service |
b70e42 |
always * 35
|
|
Packit Service |
b70e42 |
always ( 126
|
|
Packit Service |
b70e42 |
always ) 345
|
|
Packit Service |
b70e42 |
always _ 6-25
|
|
Packit Service |
b70e42 |
always [ 6-12356
|
|
Packit Service |
b70e42 |
always ] 6-23456
|
|
Packit Service |
b70e42 |
always { 46-126
|
|
Packit Service |
b70e42 |
always } 46-345
|
|
Packit Service |
b70e42 |
always \\ 4-16
|
|
Packit Service |
b70e42 |
always | 456-3
|
|
Packit Service |
b70e42 |
always ~ 5-26
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# mathematical symbols:
|
|
Packit Service |
b70e42 |
always - 36
|
|
Packit Service |
b70e42 |
always + 0-235
|
|
Packit Service |
b70e42 |
always / 6-34
|
|
Packit Service |
b70e42 |
always < 0-25-246-0
|
|
Packit Service |
b70e42 |
always > 0-135-25-0
|
|
Packit Service |
b70e42 |
always = 0-2356
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Symbol classes for special rules below:
|
|
Packit Service |
b70e42 |
class upperlatin ABCDEFGHIJKLMNOPQRSTUVWXYZ
|
|
Packit Service |
b70e42 |
class lowerlatin abcdefghijklmnopqrstuvwxyz
|
|
Packit Service |
b70e42 |
class uppercyrillic \x0401\x0410\x0411\x0412\x0413\x0414\x0415\x0416\x0417\x0418\x0419\x041A\x041B\x041C\x041D\x041E\x041F\x0420\x0421\x0422\x0423\x0424\x0425\x0426\x0427\x0428\x0429\x042A\x042B\x042C\x042D\x042E\x042F
|
|
Packit Service |
b70e42 |
class lowercyrillic \x0430\x0431\x0432\x0433\x0434\x0435\x0436\x0437\x0438\x0439\x043A\x043B\x043C\x043D\x043E\x043F\x0440\x0441\x0442\x0443\x0444\x0445\x0446\x0447\x0448\x0449\x044A\x044B\x044C\x044D\x044E\x044F\x0451
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
class latin ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
|
|
Packit Service |
b70e42 |
class cyrillic \x0401\x0410\x0411\x0412\x0413\x0414\x0415\x0416\x0417\x0418\x0419\x041A\x041B\x041C\x041D\x041E\x041F\x0420\x0421\x0422\x0423\x0424\x0425\x0426\x0427\x0428\x0429\x042A\x042B\x042C\x042D\x042E\x042F\x0430\x0431\x0432\x0433\x0434\x0435\x0436\x0437\x0438\x0439\x043A\x043B\x043C\x043D\x043E\x043F\x0440\x0441\x0442\x0443\x0444\x0445\x0446\x0447\x0448\x0449\x044A\x044B\x044C\x044D\x044E\x044F\x0451
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
swapcd updigit 1234567890 1,12,14,145,15,124,1245,125,24,245
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Adjust spacing around dashes according to the Russian braille rules.
|
|
Packit Service |
b70e42 |
context `["-\s"] @36
|
|
Packit Service |
b70e42 |
context [$s]"-"$s ?
|
|
Packit Service |
b70e42 |
context [$d]"-" %updigit@0
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Mark cyrillic letters immediately following digits.
|
|
Packit Service |
b70e42 |
context [$d]%uppercyrillic %updigit@45#1=0
|
|
Packit Service |
b70e42 |
context [$d]%lowercyrillic %updigit@5#1=0
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Mark lowercase latin letters where it is required.
|
|
Packit Service |
b70e42 |
context !#1=0[]%cyrillic #1=0
|
|
Packit Service |
b70e42 |
context #1=1[$d]%lowerlatin %updigit@6
|
|
Packit Service |
b70e42 |
context !#1=1[]%lowerlatin #1=1@6
|
|
Packit Service |
b70e42 |
context !#1=1[]%upperlatin #1=1
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Make space before text following number with punctuation.
|
|
Packit Service |
b70e42 |
context [$d","]$l %updigit@2-0
|
|
Packit Service |
b70e42 |
context [$d",\s"]$l %updigit@2-0
|
|
Packit Service |
b70e42 |
context [$d";"]$l %updigit@23-0
|
|
Packit Service |
b70e42 |
context [$d";\s"]$l %updigit@23-0
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Mark cyrillic letters immediately following latins.
|
|
Packit Service |
b70e42 |
pass2 %lowerlatin[]%uppercyrillic @45#1=0
|
|
Packit Service |
b70e42 |
pass2 %lowerlatin[]%lowercyrillic @5#1=0
|
|
Packit Service |
b70e42 |
pass2 #1=1[]%uppercyrillic @45#1=0
|
|
Packit Service |
b70e42 |
pass2 #1=1[]%lowercyrillic @5#1=0
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Mark uppercase latin letters where it is appropriate.
|
|
Packit Service |
b70e42 |
pass2 !%upperlatin *#1=0
|
|
Packit Service |
b70e42 |
pass2 !#1=1[]%upperlatin #1=1@46
|
|
Packit Service |
b70e42 |
|
|
Packit Service |
b70e42 |
# Format dialogs and direct speech according to the Russian braille tradition.
|
|
Packit Service |
b70e42 |
pass3 `@36 *#1=1
|
|
Packit Service |
b70e42 |
pass3 @236 *#1=1
|
|
Packit Service |
b70e42 |
pass3 @356 *#1=0
|
|
Packit Service |
b70e42 |
pass3 #1=1@2@36@0 *#1=2
|
|
Packit Service |
b70e42 |
pass3 #1=1@26@36@0 *#1=2
|
|
Packit Service |
b70e42 |
pass3 #1=1@235@36@0 *#1=2
|
|
Packit Service |
b70e42 |
pass3 #1=2@2[@36@0] @0-36
|
|
Packit Service |
b70e42 |
pass3 #1=2@256[@36@0] @0-36
|