Como adicionar separador entre parágrafos (ou minipáginas) na mesma página?

Question

Estou tentando compor uma lista de citações da seguinte maneira:

1. Nenhuma citação é dividida em páginas.
2. Entre citações adjacentes na mesma página, existe um separador (como um floron ou régua horizontal).

Observe que, em particular, não quero uma regra após a última citação de uma determinada página.

Gostaria de criar um comando que produza uma cotação e adicione uma regra somente se uma cotação a seguir (ou preceder). Como eu poderia fazer isso?

Answer 1

A regra usada em \leaders:

\leaders \hrule \vskip.4pt

é removível como outro espaço nas quebras de página. Você pode definir algo assim:

\raggedbottom
\newcount\quotnumber
\def\quotation{\par\global\advance\quotnumber by1
   \bigskip
   \ifnum\qoutnumber>1 \leaders \hrule \vskip.4pt \bigskip \fi
   \vbox
}

The introduction text.
\quotation{text of first quotation}
\quotation{text of second quotation}
etc.
\bye

A regra removível é colocada antes \vboxda cotação porque não precisamos ter a regra após a última cotação. O teste “se for a primeira citação” é utilizado porque não precisamos da regra entre o texto introdutório e a primeira citação.