summaryrefslogtreecommitdiff
path: root/macros/plain/contrib/lextex/ruled.tex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/plain/contrib/lextex/ruled.tex
Initial commit
Diffstat (limited to 'macros/plain/contrib/lextex/ruled.tex')
-rw-r--r--macros/plain/contrib/lextex/ruled.tex62
1 files changed, 62 insertions, 0 deletions
diff --git a/macros/plain/contrib/lextex/ruled.tex b/macros/plain/contrib/lextex/ruled.tex
new file mode 100644
index 0000000000..9843b5d594
--- /dev/null
+++ b/macros/plain/contrib/lextex/ruled.tex
@@ -0,0 +1,62 @@
+% file: ruled.tex TeXsis version 2.14
+% $Revision: 1.8 $ : $Date: 91/06/04 14:03:51 $ : $Author: myers $
+%======================================================================*
+% RULED TABLES. Plain TeX macros for making nice ruled tables.
+%
+% The actual guts of the ruled.tex macros are in the file TXSruled.tex,
+% which is loaded at the end of this file. Here we just include
+% the interline spacing macros from TeXsis since they are also of
+% use in the table making macros.
+%
+% (C) copyright 1990, 1991 by Eric Myers and Frank E. Paige
+%--------------------------------------------------*
+% INTERLINE SPACING. (from TeXsis)
+
+\def\singlespaced{% sets interline spacing to \normalbaselineskip
+ \baselineskip=\normalbaselineskip % reset interline
+ \setRuledStrut % set ruled table spacing
+ }
+\def\singlespace{\singlespaced} % synonym for \singlespaced
+
+\def\doublespaced{% sets interline spacing to 1.5 the \normalbaselineskip
+ \baselineskip=\normalbaselineskip % increase interline
+ \multiply\baselineskip by 150 % spacing by 1.50
+ \divide\baselineskip by 100 % of normal
+ \setRuledStrut % set ruled table spacing
+ }
+\def\doublespace{\doublespaced} % synonym for \doublespaced
+
+\def\TrueDoubleSpacing{% sets interline spacing to twice \normalbaselineskip
+ \baselineskip=\normalbaselineskip % increase interline
+ \multiply\baselineskip by 2 % spacing by 2.0
+ \setRuledStrut % set ruled table spacing
+ }
+\def\truedoublespacing{\TrueDoubleSpacing} % synonym for \TrueDoubleSpacing
+
+\def\triplespaced{% sets interline spacing to 3.0 the \normalbaselineskip
+ \baselineskip=\normalbaselineskip % increases interline
+ \multiply\baselineskip by 3 % spacing by 3.0
+ \setRuledStrut % set ruled table spacing
+ }
+
+\def\widenspacing{% increases the interline spacing by 1.25
+ \multiply\baselineskip by 125 % increase the interline
+ \divide\baselineskip by 100 % spacing by a factor of 1.25
+ \setRuledStrut % set ruled table spacing
+ }
+\def\whitespaced{\widenspacing} % synonym for \widenspacing
+\def\whitespace{\widenspacing} % synonym for \widenspacing
+
+
+% \setRuledStrut creates a vertical strut to hold the interline
+% spacing in ruled tables. It is defined in TXSruled.tex
+
+\def\setRuledStrut{\relax}
+
+%--------------------------------------------------*
+% RULED TABLE MACROS:
+
+\input TXSruled.tex
+
+%>>> EOF TXSruled.tex <<<
+