![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to sfwmac.tex CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / mh / papers / tutorial|
Return to sfwmac.tex CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / mh / papers / tutorial |
1.1 root 1: % Support for writing UNIX-style documentation (based on webmac.tex)
2:
3:
4: \catcode`\@=11 % for a little while
5:
6:
7: % More fonts
8:
9: \font\sixteentex=amtex10 scaled\magstep2
10: \font\twelvetex=amtex10 scaled\magstep1
11: \font\tentex=amtex10
12: \font\eighttex=amtex10 at 8\p@
13:
14: \def\curfont{%
15: \ifcase\font@no
16: \rm\or
17: \it\or
18: \sl\or
19: \bf\or
20: \tt\or
21: \sc\or
22: \sf\or
23: \tx
24: \else \errmessage{font madness}\fi
25: }
26:
27: \chardef\AM=`\& % ampersand
28: \chardef\BS=`\\ % backslash
29: \chardef\LB=`\{ % left brace
30: \chardef\RB=`\} % right brace
31: \def\LQ{{\tt\char'22}} % left quote
32: \def\RQ{{\tt\char'23}} % right quote
33: \def\SP{{\tt\char`\ }} % space
34: \chardef\TL=`\~ % tilde
35: \chardef\UL=`\_ % underline
36:
37: \def\everypointsize#1#2{%
38: \def\tx{%
39: \font@no=8
40: \csname#1tex\endcsname
41: \let\&=\AM \let\\=\BS \let\{=\LB \let\`=\LQ
42: \let\}=\RB \let\'=\RQ \let\ =\SP \let\~=\TL
43: \let\_=\UL
44: }%
45: }
46:
47: \curtype
48:
49:
50: % Standard Characters
51:
52: \def\#{\hbox{\tt\char`\#}} % parameter sign
53: \def\${\hbox{\tt\char`\$}} % dollar sign
54: \def\%{\hbox{\tt\char`\%}} % percent sign
55: \def\^{\ifmmode\mathchar"222 \else\char`^ \fi} % pointer or hat
56:
57:
58: % Examples
59:
60: \def\eg#1{\hbox{\tx``#1''}} % in-line
61:
62: \def\example#1\endexample{% % multi-line
63: $$%
64: \displayindent=\leftskip
65: \ifdim\parindent>\z@
66: \advance\displayindent by1.5\parindent
67: \else
68: \advance\displayindent by.15\hsize
69: \fi
70: \let\\=\cr
71: \tabskip=\z@
72: \halign{%
73: \leftline{\tx\ignorespaces##\unskip}\cr
74: #1\cr
75: }%
76: $$%
77: }
78:
79:
80: % Miscellany
81:
82: \def\pgm#1{{\it#1}} % UNIX programs
83: \def\man#1(#2){\pgm{#1\/}(#2)} % manual entries
84: \def\arg#1{\hbox{\tx`{}#1'{}}} % arguments to programs
85: \def\switch#1{\hbox{\tx`{}-#1'{}}} % switches to programs
86: \def\file#1{\hbox{\sl#1}} % filename
87: \def\bq#1{`{}#1`{}} % back-quoted command
88:
89:
90: % Commonly used software systems
91:
92: \def\EMACS/{{\sf EMACS}}
93: \def\INFO/{{\sf INFO}}
94: \def\MLisp/{{\sf MLisp}}
95:
96: \def\MH/{{\sf MH}}
97: \def\mh#1{{\sf mh.#1}}
98: \def\Mail/{\file{Mail/}}
99: \def\context/{\file{context}}
100: \def\profile/{\file{.mh\_profile}}
101: \def\sequences/{\file{.mh\_sequences}}
102: \def\whatnow/{{\tx What now?\/}}
103:
104: \def\MMDF/{{\sf MMDF}}
105: \def\MMDFII/{\hbox{\sf MMDF-II}}
106:
107: \def\SendMail/{{\sf SendMail}}
108: \def\UUCP/{{\sf UUCP}}
109:
110: \def\AmS{$\cal A$\kern-.1667em\lower.5ex\hbox{$\cal M$}\kern-.125em$\cal S$}
111: \def\AMSPPT.STY/{{\tt amsppt.sty}}
112: \ifundefined{AmsTeX}
113: \def\AmSTeX{\AmS-\TeX}
114: \fi
115:
116: \def\DISS.STY/{{\tt diss.sty}}
117: \def\PhDTeX{\hbox{PhD-\TeX}}
118:
119: \def\LaTeX{L\kern-.2em\raise.3ex\hbox{\sc a}\kern-.09em\TeX}
120:
121: \def\NRTeX{\hbox{NR-\TeX}}
122:
123: \def\ROFF/{{\sf ROFF}}
124:
125: \def\SUMEX/{{\sf SUMEX}}
126:
127: \def\TTYD/{{\sf TTYD}}
128:
129:
130: % TeX Hackery...
131:
132: \def\!{\hbox{$\backslash$}}
133:
134: \def\word#1{{\tt\!#1}}
135:
136:
137: % Fractions (from TUGboat v6 n1, 1985)
138:
139: \def\frac#1/#2{%
140: \leavevmode\kern.1em
141: \raise.5ex\hbox{\the\scriptfont\z@ #1}\kern-.1em
142: /\kern-.15em\lower.25ex\hbox{\the\scriptfont\z@ #2}%
143: }
144:
145:
146: \catcode`\@=12 % back to normal
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.