Return to nwmac.tex CVS log

Up to [Research Unix] / researchv10dc / cmd / sml / doc / mips

Annotation of researchv10dc/cmd/sml/doc/mips/nwmac.tex, revision 1.1.1.1

1.1       root        1: \magnification=\magstephalf
                      2: \advance\hoffset 0.5 true in
                      3: \advance\hsize -1 true in
                      4: \newdimen\textsize
                      5: \textsize=\hsize
                      6: \def\today{\ifcase\month\or
                      7:   January\or February\or March\or April\or May\or June\or
                      8:   July\or August\or September\or October\or November\or December\fi
                      9:   \space\number\day, \number\year}
                     10: \headline={\hbox to \textsize{\tentt\firstmark\hfil\tenrm\today\hbox
                     11: to 4em{\hss\folio}}\hss}
                     12: \footline={\hfil}
                     13: \def\semifilbreak{\vskip0pt plus1.5in\penalty-200\vskip0pt plus -1.5in}
                     14: \raggedbottom
                     15: 
                     16: %
                     17: % \chapcenter macro to produce nice centered chapter titles
                     18: %
                     19: \def\chapcenter{\leftskip=0.5 true in plus 4em minus 0.5 true in
                     20:     \rightskip=\leftskip
                     21:     \parfillskip=0pt \spaceskip=.3333em \xspaceskip=.5em
                     22:     \pretolerance=9999 \tolerance=9999
                     23:     \hyphenpenalty=9999 \exhyphenpenalty=9999}
                     24: % \startsection{LEVEL}{INDENT}{BEFORESKIP}{AFTERSKIP}{STYLE}{HEADING}
                     25: %              #1     #2      #3          #4         #5     #6
                     26: %
                     27: %      LEVEL:          depth; e.g. part=0 chapter=1 sectino=2...
                     28: %      INDENT:         indentation of heading from left margin
                     29: %      BEFORESKIP:     skip before header
                     30: %      AFTERSKIP:      skip after header
                     31: %      STYLE:          style of heading; e.g.\bf
                     32: %      HEADING:        heading of the sectino
                     33: %
                     34: \def\startsection#1#2#3#4#5#6{\par\vskip#3
                     35:     \noindent{\leftskip=#2 \rightskip=0.5true in plus 4em minus 0.5 true in
                     36:               \hyphenpenalty=9999 \exhyphenpenalty=9999
                     37:               #5#6\par}\vskip#4%
                     38:     {\def\code##1{[[}\def\edoc##1{]]}\message{[#6]}}
                     39:     \settocparms{#1}
                     40:     \def\themodtitle{#6}
                     41:     {\def\code{\string\code}\def\edoc{\string\edoc}%
                     42:     \edef\next{\write\cont{\tocskip
                     43:        \tocline{\hskip\tocindent\tocstyle\relax\themodtitle}
                     44:                {\the\pageno}}}\next % write to toc
                     45:     }%
                     46: }
                     47: %
                     48: \def\settocparms#1{
                     49:        \count255=#1
                     50:        \ifnum\count255<1
                     51:             \def\tocskip{\vskip3ptplus1in\penalty-100
                     52:                        \vskip0ptplus-1in}%
                     53:             \def\tocstyle{\bf}
                     54:            \def\tocindent{0pt}
                     55:         \else
                     56:             \def\tocskip{}
                     57:            \def\tocstyle{\rm}
                     58:            \dimen0=2em \advance\count255 by -1 \dimen0=\count255\dimen0
                     59:            \edef\tocindent{\the\dimen0}
                     60:        \fi
                     61: }
                     62: %
                     63: \def\tocline#1#2{\line{{\ignorespaces#1}\leaders\hbox to .5em{.\hfil}\hfil
                     64:      \hbox to1.5em{\hss#2}}}
                     65: 
                     66: 
                     67: \def\section#1{\par \vskip3ex\noindent {\bf #1}\par\nobreak\vskip1ex\nobreak}
                     68: \def\chapter#1{\startsection{0}{0pt}{6ex}{3ex}{\bf\chapcenter}{#1}}
                     69: \def\section#1{\startsection{1}{0pt}{4ex}{2ex}{\bf}{#1}}
                     70: \def\subsection#1{\startsection{2}{0pt}{3ex}{2ex}{\bf}{#1}}
                     71: \def\paragraph#1{\startsection{3}{0pt}{2ex}{0ex}{\bf}{#1}}
                     72: 
                     73: \input nwkernel
                     74: 
                     75: 
                     76: \edef\contentsfile{\jobname.toc } % file that gets table of contents info
                     77: \def\readcontents{\expandafter\input \contentsfile}
                     78: 
                     79: \newwrite\cont
                     80: \openout\cont=\contentsfile
                     81: \write\cont{\string\catcode`\string\@=11}% a hack to make contents
                     82:                                         % take stuff in plain.tex
                     83: 
                     84: \def\bye{%
                     85:     \write\cont{}% ensure that the contents file isn't empty
                     86:     \closeout\cont
                     87:     \vfil\eject\pageno=-1 % new page causes contents to be really closed
                     88:     \topofcontents\readcontents\botofcontents
                     89:     \vfil\eject\end}
                     90: \def\topofcontents{\vfil\mark{{\bf Table of Contents}}}
                     91: \def\botofcontents{}
                     92: 
                     93: 
                     94: \let\em=\it

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.