summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/fonts/lucida/beresta/beresta.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/fonts/lucida/beresta/beresta.tex')
-rw-r--r--Master/texmf-dist/doc/fonts/lucida/beresta/beresta.tex397
1 files changed, 397 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/fonts/lucida/beresta/beresta.tex b/Master/texmf-dist/doc/fonts/lucida/beresta/beresta.tex
new file mode 100644
index 00000000000..3797aac864b
--- /dev/null
+++ b/Master/texmf-dist/doc/fonts/lucida/beresta/beresta.tex
@@ -0,0 +1,397 @@
+%
+% beresta.tex
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.4 // Patchlevel=0
+% (c) O.Lapko
+%
+% This package belongs to the public domain under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% and to save it under the same name.
+%
+% Content:
+%
+% Start file; runs documentation files
+% with list of all T2 letters created in LHFONTS package in:
+% English; Russian languages;
+% Russian: Alternative alt; T2 encoding (here: =Windows 1251) win; KOI-8 koi
+% ~~~ ~~~ ~~~
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% necessary fonts:
+%
+% CM fonts
+% ========
+% ===============================================
+% rxrm (0700) 1000 (1200) 1440
+% rxti 1000 1440
+% rxss 1000 1440
+% rxcsc 1000 1440
+% rxtt 1000 1440
+%
+% additional fonts:
+%
+% LHfonts: (01cm-lh.tex) Alternative
+% lhr 7 10 12
+% lhsltt 10
+% lhsl 10
+% lhti 10
+% lhbx 10
+%
+% txrm 1000 1440
+% txti 1000 1440
+% txss 1440
+% txtt 1440
+% txcc 1440
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+\newif\ifrussiandoc % documentation in Russian
+\newif\ifmainencoding % documentation in T2 encoding?
+\newif\ifalt % documentation in Alternative (or Koi-8) encoding?
+\newif\ifpoortype % only font with T2 encoding used?
+
+\newlinechar`\^^J
+\def\help{
+ \message{
+ \string\eng = English^^J
+ \string\rus = Alternative^^J
+ }%
+\message{@Name of language/encoding or type \string\help\ = ^^J}
+ \read-1 to\startdoc
+}
+
+\def\eng {\russiandocfalse}
+\def\rus {\russiandoctrue\mainencodingfalse\alttrue}
+
+\def\poor{\poortypetrue}
+\def\full{\poortypefalse}
+
+\message{^^JName of language/encoding or type \string\help\ = ^^J}%
+\read-1 to\startdoc
+\startdoc
+\message{Could you use additional non-T2 fonts^^J
+ or you use full font assortment^^J
+ (\string\poor/\string\full)?^^J}
+\read-1 to\startdoc
+\startdoc
+
+%%%%%%%%%
+\overfullrule=0pt
+\hsize185mm\hoffset-.5in
+\parindent0pt
+\raggedbottom\raggedright
+
+\catcode`\_=11
+\input rxcodes
+\input rscodes
+\input txcodes
+\input lacodes
+\input lbcodes
+\input lccodes
+\input ldcodes
+
+\def\lowtoup{.2ex}
+
+% FONTS
+% Common fonts:
+
+% for Latin alphabet
+\font\xivrm cmr10 scaled \magstep2
+\font\xivcsc cmcsc10 scaled \magstep2
+\font\xivti cmti10 scaled \magstep2
+\font\xivss cmss10 scaled \magstep2
+\font\xivtt cmtt10 scaled \magstep2
+%
+\font\dc rxrm1000
+\font\dcit rxti1000
+%
+\font\dcr rxrm1440
+\font\dcti rxti1440
+\font\dcss rxss1440
+\font\dctt rxtt1440
+\font\dccsc rxcc1440
+
+\let\xrm\rm
+\let\xti\it
+\let\xsl\sl
+\let\xbf\bf
+
+% fonts for documentation
+\ifrussiandoc % Russian doc
+
+ \font\rm lhr10
+ \font\sevenrm lhr7
+ \font\twelverm lhr12
+ \font\it lhti10
+ \font\sl lhsl10
+ \font\bf lhbx10
+
+\fi
+
+\rm
+
+% additional fonts
+\ifpoortype
+
+\else
+
+ %%%
+ \font\dctwox txrm1000
+ \font\dcittwox txti1000
+ \font\dctwos rsrm1000
+ \font\dcittwos rsti1000
+ \font\dctwoa larm1000
+ \font\dcittwoa lati1000
+ \font\dctwob lbrm1000
+ \font\dcittwob lbti1000
+ \font\dctwoc lcrm1000
+ \font\dcittwoc lcti1000
+ \font\dctwod ldrm1000
+ \font\dcittwod ldti1000
+ %%%
+ \font\dcrtwox txrm1440
+ \font\dctitwox txti1440
+ \font\dcsstwox txss1440
+ \font\dctttwox txtt1440
+ \font\dccsctwox txcc1440
+ %
+ \font\dcrtwos rsrm1440
+ \font\dctitwos rsti1440
+ \font\dcsstwos rsss1440
+ \font\dctttwos rstt1440
+ \font\dccsctwos rscc1440
+ %
+ \font\dcrtwoa larm1440
+ \font\dctitwoa lati1440
+ \font\dcsstwoa lass1440
+ \font\dctttwoa latt1440
+ \font\dccsctwoa lacc1440
+ %
+ \font\dcrtwob lbrm1440
+ \font\dctitwob lbti1440
+ \font\dcsstwob lbss1440
+ \font\dctttwob lbtt1440
+ \font\dccsctwob lbcc1440
+ %
+ \font\dcrtwoc lcrm1440
+ \font\dctitwoc lcti1440
+ \font\dcsstwoc lcss1440
+ \font\dctttwoc lctt1440
+ \font\dccsctwoc lccc1440
+ %
+ \font\dcrtwod ldrm1440
+ \font\dctitwod ldti1440
+ \font\dcsstwod ldss1440
+ \font\dctttwod ldtt1440
+ \font\dccsctwod ldcc1440
+
+\fi
+
+% DEFINITIONS
+
+\def\ifpoor#1#2{\ifpoortype{\dc #1 }\else
+ \ifx\dctwox\undefined{--}\else{#2}\fi\fi}
+
+
+\def\tableonemacros{%
+%
+\def\: ##1 ##2 ##3 //##4//{%
+ \vtop{\raggedright\rightskip0ptplus200pt\tt\hsize9em
+ \strut CYR_##1:\hfil\break\strut ##3\par}%
+ & \vtop{\offinterlineskip\dcr\hsize7pc
+ \hbox{\hbox to1.5pc{\csname CYR_##1\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc{\dccsc\csname CYR_##1\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc{\dcti \csname CYR_##1\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc{\dcss \csname CYR_##1\endcsname\hss}\nobreak
+ \unskip\hbox to1pc {\dctt \csname CYR_##1\endcsname\hss}%
+ }\par}%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize4cm\xrm##4\strut\par}%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize7.75cm\xrm##2\strut\par}%
+ \cr
+ \noalign{\vskip.5ex}
+}
+
+
+\def\;##1 ##2 ##3 ##4 //##5//{%
+ \vtop{\raggedright\rightskip0ptplus200pt\tt\hsize9em
+ \strut CYR_##2:\hfil\break\strut ##4\par}%
+ & \vtop{\offinterlineskip\dcr\hsize7pc
+ \hbox {\hbox to1.5pc{\ifpoor{--}
+ {\csname dcrtwo##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak
+ \unskip\hbox to1.5pc{\ifpoor{--}%
+ {\csname dccsctwo##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak
+ \unskip\hbox to1.5pc{\ifpoor{--}%
+ {\csname dctitwo##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak
+ \unskip\hbox to1.5pc{\ifpoor{--}%
+ {\csname dcsstwo##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak
+ \unskip\hbox to1pc {\ifpoor{--}%
+ {\csname dctttwo##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\ignorespaces
+ }\par}%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize4cm\xsl##5\strut\par}%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize7.75cm\xsl##3\strut\par}%
+ \cr
+ \noalign{\vskip.5ex}
+}
+%
+ \def\COD##1##2##3##4##5{%
+ \def\chk####1####2{\def\tempa{--}\def\tempb{''}\def\tempx{####2}\def\tempy{####1}%
+ \ifx\tempx\tempa\ifx\tempy\empty{\rm--}\else|\fi\else
+ \ifx\tempx\tempb{####1|}\else{\ifx\tempy\empty\else####1:\fi####2|}\fi\fi}%
+ \hbox to\hsize{\chk{}{##1}|\chk{A}{##2}\chk{B}{##3}\chk{C}{##4}\chk{D}{##5}\hss}}
+%
+ \long\def\> ##1+##2 ##3##4 ##5 //##6//{%
+ \vtop{\raggedright\rightskip0ptplus200pt\tt\hsize9em
+ \strut CYR_##1,\hfil\break\strut CYR_##2:\hfil\break
+ \strut ##3##4\par}%
+ & \vtop{\offinterlineskip\dcr\hsize7pc
+ \hbox{\hbox to1.5pc{\csname CYR_##1\endcsname\hfil}\nobreak
+ \unskip\hbox to1.5pc
+ {\dccsc\csname CYR_##1\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\dcti \csname CYR_##1\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\dcss \csname CYR_##1\endcsname\hss}\nobreak
+ \unskip\hbox to1pc
+ {\dctt \csname CYR_##1\endcsname\hss}\ignorespaces
+ }\par
+ \lineskip3pt\lineskiplimit3pt
+ \hbox{\hbox to1.5pc{\csname CYR_##2\endcsname\hfil}\nobreak
+ \unskip\hbox to1.5pc
+ {\dccsc\csname CYR_##2\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\dcti \csname CYR_##2\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\dcss \csname CYR_##2\endcsname\hss}\nobreak
+ \unskip\hbox to1pc
+ {\dctt \csname CYR_##2\endcsname\hss}\ignorespaces
+ }\par
+ }%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize4cm\xrm##5\strut\par
+ }%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize7.75cm\rm##6\strut\par
+ }%
+ \cr
+ \noalign{\vskip.5ex}
+ }
+%
+ \long\def\<##1 ##2+##3 ##4##5 ##6 //##7//{%
+ \vtop{\raggedright\rightskip0ptplus200pt\tt\hsize9em
+ \strut CYR_##2,\hfil\break\strut CYR_##3:\hfil\break
+ \strut ##4##5\par}%
+ & \vtop{\offinterlineskip\dcr\hsize7pc
+ \hbox{\hbox to1.5pc{\csname dcrtwo##1\endcsname\csname ##1CYR_##2\endcsname\hfil}\nobreak
+ \unskip\hbox to1.5pc
+ {\csname dccsctwo##1\endcsname\csname ##1CYR_##2\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\csname dctitwo##1\endcsname\csname ##1CYR_##2\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\csname dcsstwo##1\endcsname\csname ##1CYR_##2\endcsname\hss}\nobreak
+ \unskip\hbox to1pc
+ {\csname dctttwo##1\endcsname\csname ##1CYR_##2\endcsname\hss}\ignorespaces
+ }\par
+ \lineskip3pt\lineskiplimit3pt
+ \hbox{\hbox to1.5pc{\csname dcrtwo##1\endcsname\csname ##1CYR_##3\endcsname\hfil}\nobreak
+ \unskip\hbox to1.5pc
+ {\csname dccsctwo##1\endcsname\csname ##1CYR_##3\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\csname dctitwo##1\endcsname\csname ##1CYR_##3\endcsname\hss}\nobreak
+ \unskip\hbox to1.5pc
+ {\csname dcsstwo##1\endcsname\csname ##1CYR_##3\endcsname\hss}\nobreak
+ \unskip\hbox to1pc
+ {\csname dctttwo##1\endcsname\csname ##1CYR_##3\endcsname\hss}\ignorespaces
+ }\par
+ }%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize4cm\xrm##6\strut\par
+ }%
+ & \vtop{\raggedright
+ \rightskip0ptplus200pt\hsize7.75cm\rm##7\strut\par
+ }%
+ \cr
+ \noalign{\vskip.5ex}
+ }%
+}
+
+%%%
+\catcode`\@=11
+
+\def\tabletwomacros{%
+%
+ \def\> ##1 ##2 ##3-- {$\bullet$
+ & \vtop{\raggedright\rightskip0ptplus200pt\hsize4cm\rm ##1\strut}
+ & ##2
+ & \vtop{\hsize=10cm\rm ##3\strut}
+ \cr
+ }%
+%
+%% macros for letters
+%
+ \def\Excl ##1 {{\dc \csname CYR_##1\endcsname}\ }%
+%
+ \def\Excls##1 {{\dc \csname CYR_##1\endcsname}\
+ ({\dcit\csname CYR_##1\endcsname})\ }%
+%
+%
+ \ifpoortype
+ %\relax
+ \else
+%
+ \def\Point ##1 ##2 {{\csname dctwo##1\endcsname\csname CYR_##2\endcsname}\ }%
+%
+ \def\Points##1 ##2 {{\csname dctwo##1\endcsname\csname CYR_##2\endcsname}\
+ ({\csname dcittwo##1\endcsname\csname CYRI_##2\endcsname})\ }%
+%
+ \fi
+%
+}
+\catcode`\@12
+%%%
+
+\def\CYR_ {}
+\def\CYRI_{}
+
+\def\EXTRA#1{\noalign{\medskip\bf #1\hfil\medskip}}
+
+\def\Sign #1{\ifdim\lastskip>0pt\unskip\fi$^{#1}$}
+
+\def\){\unskip)}
+
+
+% "language" macros:
+
+\ifrussiandoc
+
+ \def\Var{{\it вариант\/}: }
+
+ \def\accented{\hfil\break{\it акцентированные буквы\/}:\hfil\break}
+
+ \def\modified{\hfil\break{\it буквы с модификаторами\/}:\hfil\break}
+
+ \long\def\twolang#1#2{\bgroup#2\egroup\ignorespaces}
+
+\else
+
+ \def\Var{{\it variant\/}: }
+
+ \def\accented{\hfil\break{\it accented letters\/}:\hfil\break}
+
+ \def\modified{\hfil\break{\it modified letters\/}:\hfil\break}
+
+ \long\def\twolang#1#2{\bgroup#1\egroup\ignorespaces}
+
+\fi
+
+ \input berestax
+
+\bye