% 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 \fi \ifx\mathpreloaded X\else \input tx-math \fi \ifx\font\corkencoded \else \input chars-8z \fi % end of cs-polta.tex