62 lines
864 B
Plaintext
62 lines
864 B
Plaintext
. \"DS - display. If .DS C, center; L, left-adjust; I, indent.
|
|
.de DS
|
|
.KS
|
|
.nf
|
|
.\\$1D \\$2 \\$1
|
|
.ft 1
|
|
.if !\\n(IF \{\
|
|
. ps \\n(PS
|
|
. ta 5n 10n 15n 20n 25n 30n 35n 40n 45n 50n 55n 60n 65n 70n 75n 80n
|
|
. ie \\n(VS>=41 .vs \\n(VSu
|
|
. el .vs \\n(VSp\}
|
|
..
|
|
.de D
|
|
.ID \\$1
|
|
..
|
|
.de CD
|
|
.XD
|
|
.ce 1000
|
|
..
|
|
.de ID
|
|
.XD
|
|
.if t .in +0.5i
|
|
.if n .in +8
|
|
.if \\n(.$ .if !"\\$1"I" .if !"\\$1"" .in \\n(OIu
|
|
.if \\n(.$ .if !"\\$1"I" .if !"\\$1"" .in +\\$1n
|
|
..
|
|
.de LD
|
|
.XD
|
|
..
|
|
.de XD
|
|
.nf
|
|
.nr OI \\n(.i
|
|
.sp \\n(DVu
|
|
..
|
|
.de BD \" block display: save everything, then center it.
|
|
.XD
|
|
.nr BD 1
|
|
.nf
|
|
.in \\n(OIu
|
|
.di DD
|
|
..
|
|
. \"DE - display end
|
|
.de DE
|
|
.ce 0
|
|
.if \\n(BD>0 .DF
|
|
.nr BD 0
|
|
.in \\n(OIu
|
|
.KE
|
|
.sp \\n(DVu
|
|
.fi
|
|
..
|
|
.de DF \" finish a block display to be recentered.
|
|
.di
|
|
.if \\n(dl>\\n(BD .nr BD \\n(dl
|
|
.if \\n(BD<\\n(.l .in (\\n(.lu-\\n(BDu)/2u
|
|
.nr EI \\n(.l-\\n(.i
|
|
.ta \\n(EIuR
|
|
.nf
|
|
.DD
|
|
.in \\n(OIu
|
|
..
|