blob: 0cd6df32c1d6a72f0e9fad59db82881042190a0f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
|
28-Mar-88 10:59:52-PST,12436;000000000000
Return-Path: <mcvax!ruuinf!piet@uunet.UU.NET>
Date: Mon, 28 Mar 88 12:42:23 +0100
From: mcvax!ruuinf!piet@uunet.UU.NET (Piet van Oostrum)
Subject: change the default font
I have a style file to switch to laser-writer builtin fonts. This can be
used as a model for other font changes. It changes only the \rm, \it, \sf
\sl \tt \bf and \sc fonts and not the math mode fonts. It is basically an
edited version of lfonts.tex
------------------------------------------------------------------------
\def\@@getfont#1#2#3#4#5#6#7{%
\@ifundefined{\string #1\string #5}{\global\expandafter
\font \csname \string #1\string #5\endcsname #4\@ptscale{#5}\relax}{}%
\@ifundefined{\string #1\string #6}{\global\expandafter
\font \csname \string #1\string #6\endcsname #4\@ptscale{#6}\relax}{}%
\@ifundefined{\string #1\string #7}{\global\expandafter
\font \csname \string #1\string #7\endcsname #4\@ptscale{#7}\relax}{}%
\@ifundefined{\string #1\string #3}{\global\expandafter
\let \csname \string #1\string #3\endcsname #3\relax
\@addfontinfo#3{\textfont #2\csname \string #1\string #5\endcsname
\scriptfont #2\csname \string #1\string #6\endcsname
\scriptscriptfont #2\csname \string #1\string #7\endcsname
\def#1{\fam #2\csname\string #1\string #5\endcsname}}}{}#3#1}
\def\@@@getfont#1#2#3#4#5{%
\@ifundefined{\string #1\string #5}{\global\expandafter
\font \csname \string #1\string #5\endcsname #4\@ptscale{#5}\relax}{}%
\@ifundefined{\string #1\string #3}{\global\expandafter
\let \csname \string #1\string #3\endcsname #3\relax
\@addfontinfo#3{\def#1{\fam #2\csname\string #1\string #5\endcsname}}}{}#3#1}
\def\@psfonts#1#2#3#4{%
\def\prm{\@@@getfont\prm\z@#1\@mrm{#2}}%
\def\pit{\@@getfont\pit\itfam#1\@mit{#2}{#3}{#4}}%
\def\psl{\@@getfont\psl\slfam#1\@msl{#2}{#3}{#4}}%
\def\pbf{\@@getfont\pbf\bffam#1\@mbf{#2}{#3}{#4}}%
\def\ptt{\@@getfont\ptt\ttfam#1\@mtt{#2}{#3}{#4}%
\@nohyphens\ptt {#2}\@nohyphens\ptt {#3}\@nohyphens\ptt {#4}}%
\def\psf{\@@getfont\psf\sffam#1\@mss{#2}{#3}{#4}}%
\def\psc{\@@getfont\psc\scfam#1\@mcsc{#2}{#3}{#4}}}
\def\@mrm{t-rom}% times - roman
\def\@mit{t-ita}% times - italic
\def\@msl{t-obl}% times - oblique
\def\@mbf{t-bol}% times - bold
\def\@mtt{c-med}% courier
\def\@mcsc{t-romsc}% times - roman - small caps
\def\@mss{h-med}% helvetica
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\vpt{\textfont\z@\fivrm
\scriptfont\z@\fivrm \scriptscriptfont\z@\fivrm
\textfont\@ne\fivmi \scriptfont\@ne\fivmi \scriptscriptfont\@ne\fivmi
\textfont\tw@\fivsy \scriptfont\tw@\fivsy \scriptscriptfont\tw@\fivsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath
\unboldmath\fam\@ne\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@vpt555%
\def\ly{\fam\lyfam\fivly}\textfont\lyfam\fivly
\scriptfont\lyfam\fivly \scriptscriptfont\lyfam\fivly
\@setstrut\rm}
\def\@vpt{}
\def\vipt{\textfont\z@\sixrm
\scriptfont\z@\sixrm \scriptscriptfont\z@\sixrm
\textfont\@ne\sixmi \scriptfont\@ne\sixmi \scriptscriptfont\@ne\sixmi
\textfont\tw@\sixsy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\sixsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath
\unboldmath\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@vipt666
\def\ly{\fam\lyfam\sixly}\textfont\lyfam\sixly
\scriptfont\lyfam\sixly \scriptscriptfont\lyfam\sixly
\@setstrut\rm}
\def\@vipt{}
\def\viipt{\textfont\z@\sevrm
\scriptfont\z@\sixrm \scriptscriptfont\z@\fivrm
\textfont\@ne\sevmi \scriptfont\@ne\fivmi \scriptscriptfont\@ne\fivmi
\textfont\tw@\sevsy \scriptfont\tw@\fivsy \scriptscriptfont\tw@\fivsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath
\unboldmath\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@viipt755%
\def\ly{\fam\lyfam\sevly}\textfont\lyfam\sevly
\scriptfont\lyfam\fivly \scriptscriptfont\lyfam\fivly
\@setstrut \rm}
\def\@viipt{}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\viiipt{\textfont\z@\egtrm
\scriptfont\z@\sixrm \scriptscriptfont\z@\fivrm
\textfont\@ne\egtmi \scriptfont\@ne\sixmi \scriptscriptfont\@ne\fivmi
\textfont\tw@\egtsy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\fivsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath
\unboldmath\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@viiipt865%
\def\ly{\fam\lyfam\egtly}\textfont\lyfam\egtly
\scriptfont\lyfam\sixly \scriptscriptfont\lyfam\fivly
\@setstrut \rm}
\def\@viiipt{}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\ixpt{\textfont\z@\ninrm
\scriptfont\z@\sixrm \scriptscriptfont\z@\fivrm
\textfont\@ne\ninmi \scriptfont\@ne\sixmi \scriptscriptfont\@ne\fivmi
\textfont\tw@\ninsy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\fivsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@ixpt965%
\def\ly{\fam\lyfam\ninly}\textfont\lyfam\ninly
\scriptfont\lyfam\sixly \scriptscriptfont\lyfam\fivly
\@setstrut \rm}
\def\@ixpt{}
\def\xpt{\textfont\z@\tenrm
\scriptfont\z@\sevrm \scriptscriptfont\z@\fivrm
\textfont\@ne\tenmi \scriptfont\@ne\sevmi \scriptscriptfont\@ne\fivmi
\textfont\tw@\tensy \scriptfont\tw@\sevsy \scriptscriptfont\tw@\fivsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\textfont\@ne\tenmi
\textfont\tw@\tensy \textfont\lyfam\tenly
\@boldfalse}\@boldfalse
\def\boldmath{\@ifundefined{tenmib}{\global\font\tenmib\@mbi
\global\font\tensyb\@mbsy
\global\font\tenlyb\@lasyb\relax\@addfontinfo\@xpt
{\def\boldmath{\everymath{\mit}\everydisplay{\mit}\@prtct\@nomathbold
\textfont\@ne\tenmib \textfont\tw@\tensyb
\textfont\lyfam\tenlyb \@prtct\@boldtrue}}}{}\@xpt\boldmath}%
\@psfonts\@xpt{10}75%
\def\ly{\fam\lyfam\tenly}\textfont\lyfam\tenly
\scriptfont\lyfam\sevly \scriptscriptfont\lyfam\fivly
\@setstrut \rm}
\def\@xpt{}
\def\xipt{\textfont\z@\elvrm
\scriptfont\z@\egtrm \scriptscriptfont\z@\sixrm
\textfont\@ne\elvmi \scriptfont\@ne\egtmi \scriptscriptfont\@ne\sixmi
\textfont\tw@\elvsy \scriptfont\tw@\egtsy \scriptscriptfont\tw@\sixsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\textfont\@ne\elvmi \textfont\tw@\elvsy
\textfont\lyfam\elvly \@boldfalse}\@boldfalse
\def\boldmath{\@ifundefined{elvmib}{\global\font\elvmib\@mbi\@halfmag
\global\font\elvsyb\@mbsy\@halfmag
\global\font\elvlyb\@lasyb\@halfmag\relax\@addfontinfo\@xipt
{\def\boldmath{\everymath{\mit}\everydisplay{\mit}\@prtct\@nomathbold
\textfont\@ne\elvmib \textfont\tw@\elvsyb
\textfont\lyfam\elvlyb\@prtct\@boldtrue}}}{}\@xipt\boldmath}%
\@psfonts\@xipt{11}86%
\def\ly{\fam\lyfam\elvly}\textfont\lyfam\elvly
\scriptfont\lyfam\egtly \scriptscriptfont\lyfam\sixly
\@setstrut \rm}
\def\@xipt{}
\def\xiipt{\textfont\z@\twlrm
\scriptfont\z@\egtrm \scriptscriptfont\z@\sixrm
\textfont\@ne\twlmi \scriptfont\@ne\egtmi \scriptscriptfont\@ne\sixmi
\textfont\tw@\twlsy \scriptfont\tw@\egtsy \scriptscriptfont\tw@\sixsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\textfont\@ne\twlmi
\textfont\tw@\twlsy \textfont\lyfam\twlly
\@boldfalse}\@boldfalse
\def\boldmath{\@ifundefined{twlmib}{\global\font\twlmib\@mbi\@magscale1\global
\font\twlsyb\@mbsy \@magscale1\global\font
\twllyb\@lasyb\@magscale1\relax\@addfontinfo\@xiipt
{\def\boldmath{\everymath
{\mit}\everydisplay{\mit}\@prtct\@nomathbold
\textfont\@ne\twlmib \textfont\tw@\twlsyb
\textfont\lyfam\twllyb\@prtct\@boldtrue}}}{}\@xiipt\boldmath}%
\@psfonts\@xiipt{12}86%
\def\ly{\fam\lyfam\twlly}\textfont\lyfam\twlly
\scriptfont\lyfam\egtly \scriptscriptfont\lyfam\sixly
\@setstrut \rm}
\def\@xiipt{}
\def\xivpt{\textfont\z@\frtnrm
\scriptfont\z@\tenrm \scriptscriptfont\z@\sevrm
\textfont\@ne\frtnmi \scriptfont\@ne\tenmi \scriptscriptfont\@ne\sevmi
\textfont\tw@\frtnsy \scriptfont\tw@\tensy \scriptscriptfont\tw@\sevsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\textfont\@ne\frtnmi \textfont\tw@\frtnsy
\textfont\lyfam\frtnly \@boldfalse}\@boldfalse
\def\boldmath{\@ifundefined{frtnmib}{\global\font
\frtnmib\@mbi\@magscale2\global\font\frtnsyb\@mbsy\@magscale2
\global\font\frtnlyb\@lasyb\@magscale2\relax\@addfontinfo\@xivpt
{\def\boldmath{\everymath
{\mit}\everydisplay{\mit}\@prtct\@nomathbold
\textfont\@ne\frtnmib \textfont\tw@\frtnsyb
\textfont\lyfam\frtnlyb\@prtct\@boldtrue}}}{}\@xivpt\boldmath}%
\@psfonts\@xivpt{14}{10}7%
\def\ly{\fam\lyfam\frtnly}\textfont\lyfam\frtnly
\scriptfont\lyfam\tenly \scriptscriptfont\lyfam\sevly
\@setstrut \rm}
\def\@xivpt{}
\def\xviipt{\textfont\z@\svtnrm
\scriptfont\z@\twlrm \scriptscriptfont\z@\tenrm
\textfont\@ne\svtnmi \scriptfont\@ne\twlmi \scriptscriptfont\@ne\tenmi
\textfont\tw@\svtnsy \scriptfont\tw@\twlsy \scriptscriptfont\tw@\tensy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\textfont\@ne\svtnmi \textfont\tw@\svtnsy \textfont\lyfam\svtnly
\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@xviipt{17}{12}{10}%
\def\ly{\fam\lyfam\svtnly}\textfont\lyfam\svtnly
\scriptfont\lyfam\twlly \scriptscriptfont\lyfam\tenly
\@setstrut \rm}
\def\@xviipt{}
\def\xxpt{\textfont\z@\twtyrm
\scriptfont\z@\frtnrm \scriptscriptfont\z@\twlrm
\textfont\@ne\twtymi \scriptfont\@ne\frtnmi \scriptscriptfont\@ne\twlmi
\textfont\tw@\twtysy \scriptfont\tw@\frtnsy \scriptscriptfont\tw@\twlsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\textfont\@ne\twtymi \textfont\tw@\twtysy \textfont\lyfam\twtyly
\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@xxpt{20}{14}{12}%
\def\ly{\fam\lyfam\twtyly}\textfont\lyfam\twtyly
\scriptfont\lyfam\frtnly \scriptscriptfont\lyfam\twlly
\@setstrut \rm}
\def\@xxpt{}
\def\xxvpt{\textfont\z@\twfvrm
\scriptfont\z@\twtyrm \scriptscriptfont\z@\svtnrm
\textfont\@ne\twtymi \scriptfont\@ne\twtymi \scriptscriptfont\@ne\svtnmi
\textfont\tw@\twtysy \scriptfont\tw@\twtysy \scriptscriptfont\tw@\svtnsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
\textfont\@ne\twtymi \textfont\tw@\twtysy \textfont\lyfam\twtyly
\@boldfalse}\@boldfalse
\def\boldmath{\@subfont\boldmath\unboldmath}%
\@psfonts\@xxvpt{25}{20}{17}%
\def\ly{\fam\lyfam\twtyly}\textfont\lyfam\twtyly
\scriptfont\lyfam\twtyly \scriptscriptfont\lyfam\svtnly
\@setstrut \rm}
\def\@xxvpt{}
-------
|
