90 lines
1.3 KiB
Plaintext
90 lines
1.3 KiB
Plaintext
. \"KS keep - for keep release features. As in IFM
|
|
.de KS
|
|
.nr KN \\n(.u
|
|
.if \\n(IK=0 .if \\n(IF=0 .KQ
|
|
.nr IK +1
|
|
..
|
|
. \"KQ - real keep processor
|
|
.de KQ
|
|
.br
|
|
.nr KI \\n(.i
|
|
.ev 2
|
|
.br
|
|
.in \\n(KIu
|
|
.ps \\n(PS
|
|
.if \\n(VS>40 .vs \\n(VSu
|
|
.if \\n(VS<=39 .vs \\n(VSp
|
|
.ll \\n(LLu
|
|
.lt \\n(LTu
|
|
.if \\n(NX>1 .ll \\n(CWu
|
|
.if \\n(NX>1 .lt \\n(CWu
|
|
.di KK
|
|
.nr TB 0
|
|
.nr KV 0
|
|
..
|
|
. \"KF - floating keep
|
|
.de KF
|
|
.nr KN \\n(.u
|
|
.if !\\n(IK .FQ
|
|
.nr IK +1
|
|
..
|
|
. \"FQ real floating keep processor
|
|
.de FQ
|
|
.nr KI \\n(.i
|
|
.ev 2
|
|
.br
|
|
.in \\n(KIu
|
|
.ps \\n(PS
|
|
.if \\n(VS>40 .vs \\n(VSu
|
|
.if \\n(VS<=39 .vs \\n(VSp
|
|
.ll \\n(LLu
|
|
.lt \\n(LTu
|
|
.if \\n(NX>1 .ll \\n(CWu
|
|
.if \\n(NX>1 .lt \\n(CWu
|
|
.di KK
|
|
.nr TB 1
|
|
.nr KV 0
|
|
..
|
|
. \"KP - keep full page
|
|
.de KP
|
|
.nr KV 1
|
|
..
|
|
. \"KE release - everything between keep and release is together
|
|
.de KE
|
|
.if \\n(IK .if !\\n(IK-1 .if \\n(IF=0 .RQ
|
|
.if \\n(IK .nr IK -1
|
|
..
|
|
. \"RQ real release
|
|
.de RQ
|
|
.br
|
|
.nr KI \\n(.i
|
|
.di
|
|
.nr NF 0
|
|
.if \\n(dn-\\n(.t .nr NF 1
|
|
.if \\n(TC .nr NF 1
|
|
.if \\n(KV .nr NF 1 \" if KV on full page needed, doesn't fit
|
|
.if \\n(NF .if !\\n(TB .sp 11i
|
|
.if !\\n(NF .if \\n(TB .nr TB 0
|
|
.nf
|
|
.rs
|
|
.nr TC 5
|
|
.in 0
|
|
.ls 1
|
|
.if \\n(TB=0 .ev
|
|
.if \\n(TB=0 .br
|
|
.if \\n(TB=0 .ev 2
|
|
.if \\n(TB=0 .KK
|
|
.ls
|
|
.ce 0
|
|
.if \\n(TB=0 .rm KK
|
|
.if \\n(TB .da KJ
|
|
.if \\n(TB \!.KD \\n(dn \\n(KV
|
|
.if \\n(TB .KK
|
|
.if \\n(TB .di
|
|
.nr TC \\n(TB
|
|
.if \\n(KN .fi
|
|
.in
|
|
.ev
|
|
.in \\n(KIu
|
|
..
|