drwho.tex: Put the companion tracks /exactly/ in the centre of the page.

[drwho] / drwho.tex

diff --git a/drwho.tex b/drwho.tex
index 0eae86c..af01a1b 100644 (file)
--- a/drwho.tex
+++ b/drwho.tex
@@ -23,13 +23,18 @@
 
 \usepackage[T1]{fontenc}
 \usepackage[palatino, helvetica, courier, maths=cmr]{mdwfonts}
-\usepackage[margin=20mm]{geometry}
 
-\newdimen\titlewidth \titlewidth = 70mm
+\hoffset=-1in \oddsidemargin=20mm \evensidemargin=\oddsidemargin
+\textwidth=\paperwidth \advance\textwidth by -2\oddsidemargin
+
+\voffset=-1in \topmargin=20mm \headheight=0mm \headsep=0mm
+\textheight=\paperheight \advance\textheight by -2\topmargin
+
+\newdimen\titlewidth \titlewidth=0.5\textwidth \advance\titlewidth by -40pt
 
 \pagestyle{empty}
-\errorcontextlines = 50
-\showboxbreadth = \maxdimen \showboxdepth = \maxdimen
+\errorcontextlines=50
+\showboxbreadth=\maxdimen \showboxdepth=\maxdimen
 
 \newif\iftop \toptrue
 \def\doctor #1{%
@@ -59,7 +64,7 @@
 
 \def\enqueue#1#2{%
   \global\csname q/#1\expandafter\endcsname=
-  \expandafter{\the\csname q/#1\endcsname{#2}}%
+    \expandafter{\the\csname q/#1\endcsname{#2}}%
 }
 \def\grabhead#1#2\endstop{\def\head{#1}}
 \def\gethead#1{\expandafter\grabhead\the\csname q/#1\endcsname\nil\endstop}
@@ -119,7 +124,7 @@
 
 \def\trkendmarker#1{%
   \hfil
-  \vrule depth -3pt
+  \vrule depth -2.7pt
   \kern-\hrwd
   \zwd{#1}%
   \kern\hrwd
@@ -134,7 +139,7 @@
   \enqueue{name}{$+$ #3}%
 }
 \def\depart#1{%
-  \enqueue{#1}{\trkendmarker{\vrule height 3.2pt depth -2.8pt width 4pt}}%
+  \enqueue{#1}{\trkendmarker{\vrule height 2.9pt depth -2.5pt width 4pt}}%
   \namelet{trk/#1}\emptytrack
 }
 \def\die#1{%
@@ -142,7 +147,7 @@
   \namelet{trk/#1}\emptytrack
 }
 \def\joindie#1#2#3{%
-  \enqueue{#1}{\zwd{#2}\zwd{$\times$}}%
+  \enqueue{#1}{\zwd{#2}\zwd{\raisebox{1pt}{$\times$}}}%
   \enqueue{name}{$+$ #3}%
 }
 
@@ -179,9 +184,9 @@
 
 \begin{document}
 
-\topskip = 0pt
-\baselineskip = 0pt
-\lineskip = 0pt
+\topskip=0pt
+\baselineskip=0pt
+\lineskip=0pt
 
 \global\def\\{&&&&&\cr}
 \halign%