Message-Id: <199402091531.AA22087@mail.cs.tu-berlin.de>
Reply-To: Mailing list for the LaTeX3 project <LATEX-L@DHDURZ1.BITNET>
In-Reply-To:  Your message of "Wed,
              09 Feb 94 14:43:38 -1100." <01H8OS14GVHU9PMPY3@research.ptt.nl>
Date:         Wed, 9 Feb 1994 16:29:43 +0100
From: "Johannes L. Braams" <J.L.Braams@research.ptt.nl>
Sender: Mailing list for the LaTeX3 project <LATEX-L@DHDURZ1.BITNET>
To: Multiple recipients of list LATEX-L <LATEX-L@DHDURZ1.BITNET>
Subject:      Re: Continuation lines
Status: R

On Wednesday, February 9 M.Piff@sheffield.ac.uk wrote:

> From:          Anselm Lingnau <lingnau@MATH.UNI-FRANKFURT.DE>
>
> %>                                                             As far as the
> %>`question ... continued' bit is concerned, from looking at the Companion I
> %>believe that there are now `Boolean variables', so it seems that we can do
> %>what we used to need \newif for, in a way that's blessed by LaTeX.
>
> With the usual complications involved in expanding \marks.
>
>
> Two very short pages:
>
> ------------------------------------------------------------------
> |    hhh                        hhh                          hhh |
> |                                                                |
> |   ----------------------------------------------------------   |
> |   | Q1  qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq  |   |
> |   |   qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq  |   |
> |   |   qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq  |   |
> |   |                            Q1 continued on next page   |   |
> |   ----------------------------------------------------------   |
> |                                                                |
> |     fff                       fff                          fff |
> ------------------------------------------------------------------
>
>
> ------------------------------------------------------------------
> |    hhh                        hhh                          hhh |
> |                                                                |
> |   ----------------------------------------------------------   |
> |   | Q1  (continued) qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq |   |
> |   |   qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq |   |
> |   |   qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq |   |
> |   |   qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq |   |
> |   ----------------------------------------------------------   |
> |                                                                |
> |     fff                       fff                          fff |
> ------------------------------------------------------------------
>

  If I may refer to a talk I gave in Portland at TUG92, this sort of
  thing can be acheived *without* fiddling with output routines.

  Algorithm (just cut from an existing style file, so it needs
  modification):

\newbox\question@box
\newbox\rest@box
\newlength\question@ht
\question@ht=<room left on the page, to be determined by \question>

\def\question#1{\def\q@num{#1}\question@ht=...\pickup@text}
\def\endquestion{%
    \endpickup@text{question}%
               {Question \q@num\space(continued)}
               {Question \q@num\space continued on next page}}

\def\pickup@text{\setbox\pickup@box=\vbox%
    \bgroup\hsize=\pickup@wd\@parboxrestore}
\def\endpickup@text#1#2#3{\egroup\vbadness=10000
    \edef\box@todo{\expandafter\csname#1@box\endcsname}
    \edef\box@height{\expandafter\csname#1@ht\endcsname}
    \global\setbox\box@todo = \vsplit\pickup@box to \box@height
    \wd\box@todo=\textwidth
    \ifdim\ht\pickup@box>0pt
      \global\setbox\box@todo = \vbox{\unvbox\box@todo
            \hbox to \pickup@wd{\null\hfill\strut #3}}
      \global\setbox\rest@box =\vbox{\hsize=\pickup@wd
        \unvbox\rest@box\strut
        \hbox{\hskip-\shiftleft\strut #2}
        \unvbox\pickup@box}
    \fi
}

        All you have to do now is set \rest@box at the top of the next
        page.

        Johannes Braams

PTT Research,                           P.O. box 421,
2260 AK Leidschendam,                   The Netherlands.
Phone    : +31 70 3325051               E-mail : J.L.Braams@research.ptt.nl
Fax      : +31 70 3326477
-------------------------------------------------------------------------------