|
|
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.