blob: 4da8f97c5a440303577e8b4cc12585c48f65abe8 (
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
|
% This macro source file is from the four volume series
% "TeX in Practice" by Stephan von Bechtolsheim, published
% 1993 by Springer-Verlag, New York.
% Copyright 1993 Stephan von Bechtolsheim.
% No warranty or liability is assumed.
% This macro may be copied freely if no fees other than
% media cost or shipping charges are charged and as long
% as this copyright and the following source code itself
% is not changed. Please see the series for further information.
%
% Version: 1.0
% Date: May 1, 1993
%
%
% This source code is documented in 16.9.2, p. II-303.
% Original source in file "fonts2.TEX", starting line 2106.
\wlog{L: "fonttab.tip" ["fonts2.TEX," l. 2106, p. II-303]}%
% This file DOES NOT belong to format "texip."
\input inputd.tip
\InputD{hex.tip}
\InputD{oct.tip}
\InputD{setstrut.tip}
\InputD{verb-bas.tip}
\nopagenumbers
\baselineskip = 13pt
\ComputeStrut
\def\VruleS{\MyStrut width 0.5pt}
\def\PrintCatCode #1{%
\ifnum `\@ = #1\relax
11 / 12\relax
\else
\the\catcode #1\relax
\fi
}
\newcount\tcount
\newcount\bcount
\def\OneChar #1{%
\tcount = #1
\advance\tcount by \bcount
\vtop{%
\hsize = 0.54in
\offinterlineskip
\hrule
\line{\VruleS\hfil \tt"\Hex{\tcount}\hskip0.3\hsize\VruleS}
\hrule
\line{\VruleS\hfil \tt'\Oct{\tcount}\hfil\VruleS}
\hrule
\line{\VruleS\hfil $\the\tcount_{\scriptscriptstyle 10}$%
\hfil\VruleS}
\hrule
\line{\VruleS\hfil \PrintCatCode{\tcount}\hfil\VruleS}
\hrule
\line{\VruleS \hfil
{\rm \char\tcount}\hskip 2.3pt
{\bf \char\tcount}\hskip 2.3pt
{\it \char\tcount}%
\hfil\VruleS}
\hrule
\line{\VruleS \hfil\tt \char\tcount\hfil\VruleS}
\hrule
}%
}
\def\TabLine #1{%
\bcount = #1
\hbox{%
\vtop{%
\baselineskip = 14pt
\hrule height 0pt depth 0pt
\hbox{Hex}
\hbox{Octal}
\hbox{Decimal}
\hbox{\tt\string\catcode}
\hbox{{\tt\string\rm}, \dots}
\hbox{\tt\string\tt}
}%
\hskip 8pt
\OneChar{0}\OneChar{1}\OneChar{2}\OneChar{3}%
\OneChar{4}\OneChar{5}\OneChar{6}\OneChar{7}
}
\vskip 12pt
}
\TabLine{0} \TabLine{8} \TabLine{16} \TabLine{24}
\vfill\eject
\TabLine{32} \TabLine{40} \TabLine{48} \TabLine{56}
\vfill\eject
\TabLine{64} \TabLine{72} \TabLine{80} \TabLine{88}
\vfill\eject
\TabLine{96} \TabLine{104} \TabLine{112} \TabLine{120}
\vfill\eject
\end
|
