From 7de7414e885c3fa3c52200c49528e1e8da5adcc9 Mon Sep 17 00:00:00 2001
From: Sigrid <ftrvxmtrx@gmail.com>
Date: Mon, 4 May 2020 11:57:24 +0200
Subject: [PATCH] tmac.eai: wrapper around -me: auto indexing sections, .TC
 macro (thanks sirjofri)

---
 sys/lib/tmac/tmac.eai | 43 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 43 insertions(+)
 create mode 100644 sys/lib/tmac/tmac.eai

diff --git a/sys/lib/tmac/tmac.eai b/sys/lib/tmac/tmac.eai
new file mode 100644
index 000000000..099d1817b
--- /dev/null
+++ b/sys/lib/tmac/tmac.eai
@@ -0,0 +1,43 @@
+.\" Wrapper around -me
+.\" This package provides auto indexing for sections and a .TC macro.
+.\" Additional feature: In stock -me you can only use 3 fonts with the -me macros. Now you can for example do ".nr sf 4".
+.\" created by sirjofri
+.\" public domain
+.so /sys/lib/tmac/tmac.e
+.ds tn Table of Contents
+.am $0
+.(x t
+.if \\n(.$>2 \
+.	nr $i \\$3*\\\\n(si
+.in \\\\n($iu
+\\*($n\0\0\\*(|x
+.)x
+..
+.de TC
+.bp
+.$p "\\\\*(tn"
+.sp 1m
+.xp t
+..
+.de @F
+.nr ~ \\$1
+.if \\n~>0 \
+\{\
+.	ul 0
+.	ie \\n~>4 \
+\{\
+.		if n .ul 10000
+.		if t .ft \\n~
+.	\}
+.	el \
+.		ft \\n~
+.\}
+.rr ~
+..
+.de FS
+.(f
+\\**
+..
+.de FE
+.)f
+..