diff options
Diffstat (limited to 'Master/texmf-dist/tex/fontinst/latinetx/t1cj.etx')
-rw-r--r-- | Master/texmf-dist/tex/fontinst/latinetx/t1cj.etx | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/fontinst/latinetx/t1cj.etx b/Master/texmf-dist/tex/fontinst/latinetx/t1cj.etx new file mode 100644 index 00000000000..2c80b3821b8 --- /dev/null +++ b/Master/texmf-dist/tex/fontinst/latinetx/t1cj.etx @@ -0,0 +1,51 @@ +\relax + +% t1cj.etx -- install a T1-encoded faked small-caps & oldstyle font +% +% This is used to install expertized or faked small-caps fonts; +% real small caps fonts built from fonts with variant c8r are +% installed using the default t1.etx. + +\encoding + +% We define the parameters for t1.etx to produce a c&sc font. + +\setcommand\lc#1#2{#1small} +\setcommand\uc#1#2{#1} +\setcommand\lctop#1#2{#1small} +\setcommand\uctop#1#2{#1} +\setcommand\lclig#1#2{#1small} +\setcommand\uclig#1#2{#1spaced} +\setcommand\digit#1{#1oldstyle} + +% The default letter spacing is 1/10 of the design size, with small +% caps 80% the size of large caps. + +\setint{smallcapsscale}{800} + +\ifisglyph{space}\then + \setint{interword}{\width{space}} +\else\ifisglyph{i}\then + \setint{interword}{\width{i}} +\else + \setint{interword}{333} +\fi\fi + +\ifisint{monowidth}\then + \setint{smallcapsextraspace} + {\div{\scale{\int{interword}}{\sub{1000}{\int{smallcapsscale}}}}{2}} + \setint{smallcapsspacing}{0} +\else + \setint{smallcapsextraspace}{50} + \setint{smallcapsspacing}{50} +\fi + +\ifisint{capspacing}\then + \setint{letterspacing}{\int{capspacing}} +\fi + +% Then we call t1.etx. + +\inputetx{t1} + +\endencoding |