re.tmac: Handle page breaks

It could be better, but it works for now.

2 files changed, 8 insertions, 1 deletions

diff --git a/ex b/ex
deleted file mode 100755
index 56becd2..0000000
--- a/ex
+++ /dev/null
diff --git a/re.tmac b/re.tmac
index 9b8ec93..a896f9e 100644
--- a/re.tmac
+++ b/re.tmac
@@ -3,6 +3,7 @@
 . mk c
 . if (\nb > \nc) .sp (\nbu - \ncu - 1v)
 . if (\nb > 0) .if (\nc > \nb) .sp 0.5v
+. if !(\nz = 1) .if (\np > 0) .if (\n% > \np) .sp -(\nbu - \ncu - 1.5v)
 . nf
 . ft C
 . ps -1p
@@ -10,10 +11,16 @@
 . ta 8n +8n +8n +8n +8n
 . in 2.2i
 . mk a
+. nr p \n%
 ..
 .de Se
 . mk b
-. rt (\nau - 0.5v)
+. rt (\nau - 7p)
+. nr z 0
+. if (\n% > \np) \{
+.  rt \n(HMu
+.  nr z 1
+. \}
 . nr LL 2i
 . LP
 ..