summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/edmac/edmacfss.sty
blob: cfc0c15e1e7ccedf5d5cdc72f2d4ce7ed272ad91 (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
% edmac.sty
\chardef\atcatcode=\catcode`\@
\makeatletter

\process@table

% outwit LaTeX

\everypar={}
\let\end=\@@end



% extra macros from plain.tex

\def\supereject{\par\penalty-\@MM}
\outer\def\bye{\par\vfill\supereject\end}

\countdef\pageno=0 \pageno=1 % first page is number 1
\def\advancepageno{\ifnum\pageno<\z@ \global\advance\pageno\m@ne
  \else\global\advance\pageno\@ne \fi} % increase |pageno|

\newif\ifr@ggedbottom
\def\raggedbottom{\topskip 10\p@ plus60\p@ \r@ggedbottomtrue}
\def\normalbottom{\topskip 10\p@ \r@ggedbottomfalse} % undoes \raggedbottom
\def\folio{\ifnum\pageno<\z@ \romannumeral-\pageno \else\number\pageno \fi}
\def\dosupereject{\ifnum\insertpenalties>\z@ % something is being held over
  \hbox to \hsize{}\kern-\topskip\nobreak\vfill\supereject\fi}

\newinsert\topins

\newtoks\headline
\newtoks\footline
\headline={\hfil}
\footline={\hss\textrm\folio\hss}
\def\line{\hbox to \hsize}

\def\pagebody{\vbox to\vsize{\boxmaxdepth\maxdepth \pagecontents}}
\def\makeheadline{\vbox to\z@{\vskip-22.5\p@
  \line{\vbox to8.5\p@{}\the\headline}\vss}\nointerlineskip}
\def\makefootline{\baselineskip24\p@\line{\the\footline}}




\input /edmac/edmac.doc  % Could input edmac.tex instead.

\catcode`\@=\atcatcode


\endinput

% end of edmac.sty