summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/csplain/fonts/cs-polta.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/csplain/fonts/cs-polta.tex')
-rw-r--r--Master/texmf-dist/tex/csplain/fonts/cs-polta.tex133
1 files changed, 78 insertions, 55 deletions
diff --git a/Master/texmf-dist/tex/csplain/fonts/cs-polta.tex b/Master/texmf-dist/tex/csplain/fonts/cs-polta.tex
index 9e1a92953e5..39d08eb6736 100644
--- a/Master/texmf-dist/tex/csplain/fonts/cs-polta.tex
+++ b/Master/texmf-dist/tex/csplain/fonts/cs-polta.tex
@@ -1,59 +1,82 @@
-% cs-polta.tex: fonts loading file of Antykwa Poltawskiego
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Petr Olsak, 2012
-
-\ifx\sizespec\undefined \def\sizespec{}\fi
-\ifx\font\corkencoded \def\tmp{ec}\else \def\tmp{cs}\fi
-
-\message{FONT: Antykwa Poltawskiego -
- \string\rm,\string\it,\string\bf,\string\bi,%
- \string\lr,\string\li,\string\mr,\string\mi,%
- \string\caps\string\rm...}
-
-\ifx\dgsize\undefined \def\dgsize{10}\fi
-
-\font\tenrm=\tmp-antpr\dgsize \space\sizespec
-\font\tenbf=\tmp-antpb\dgsize \space\sizespec
-\font\tenit=\tmp-antpri\dgsize \space\sizespec
-\font\tenbi=\tmp-antpbi\dgsize \space\sizespec
-
-\font\tenlr=\tmp-antpl\dgsize \space\sizespec \def\lr{\tenlr}
-\font\tenli=\tmp-antpli\dgsize \space\sizespec \def\li{\tenli}
-\font\tenmr=\tmp-antpm\dgsize \space\sizespec \def\mr{\tenmr}
-\font\tenmi=\tmp-antpmi\dgsize \space\sizespec \def\mi{\tenmi}
-
-\font\tenrmc=\tmp-antpr\dgsize-sc \sizespec
-\font\tenbfc=\tmp-antpb\dgsize-sc \sizespec
-\font\tenitc=\tmp-antpri\dgsize-sc \sizespec
-\font\tenbic=\tmp-antpbi\dgsize-sc \sizespec
-
-\font\tenlrc=\tmp-antpl\dgsize-sc \sizespec
-\font\tenlic=\tmp-antpli\dgsize-sc \sizespec
-\font\tenmrc=\tmp-antpm\dgsize-sc \sizespec
-\font\tenmic=\tmp-antpmi\dgsize-sc \sizespec
-
-\let\dgsize=\undefined
-
-\tenrm
-
-% You can use \cap\rm, \cap\bf, \cap\li
-
-\def\caps#1{{\escapechar=-1 \expandafter}%
- \expandafter\csname\expandafter\tenonlytext\string#1c\endcsname}
-\def\tenonlytext{ten}
-
-\ifx\regfontdefault\undefined \else
- \regfontdefault
- \regfont\tenlr \regfont\tenli
- \regfont\tenmr \regfont\tenmi
- \regfont\tenrmc \regfont\tenitc
- \regfont\tenbfc \regfont\tenbic
- \regfont\tenlrc \regfont\tenlic
- \regfont\tenmrc \regfont\tenmic
+% cs-polta.tex: fonts loading file of Antykwa Torunska
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Petr Olsak, 2012, 2016
+
+\ifx\ffdecl\undefined \input ff-mac \fi
+
+\ffdecl [Antykwa Poltawskiego]
+ {\rm \bf \it \bi \lr \mr \li \mi} {\caps \wli} {} {TX} {8z 8t U}
+
+\ffvars {r}{b}{ri}{bi}
+\def\wli{\ffvars{l}{m}{li}{mi}\ffsetX}
+\def\nowli{\ffvars{r}{b}{ri}{bi}\ffsetX}
+\def\caps{\ffsetV{caps}{-sc}\ffsetX}
+\def\nocaps{\ffsetV{caps}{}\ffsetX}
+\def\capsV{}
+
+\ismacro\fotenc{8t}\ifttrue
+
+ \font\tenrm = ec-antpr10 \sizespec
+ \font\tenbf = ec-antpb10 \sizespec
+ \font\tenit = ec-antpri10 \sizespec
+ \font\tenbi = ec-antpbi10 \sizespec
+
+ \def\ffnamegen{ec-antp\ffvarV\ffoptV\capsV}
+
\fi
-\ifx\mathpreloaded X\else \input tx-math \fi
+\ismacro\fotenc{8z}\iftrue
+
+ \font\tenrm = cs-antpr10 \sizespec
+ \font\tenbf = cs-antpb10 \sizespec
+ \font\tenit = cs-antpri10 \sizespec
+ \font\tenbi = cs-antpbi10 \sizespec
+
+ \def\ffnamegen{cs-antp\ffvarV\ffoptV\capsV}
+ \input chars-8z
+
+\fi
+
+\ismacro\fotenc{U}\iftrue
-\ifx\font\corkencoded \else \input chars-8z \fi
+ \font\tenrm = "[antpolt-regular]:\fontfeatures" \sizespec
+ \font\tenbf = "[antpolt-bold]:\fontfeatures" \sizespec
+ \font\tenit = "[antpolt-italic]:\fontfeatures" \sizespec
+ \font\tenbi = "[antpolt-bolditalic]:\fontfeatures" \sizespec
+
+ \def\ffnamegen{"[antpolt\wliV\ffoptV-\ffvarV]:\capsV\fontfeatures"}
+
+ \ffvars {regular} {bold} {italic} {bolditalic}
+ \def\wli{\ffsetV{wli}{lt}\ffsetX}
+ \def\nowli{\ffsetV{wli}{}\ffsetX}
+ \def\caps{\ffsetV{caps}{+smcp;}\ffsetX}
+ \def\nocaps{\ffsetV{caps}{}\ffsetX}
+ \def\wliV{}
+
+ \regsizes {} {0 =expd 7 =semiexpd 9 ={} 11 =semicond 14 =cond}
+ \regsizes {\wli} {0 =expd 7 =semiexpd 9 ={} 11 =semicond 14 =cond}
+ \regsizes {\caps} {0 =expd 7 =semiexpd 9 ={} 11 =semicond 14 =cond}
+ \regsizes {\wli\caps} {0 =expd 7 =semiexpd 9 ={} 11 =semicond 14 =cond}
+
+\else
+
+ \regsizes {} {0 =6 7 =8 9 =10 11 =12 14 =17}
+ \regsizes {\wli} {0 =6 7 =8 9 =10 11 =12 14 =17}
+ \regsizes {\caps} {0 =6 7 =8 9 =10 11 =12 14 =17}
+ \regsizes {\wli\caps} {0 =6 7 =8 9 =10 11 =12 14 =17}
+
+\fi
+
+\tenrm % don't remember to initialize the family with normal font.
+
+
+\def\liweight{\wli\fam}
+\def\lr{\wli\rm}
+\def\mr{\wli\bf}
+\def\li{\wli\it}
+\def\mi{\wli\bi}
+
+\ifx\loadmathfonts\relax \endinput \fi
+\ifx\mathpreloaded X\else \input tx-math \fi
-% end of cs-polta.tex
+\endinput