diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/mkxl/lang-tra.mkxl')
-rw-r--r-- | Master/texmf-dist/tex/context/base/mkxl/lang-tra.mkxl | 95 |
1 files changed, 95 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/context/base/mkxl/lang-tra.mkxl b/Master/texmf-dist/tex/context/base/mkxl/lang-tra.mkxl new file mode 100644 index 00000000000..b087832e04b --- /dev/null +++ b/Master/texmf-dist/tex/context/base/mkxl/lang-tra.mkxl @@ -0,0 +1,95 @@ +%D \module +%D [ file=lang-tra, +%D version=2020.10.31, +%D title=\CONTEXT\ Language Macros, +%D subtitle=Transliteration, +%D author=Hans Hagen, +%D date=\currentdate, +%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] +%C +%C This module is part of the \CONTEXT\ macro||package and is +%C therefore copyrighted by \PRAGMA. See mreadme.pdf for +%C details. + +\writestatus{loading}{ConTeXt Language Macros / Transliteration} + +\registerctxluafile{lang-tra}{} + +\unprotect + +\definesystemattribute[transliteration][public,global] + +\installcorenamespace {transliteration} + +\permanent\tolerant\protected\def\definetransliteration[#1]#*[#2]% + {\clf_definedtransliteration{#1}{#2}} + +\permanent\protected\def\settransliteration[#1]% + {\clf_settransliteration{#1}} + +\permanent\protected\def\starttransliteration[#1]% + {\begingroup + \clf_settransliteration{#1}} + +\permanent\protected\def\stoptransliteration + {\endgroup} + +\permanent\protected\def\resettransliteration + {\c_attr_transliteration\attributeunsetvalue} + +\appendtoks + \resettransliteration +\to \everyinitializeverbatim + +\protect \endinput + +% \setupbodyfont[dejavu] +% +% \input lang-tra.mkiv +% +% \definetransliteration[serbian][serbian to latin] +% +% \starttext +% +% \settransliteration[serbian to latin] +% +% \startchapter[title={АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ}] +% АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ +% \start +% \settransliteration[serbian to latin] +% АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ +% \stop +% АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ +% \stopchapter +% +% \resettransliteration +% +% \startchapter[title={АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ}] +% АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ +% \start +% \settransliteration[serbian to latin] +% АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ +% \stop +% АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ +% \stopchapter +% +% \definehead[ChapterA][chapter] +% \definehead[ChapterB][chapter] +% +% \startsetups s-to-l +% \settransliteration[serbian to latin] +% \red +% \stopsetups +% +% % maybe we need a setups key for this +% % hm, \definesetups [xxx] [aa,bb,cc] +% +% \setuphead[ChapterB][commandbefore=\setups{s-to-l}] +% +% \startChapterA[title={АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ}] +% \stopChapterA +% +% \startChapterB[title={АБВ ГДЕ ЖЗИЙ КЛМНОП РСТУ ФХЦЧ ШЩЪЬ ЮЯ}] +% \stopChapterB +% +% \stoptext |