diff options
Diffstat (limited to 'Master/texmf-dist/doc/fonts/lh/beresta/beresta.tex')
-rw-r--r-- | Master/texmf-dist/doc/fonts/lh/beresta/beresta.tex | 439 |
1 files changed, 439 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/fonts/lh/beresta/beresta.tex b/Master/texmf-dist/doc/fonts/lh/beresta/beresta.tex new file mode 100644 index 00000000000..daca237f2f2 --- /dev/null +++ b/Master/texmf-dist/doc/fonts/lh/beresta/beresta.tex @@ -0,0 +1,439 @@ +% +% beresta.tex +% +%% Cyrillic font container with T2 encoding beta-support +% +% This file is future part of lxfonts package +% Version 3.4 // Patchlevel=1 +% (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 file berestax.tex +% with list of all T2 letters created in LHFONTS package in: +% English and Russian (cp866) languages +% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% 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 +% +% rsrm 1000 1440 +% rsti 1000 1440 +% rsss 1440 +% rstt 1440 +% rscc 1440 +% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\newif\ifrussiandoc % documentation in Russian +\newif\ifpoortype % only font with T2 encoding used? +\newif\ifknowntype % only font with T2 encoding used? +\knowntypefalse + +\def\eng {\russiandocfalse\knowntypetrue} +\def\rus {\russiandoctrue\knowntypetrue} + +\def\poor{\poortypetrue} +\def\full{\poortypefalse} + +\rus\full +\newlinechar`\^^J +\def\help{ + \message{ + \string\eng = Type documentation in English^^J + \string\rus = Type documentation in Russian^^J + \string\poor = Use minimum font set (only standard T2* encodings)^^J + \string\full = Use full font set^^J + }% +} + +\ifknowntype\else +\message{^^JName of language or type \string\help\ = ^^J}% +\read-1 to\startdoc +\startdoc +\fi +\ifknowntype\else +\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 +\fi + +%%%%%%%%% +\overfullrule=0pt +\hsize185mm\hoffset-.5in +\parindent0pt +\raggedbottom\raggedright + +\catcode`\_=11 +\ifpoortype + + \input yycodes + \input rxcodes + +\else + + \input lacodes + \input lbcodes + \input lccodes + \input ldcodes + \input txcodes + +\fi + +\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 +% +\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 + + \font\dcrma rxrm1000 + \font\dcita rxti1000 + \let\dcrmb \dcrma + \let\dcitb \dcita + \let\dcrmc \dcrma + \let\dcitc \dcita + \let\dcrmd \dcrma + \let\dcitd \dcita + \let\dcrmx \dcrma + \let\dcitx \dcita + %%% + \font\dcxivrma rxrm1440 + \font\dcxivita rxti1440 + \font\dcxivssa rxss1440 + \font\dcxivtta rxtt1440 + \font\dcxivsca rxcc1440 + %%% + \let\dcxivrmb \dcxivrma + \let\dcxivitb \dcxivita + \let\dcxivssb \dcxivssa + \let\dcxivttb \dcxivtta + \let\dcxivscb \dcxivsca + %%% + \let\dcxivrmc \dcxivrma + \let\dcxivitc \dcxivita + \let\dcxivssc \dcxivssa + \let\dcxivttc \dcxivtta + \let\dcxivscc \dcxivsca + %%% + \let\dcxivrmd \dcxivrma + \let\dcxivitd \dcxivita + \let\dcxivssd \dcxivssa + \let\dcxivttd \dcxivtta + \let\dcxivscd \dcxivsca + %%% + \let\dcxivrmx \dcxivrma + \let\dcxivitx \dcxivita + \let\dcxivssx \dcxivssa + \let\dcxivttx \dcxivtta + \let\dcxivscx \dcxivsca + +\else + + \font\dcrmx txrm1000 + \font\dcitx txti1000 + \font\dcrma larm1000 + \font\dcita lati1000 + \font\dcrmb lbrm1000 + \font\dcitb lbti1000 + \font\dcrmc lcrm1000 + \font\dcitc lcti1000 + \font\dcrmd ldrm1000 + \font\dcitd ldti1000 + %%% + \font\dcxivrma larm1440 + \font\dcxivita lati1440 + \font\dcxivssa lass1440 + \font\dcxivtta latt1440 + \font\dcxivsca lacc1440 + % + \font\dcxivrmb lbrm1440 + \font\dcxivitb lbti1440 + \font\dcxivssb lbss1440 + \font\dcxivttb lbtt1440 + \font\dcxivscb lbcc1440 + % + \font\dcxivrmc lcrm1440 + \font\dcxivitc lcti1440 + \font\dcxivssc lcss1440 + \font\dcxivttc lctt1440 + \font\dcxivscc lccc1440 + % + \font\dcxivrmd ldrm1440 + \font\dcxivitd ldti1440 + \font\dcxivssd ldss1440 + \font\dcxivttd ldtt1440 + \font\dcxivscd ldcc1440 + % + \font\dcxivrmx txrm1440 + \font\dcxivitx txti1440 + \font\dcxivssx txss1440 + \font\dcxivttx txtt1440 + \font\dcxivscx txcc1440 + +\fi + +% DEFINITIONS + +\def\ifpoor#1#2{\ifpoortype{\dcrma #1 }\else + \ifx\dcrmx\undefined{--}\else{#2}\fi\fi} + + +\def\tableonemacros{% +% +\def\;##1 ##2 ##3 ##4 //##5//{% + \vtop{\raggedright\rightskip0ptplus200pt\tt\hsize9em + \strut CYR_##2:\hfil\break\strut ##4\par}% + & \vtop{\offinterlineskip\dcxivita\hsize7pc + \hbox {\hbox to1.5pc{\ifpoor {\csname dcxivrmx\endcsname\csname xCYR_##2\endcsname} + {\csname dcxivrm##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivscx\endcsname\csname xCYR_##2\endcsname}% + {\csname dcxivsc##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivitx\endcsname\csname xCYR_##2\endcsname}% + {\csname dcxivit##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivssx\endcsname\csname xCYR_##2\endcsname}% + {\csname dcxivss##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1pc {\ifpoor{\csname dcxivttx\endcsname\csname xCYR_##2\endcsname}% + {\csname dcxivtt##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 //##7//{% + \vtop{\raggedright\rightskip0ptplus200pt\tt\hsize9em + \strut CYR_##2,\hfil\break\strut CYR_##3:\hfil\break + \strut ##4##5\par}% + & \vtop{\offinterlineskip\dcxivita\hsize7pc + \hbox{\hbox to1.5pc{\ifpoor {\csname dcxivrmx\endcsname\csname xCYR_##2\endcsname} + {\csname dcxivrm##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivscx\endcsname\csname xCYR_##2\endcsname} + {\csname dcxivsc##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivitx\endcsname\csname xCYR_##2\endcsname} + {\csname dcxivit##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivssx\endcsname\csname xCYR_##2\endcsname} + {\csname dcxivss##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\nobreak + \unskip\hbox to1pc {\ifpoor{\csname dcxivttx\endcsname\csname xCYR_##2\endcsname} + {\csname dcxivtt##1\endcsname\csname ##1CYR_##2\endcsname}\hss}\ignorespaces + }\par + \lineskip3pt\lineskiplimit3pt + \hbox{\hbox to1.5pc{\ifpoor {\csname dcxivrmx\endcsname\csname xCYR_##3\endcsname} + {\csname dcxivrm##1\endcsname\csname ##1CYR_##3\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivscx\endcsname\csname xCYR_##3\endcsname} + {\csname dcxivsc##1\endcsname\csname ##1CYR_##3\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivitx\endcsname\csname xCYR_##3\endcsname} + {\csname dcxivit##1\endcsname\csname ##1CYR_##3\endcsname}\hss}\nobreak + \unskip\hbox to1.5pc{\ifpoor{\csname dcxivssx\endcsname\csname xCYR_##3\endcsname} + {\csname dcxivss##1\endcsname\csname ##1CYR_##3\endcsname}\hss}\nobreak + \unskip\hbox to1pc {\ifpoor{\csname dcxivttx\endcsname\csname xCYR_##3\endcsname} + {\csname dcxivtt##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\Point ##1 ##2 {\ifpoor{\csname dcrmx\endcsname\csname xCYR_##2\endcsname}{\csname dcrm##1\endcsname\csname CYR_##2\endcsname}\ }% +% + \def\Points##1 ##2 {\ifpoor{\csname dcrmx\endcsname\csname xCYR_##2\endcsname}{\csname dcrm##1\endcsname\csname CYR_##2\endcsname}\ + (\ifpoor{\csname dcitx\endcsname\csname xCYR_##2\endcsname}{\csname dcit##1\endcsname\csname CYR_##2\endcsname})\ }% +% +% +} +\catcode`\@12 +%%% + +\def\CYR_ {???} + +%for \ALPHABET macro etc +\def\CYR_A {\ifpoortype\xCYR_A \else\aCYR_A \fi} +\def\CYR_a {\ifpoortype\xCYR_a \else\aCYR_a \fi} +\def\CYR_B {\ifpoortype\xCYR_B \else\aCYR_B \fi} +\def\CYR_b {\ifpoortype\xCYR_b \else\aCYR_b \fi} +\def\CYR_V {\ifpoortype\xCYR_V \else\aCYR_V \fi} +\def\CYR_v {\ifpoortype\xCYR_v \else\aCYR_v \fi} +\def\CYR_G {\ifpoortype\xCYR_G \else\aCYR_G \fi} +\def\CYR_g {\ifpoortype\xCYR_g \else\aCYR_g \fi} +\def\CYR_D {\ifpoortype\xCYR_D \else\aCYR_D \fi} +\def\CYR_d {\ifpoortype\xCYR_d \else\aCYR_d \fi} +\def\CYR_E {\ifpoortype\xCYR_E \else\aCYR_E \fi} +\def\CYR_e {\ifpoortype\xCYR_e \else\aCYR_e \fi} +\def\CYR_ZH {\ifpoortype\xCYR_ZH \else\aCYR_ZH \fi} +\def\CYR_zh {\ifpoortype\xCYR_zh \else\aCYR_zh \fi} +\def\CYR_Z {\ifpoortype\xCYR_Z \else\aCYR_Z \fi} +\def\CYR_z {\ifpoortype\xCYR_z \else\aCYR_z \fi} +\def\CYR_I {\ifpoortype\xCYR_I \else\aCYR_I \fi} +\def\CYR_i {\ifpoortype\xCYR_i \else\aCYR_i \fi} +\def\CYR_I_shrt {\ifpoortype\xCYR_I_shrt\else\aCYR_I_shrt\fi} +\def\CYR_i_shrt {\ifpoortype\xCYR_i_shrt\else\aCYR_i_shrt\fi} +\def\CYR_K {\ifpoortype\xCYR_K \else\aCYR_K \fi} +\def\CYR_k {\ifpoortype\xCYR_k \else\aCYR_k \fi} +\def\CYR_L {\ifpoortype\xCYR_L \else\aCYR_L \fi} +\def\CYR_l {\ifpoortype\xCYR_l \else\aCYR_l \fi} +\def\CYR_M {\ifpoortype\xCYR_M \else\aCYR_M \fi} +\def\CYR_m {\ifpoortype\xCYR_m \else\aCYR_m \fi} +\def\CYR_N {\ifpoortype\xCYR_N \else\aCYR_N \fi} +\def\CYR_n {\ifpoortype\xCYR_n \else\aCYR_n \fi} +\def\CYR_O {\ifpoortype\xCYR_O \else\aCYR_O \fi} +\def\CYR_o {\ifpoortype\xCYR_o \else\aCYR_o \fi} +\def\CYR_P {\ifpoortype\xCYR_P \else\aCYR_P \fi} +\def\CYR_p {\ifpoortype\xCYR_p \else\aCYR_p \fi} +\def\CYR_R {\ifpoortype\xCYR_R \else\aCYR_R \fi} +\def\CYR_r {\ifpoortype\xCYR_r \else\aCYR_r \fi} +\def\CYR_S {\ifpoortype\xCYR_S \else\aCYR_S \fi} +\def\CYR_s {\ifpoortype\xCYR_s \else\aCYR_s \fi} +\def\CYR_T {\ifpoortype\xCYR_T \else\aCYR_T \fi} +\def\CYR_t {\ifpoortype\xCYR_t \else\aCYR_t \fi} +\def\CYR_U {\ifpoortype\xCYR_U \else\aCYR_U \fi} +\def\CYR_u {\ifpoortype\xCYR_u \else\aCYR_u \fi} +\def\CYR_F {\ifpoortype\xCYR_F \else\aCYR_F \fi} +\def\CYR_f {\ifpoortype\xCYR_f \else\aCYR_f \fi} +\def\CYR_H {\ifpoortype\xCYR_H \else\aCYR_H \fi} +\def\CYR_h {\ifpoortype\xCYR_h \else\aCYR_h \fi} +\def\CYR_C {\ifpoortype\xCYR_C \else\aCYR_C \fi} +\def\CYR_c {\ifpoortype\xCYR_c \else\aCYR_c \fi} +\def\CYR_CH {\ifpoortype\xCYR_CH \else\aCYR_CH \fi} +\def\CYR_ch {\ifpoortype\xCYR_ch \else\aCYR_ch \fi} +\def\CYR_SH {\ifpoortype\xCYR_SH \else\aCYR_SH \fi} +\def\CYR_sh {\ifpoortype\xCYR_sh \else\aCYR_sh \fi} +\def\CYR_SHCH {\ifpoortype\xCYR_SHCH \else\aCYR_SHCH \fi} +\def\CYR_shch {\ifpoortype\xCYR_shch \else\aCYR_shch \fi} +\def\CYR_HRDSN {\ifpoortype\xCYR_HRDSN \else\aCYR_HRDSN \fi} +\def\CYR_hrdsn {\ifpoortype\xCYR_hrdsn \else\aCYR_hrdsn \fi} +\def\CYR_ERY {\ifpoortype\xCYR_ERY \else\aCYR_ERY \fi} +\def\CYR_ery {\ifpoortype\xCYR_ery \else\aCYR_ery \fi} +\def\CYR_SFTSN {\ifpoortype\xCYR_SFTSN \else\aCYR_SFTSN \fi} +\def\CYR_sftsn {\ifpoortype\xCYR_sftsn \else\aCYR_sftsn \fi} +\def\CYR_EREV {\ifpoortype\xCYR_EREV \else\aCYR_EREV \fi} +\def\CYR_erev {\ifpoortype\xCYR_erev \else\aCYR_erev \fi} +\def\CYR_YU {\ifpoortype\xCYR_YU \else\aCYR_YU \fi} +\def\CYR_yu {\ifpoortype\xCYR_yu \else\aCYR_yu \fi} +\def\CYR_YA {\ifpoortype\xCYR_YA \else\aCYR_YA \fi} +\def\CYR_ya {\ifpoortype\xCYR_ya \else\aCYR_ya \fi} +\def\CYR_YO {\ifpoortype\xCYR_YO \else\aCYR_YO \fi} +\def\CYR_yo {\ifpoortype\xCYR_yo \else\aCYR_yo \fi} + +\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 |