summaryrefslogtreecommitdiff
path: root/info/digests/ttn/ttn3n1.sty
blob: f68215804f17f139fba29a368ec9c73ac416ab49 (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
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
%%%   ttn3n1.sty

%%%%%%%%%%%%%%%%%%%
%%
%% IMPORTANT NOTICE: You *MUST* use this version 3.1 of tugnews.sty
%%                   dated JAN 1994 in order to run vol.3, no.1 of
%%                   _TeX and TUG NEWS_. (Ch. Thiele, Editor, TTN).
%%
%%      NOTE: This file includes Peter Flynn's keybox.tex style file,
%%            appended at the end (Ch.)
%%
%%%%%%%%%%%%%%%%%%%


\input report.sty    %% default report style, 10pt font

\typeout{Version 3.1 -- Jan 94}

\textwidth=29pc
\textheight=43pc
\voffset=-2pc
\overfullrule=0pt  \hfuzz=5pt

\font\Sectionfont=cmbxsl10 scaled \magstep2    %% \Large = 14.40pt
%% \Subsectionfont isn't used anymore
%%  \font\Subsectionfont=cmbxsl10 scaled \magstep1 %% \large = 12pt
\font\subsectionbit=cmbxti10 scaled\magstep1   %% bold italic 12pt
\font\subsectiontt=cmtt10 scaled\magstep1      %% 12pt \tt (2 JAN 94)
\font\bsl=cmbxsl10                             %% bold slant 10pt
\font\unsl=cmu10                               %% unslant 10pt for
                                               %%   upright pound sign

%test for nfss as suggested by Johannes Braams (cjc, 1992.10)
   \ifx\undefined\selectfont
   %   If NFSS is not preloaded, do nothing.
   \else
   %   If NFSS has been preloaded, we need the following:
   %   \font\tenmi=cmmi10 % or better yet:
      \def\tenmi{\fontfamily{cmm}\fontseries{m}\fontshape{it}%
                 \fontsize{10}{12pt}\selectfont}
   \fi


\newcommand{\Section}[1]{\section*{\centering%
                                   \hrule\hrule \vskip.5pc
                                    {\Sectionfont #1}
                                   \vskip.5pc \hrule\hrule
                                   \vskip1pc
                                  }
           }
%% The following macro hasn't been used since the prototype:
%% Reggie's \Subsection (6 MAY 91):   %% 15 JAN 92: not used in 1,1
%%   \newcommand{\Subsection}[1]{\subsection*{\centering%
%%          \centerline{\vrule width 6cm height .5pt} \vskip 6pt
%%                                    {{\Subsectionfont #1}}
%%          \centerline{\vrule width 6cm height .5pt} \vskip 6pt
%%                                  }
%%           }


%% 24 MAY 93: The following macro introduced in TTN 2,3 (written by
%%            Jeremy Gibbons): 

% \squashedsubsection{foo}{bar} gives similar results to
%
%    \subsection*{foo}
%    \vspace*{-1.5pc}
%    \begin{flushright} bar \end{flushright}
%    \noindent
%
% except you don't have to guess the 1.5pc.
% NB: no attempt is made to avoid overlap!

\def\squashedsubsection#1#2{%
   \subsection*{%
      \hbox to \linewidth{%
         #1% subsection title
         \hfil%
         \llap{\normalsize%
            \begin{tabular}[t]{r@{}}
                #2% byline
            \end{tabular}}%
      }%
   }%
}


%% 29 SEP 93: added the following (adapted from a macro in
%%            Chris/Frank's report in TTN 2,4:

\renewcommand{\subsubsection}{\vspace{-6pt}
                              \paragraph*}


%% 11 JAN 92: added \bibentry, a hanging indent biblio style (Ch.)
\newcommand{\bibentry}{\hangindent=\parindent
                       \hangafter=1
                       \noindent \sloppy
                       \clubpenalty500 \widowpenalty500
                       \frenchspacing
                      }

%%  3 FEB 92: Jackie Damrau provided this:
\newenvironment{Address}{\begin{verse}}%
                        {\end{verse}}


%%  8 MAR 93: Peter Schmitt added this for his column.
%%  1 JUN 93: added:  = for slanted
%%                   \etext, \etexts, \Etexts:
%%                             for electronic publications
%%          changed: \book
%%                   (a) to allow controlword at the end of title
%%                   (b) to work better with \ISBN
%% 13 DEC 93: added: \article, \articles, \Articles:
%%                             for papers, reviews, articles

\newenvironment{New Publications}%
%% begin text
    {
% tools for defining active characters
     \def\Def##1{\catcode`##1\active
         \uccode`\~`##1\uppercase{\uccode`\~0 \def~}}
     \def\sDef##1##2{\catcode`##1\active
         \uccode`\~`##1\uppercase{\uccode`\~0 \def~####1~}{{##2####1}}}
% macros for formatting items
     \def\book ##1##2:##3\par ##4\par {%
          \iflist \else \openlist \fi
          {\frenchspacing
          \item [##1##2.] {\sl##3\unskip\/}.\\##4\penalty10000\hfill\hbox{}}}
     \def\etext ##1##2:##3\par {%
          \iflist \else \openlist \fi
          {\frenchspacing
          \item [##1##2.] {\sl##3\unskip\/}.}}
     \def\issue ##1##2:##3\par {%
          \iflist \else \openlist \fi
          {\frenchspacing
          \item [{\sl##1##2\/}:] ##3}}
% macros for marking subsections
     \def\books{}
     \def\Etexts{%
         \iflist \closelist \fi
         \subsection*{Electronic publications}
         \etexts}
     \def\etexts{\Def\>{\etext}}
     \def\articles{\Def\>{\book}}
     \def\Articles{%
         \iflist \closelist \fi
         \subsection*{Articles on \TeX}
         \articles}
     \def\newsletters{\Def\>{\issue}\Def\#{\newline}}
     \def\Newsletters{%
         \iflist \closelist \fi
         \subsection*{Latest issues of other \TeX\ newsletters}
         \newsletters}
% font switches
     \sDef\|{\tt}
     \sDef\_{\it}
     \sDef\"{\small}
     \sDef\={\sl}
% auxiliary macros
     \def\ISBN##1-##2-##3-##4{\penalty10000\hfil\hbox{}\hskip0pt\relax
                              \hbox{\isbn\ ##1-##2-##3-##4}}
     \Def\&{{\rm and}}
     \Def\#{\\$\bullet$}
     \Def\>{\book}
     \Def<##1 \\{\iflist \closelist \fi
                 {\parfillskip0pt\parskip0pt\parindent0pt
                  \hskip0pt\hfil##1\par}}
% macros managing the description environment
     \def\openlist{\begin{description}\let\iflist\iftrue}
     \def\closelist{\end{description}\let\iflist\iffalse}
     \let\iflist\iffalse
% start page
     \Section{New Publications}
    }%
%% end text
    {\iflist \closelist \fi
    \newpage}


%%  7 OCT 93: Jeremy Gibbons added this for TTN 2,4 (and described it
%%            in his column):

\makeatletter
% myfootnote.sty
% incorporate plain TeX's trickery into LaTeX's footnote macros to allow
% \verb"..." within footnotes (argument to \footnote is not read before
% it is executed)
\long\def\@footnotetext{%
    \insert\footins\bgroup
       \footnotesize
       \interlinepenalty\interfootnotelinepenalty 
       \splittopskip\footnotesep
       \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
       \hsize\columnwidth \@parboxrestore
       \edef\@currentlabel{\csname p@footnote\endcsname\@thefnmark}%
       \@makefntext{\rule{\z@}{\footnotesep}\ignorespaces}%
       \futurelet\next\fo@t        %% #1\strut\egroup
}
\def\fo@t{\ifcat\bgroup\noexpand\next \let\next\f@@t
                                \else \let\next\f@t\fi \next}
\def\f@@t{\bgroup\aftergroup\@foot\let\next}
\def\f@t#1{#1\@foot}
\def\@foot{\strut\egroup}
\makeatother

%%%%%%%%%%%%%%%%


%% Abbreviations and Logos (some copped from tugboat.cmn):

\newcommand{\LaTeXe}  %% used in TTN 2,4 (Ch.)
           {\LaTeX{}\kern.05em2$_{\textstyle\varepsilon}$}

%% for the METAFONT logo font:
\font\manual=manfnt   %%  logo10
\newcommand{\MF}{{\manual META}\-{\manual FONT}}
\newcommand{\MFB}{{\sl The \MF book\/}}  %% added 2 JAN 94 (Ch.)

\newcommand{\PS}{{\sc Post\-Script}}

\newcommand{\TB}{{\sl The \TeX book\/}}  %% added 2 JAN 94 (Ch.)
\newcommand{\TTN}{{\sl\TeX{} and TUG NEWS\/}}
\newcommand{\TUG}{\TeX{} Users Group}
\newcommand{\TUB}{{\sl TUGboat\/}}

\newcommand{\ascii}{{\small ASCII}} %% added 28 SEP 93 (Ch.)
\newcommand{\act}{{\small ACT}}     %% added 28 SEP 93 (Ch.)
\newcommand{\ctan}{{\small CTAN}}   %% added 30 DEC 93 (Ch.)
\newcommand{\dante}{{\small DANTE}} %% added 28 SEP 93 (Ch.)
\newcommand{\fax}{{\small FAX}}     %% added 15 OCT 92 (Ch.)
\newcommand{\ftp}{{\small FTP}}     %% added 21 JUN 93 (Ch.)
\newcommand{\isbn}{{\small ISBN}}   %% added 30 SEP 92 (Ch.)
\newcommand{\iso}{{\small ISO}}     %% added 30 DEC 93 (Ch.)
\newcommand{\issn}{{\small ISSN}}   %% added 30 SEP 92 (Ch.)
\newcommand{\nfss}{{\small NFSS}}   %% added 30 SEP 92 (Ch.)
\newcommand{\ntg}{{\small NTG}}     %% added 30 DEC 93 (Ch.)
\newcommand{\pim}{{\small PIM}}     %% added 28 SEP 93 (Ch.)
\newcommand{\ttn}{{\small TTN}}     %% added 30 SEP 92 (Ch.)
\newcommand{\tug}{{\small TUG}}     %% added 30 SEP 92 (Ch.)
\newcommand{\twg}{{\small TWG}}     %% added 30 DEC 93 (Ch.)
\newcommand{\uk}{{\small UK}}       %% added 15 OCT 92 (Ch.)
\newcommand{\unix}{{\small UNIX}}   %% added 27 MAR 93 (Ch.)
\newcommand{\usa}{{\small USA}}     %% added 30 DEC 93 (Ch.)


\renewcommand{\pounds}{{\unsl\$}}   %% added 15 OCT 92 (Ch.)

\newcommand{\GUTenberg}{{\small GUT}enberg} %% added  2 FEB 93 (Ch.)


%% 4 FEB 92: improved versions of LaTeX, and (La)TeX macros:

\newcount\TestCount
\newcommand{\La}{\TestCount=\the\fam \leavevmode L\raise.42ex
                 \hbox{$\fam\TestCount\scriptstyle\kern-.3em A$}}

\renewcommand{\LaTeX}{\La\kern-.15em\TeX}

\newcommand{\AllTeX}{{(\La)\TeX}}

\newcommand{\AmSTeX}{{\the\textfont2 A}\kern-.1667em\lower.5ex\hbox
                     {\the\textfont2 M}\kern-.125em{\the\textfont2 S}-\TeX}

\newcommand{\AmSLaTeX}{{\the\textfont2 A}\kern-.1667em\lower.5ex\hbox
                       {\the\textfont2 M}\kern-.125em{\the\textfont2 S}-\LaTeX}

\newcommand{\BibTeX}{{\rm B\kern-.05em{\sc i\kern-.025emb}\kern-.08em\TeX}}

\newcommand{\careof}{\leavevmode\hbox{\raise.75ex\hbox{c}\kern-.15em
                      /\kern-.125em\smash{\lower.3ex\hbox{o}}} \ignorespaces}

\newcommand{\ILaTeX}{I\LaTeX}

%% 24 MAY 93: added PiCTeX macro (Ch.):
\newcommand{\PiC}{P\kern-.12em\lower.5ex\hbox{I}\kern-.075em C}
\newcommand{\PiCTeX}{\PiC\kern-.11em\TeX}

%% 26 SEP 93: added SLiTeX macro (Ch.):
\renewcommand{\SLiTeX}{{\rm S\kern-.06em{\sc l\kern-.035emi}\kern-.06em\TeX}}

\newcommand{\TeCH}{{\rm T\kern-.1667em\lower.7ex\hbox{E}\kern-.125em{\sf CH}}}

\newcommand{\TeXline}{{\TeX\kern-0.1em line}}

%% 28 JAN 93: from Phil Taylor:
\def\UK-TuG{UK-T\lower0.5ex\hbox{U}G}


%% Miscellaneous:

\hyphenation{Karls-ruhe}

\let\ts=\thinspace
\let\nl=\newline


%% 15 DEC 93: appended keybox.tex, Peter Flynn's style file for his
%%            column, ``Typographer's Inn'' (Ch.)


%%   -------------- keybox.tex ----------------
% KEYBOX.TEX - makes a round-cornered box around a word or letter
%              Peter Flynn, November 1993 <pflynn@curia.ucc.ie>

\font\rings=lcircle10
\font\krm=cmss8

\newbox\kbox                             % box to test dimensions
\newdimen\kwd\newdimen\kht\newdimen\kdp  % the test dimensions
\newdimen\chkht\newdimen\zht             % and some more

\def\key#1{%
% find the height of a cap and a descender in the font we're using
\setbox\kbox=\hbox{{\krm Xy}}\kht=\ht\kbox
% find the width of the key name we're going to set
\setbox\kbox=\hbox{{\krm#1}}\kwd=\wd\kbox
% make it 1em wide if it's actually a narrow character, then add some space
{\krm\ifdim\kwd<1em\global\kwd=1em\fi}\advance\kwd by4pt%
% get the depth of descender, if any, in the text we are setting
\kdp=\dp\kbox
% get the height of the text, and subtract it from the height of a capital
% if the text being set contains a cap, this leaves 0pt, otherwise it leaves
% the difference between x-height and cap-height.
\chkht=\ht\kbox\zht=\kht\advance\zht by-\chkht
% if the height of the text is indeed less than the height of a cap,
% subtract the difference calculated above from the cap-height
% and then subtract the x-height. This should leave just enough space
% to \vskip backwards to cover our tracks
\ifdim\chkht<\kht\advance\kht by-\zht\fi{\krm\global\advance\kht by-1ex}
% now set it in a \hbox, dropped 2pt to line up the baselines (roughly)
\setbox\kbox=\hbox{\lower2pt%
% containing a \vbox set to the width of the text plus the rule thicknesses
\vbox{\hsize=\kwd\advance\hsize by.8pt%
% zoom leftwards because of the silly reference points of the corners
\advance\kwd by-7.2pt%
% and make in internal \hbox for the ``lid'' containing the top LH corner,
\hbox to\hsize{{\rings\char'007}%
% the rule,
\kern-3.5pt\hbox to\kwd{\hrulefill}\kern3pt%
% and the top RH corner, and don't gripe about it not fitting!
{\rings\char'004}\hss}\nointerlineskip% 
% shift up 1pt to make the lines meet, and also the amount we calculated
% above to hide the ascenders in the upper <corner><rule><corner> ``lid''.
\vskip-1pt\vskip-\kht
% set the \hbox in the middle with a rule, the text and a rule. The negative
% rule depth makes a 1pt rule to cover the gap caused by the height of the
% characters
\hbox to\hsize{\vrule height3pt depth-2pt\hss{\krm#1}\hss\vrule 
height3pt depth-2pt}\nointerlineskip%
% if there were descenders, now's the time to backtrack to fit them
% into the bottom of the box. It seems to need the extra -space, I dunno why.
\ifdim\kdp>0pt\kern-\kdp\fi\vskip-2.125pt%
% finally, fit together the bottom, the same way as the ``lid''.
\hbox to\hsize{{\rings\char'006}\kern-3.5pt\hbox to\kwd{\hrulefill}%
\kern3pt{\rings\char'005}\hss}}}%
% then backtrack a bit because of the corner reference points being so odd
\kern-2pt\box\kbox}
%
% Here's a line to test it with
%
%This is a \key{Enter} key, this is \key{Esc} and the \key{x}\hfil\break 
%This is a second line with a \key{X} and \key{y} plus the \key{Nasty} one.
%\bye



%% CHANGES FROM ttn1-1.sty to ttn1-2.sty:

%% 25 MAY 92: changed \smc to \sc in \BiBTeX def'n (Ch.)
%%            added \AmSLaTeX def'n (Ch.)
%% 14 JUN 92: added \TeXline def (Ch.)

%% CHANGES from ttn1-2.sty to ttn1-3.sty:
%% 10 SEP 92: Jackie added {ttnlist}

%% 24 MAY 93: uncommented \bsl def (cmbxsl10) (Ch.)
%%            added \PiCTeX macro (Ch.)

%% CHANGES from ttn2n3 to ttn2n4:
%%   changed a lot of \def's to \newcommand (Ch.)
%%   added several new {\small ...} macros
%%   revised \subsubsection to be \paragraph*
%%   added Jeremy Gibbons' footnote macro (does \verb|...| now)

%% CHANGES from ttn2n4 to ttn3.1:
%%   included Flynn's keybox.tex macros into this TTN .sty file 
%%   replaced Peter Schmitt's macros with an augmented update version 
%%   added \small CTAN, ISO
%%   added \TB and \MFB  (TeXbook, Metafont book)
%%   added \tt at 12pt for \subsection size
%%   added \LaTeXe macro from TTN 2,4

%% END OF FILE