From b05ad4ddf15b77a3c61450b69908122c1ad626f7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?David=20W=C3=BChrer?= <def@gmx.at>
Date: Mon, 10 Aug 2026 19:08:31 +0200
Subject: double-strike enscript frakture monospace sans-serif

---
 bin/frakture | 121 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 121 insertions(+)
 create mode 100755 bin/frakture

(limited to 'bin/frakture')

diff --git a/bin/frakture b/bin/frakture
new file mode 100755
index 0000000..5b4ad69
--- /dev/null
+++ b/bin/frakture
@@ -0,0 +1,121 @@
+#!/bin/bash
+
+# This style is sometimes known as black-letter.
+declare -A f=(
+	[A]=𝔄
+	[B]=𝔅
+	[C]=ℭ	# black-letter capital C
+	[D]=𝔇
+	[E]=𝔈
+	[F]=𝔉
+	[G]=𝔊
+	[H]=ℌ	# black-letter capital H
+	[I]=ℑ	# black-letter capital I
+	[J]=𝔍
+	[K]=𝔎
+	[L]=𝔏
+	[M]=𝔐	# New Testament majority text
+	[N]=𝔑
+	[O]=𝔒
+	[P]=𝔓
+	[Q]=𝔔
+	[R]=ℜ	# black-letter capital R
+	[S]=𝔖	# Septuagint, Greek Old Testament
+	[T]=𝔗
+	[U]=𝔘
+	[V]=𝔙
+	[W]=𝔚
+	[X]=𝔛
+	[Y]=𝔜
+	[Z]=ℨ	# black-letter capital Z
+	[a]=𝔞
+	[b]=𝔟
+	[c]=𝔠
+	[d]=𝔡
+	[e]=𝔢
+	[f]=𝔣
+	[g]=𝔤
+	[h]=𝔥
+	[i]=𝔦
+	[j]=𝔧
+	[k]=𝔨
+	[l]=𝔩
+	[m]=𝔪
+	[n]=𝔫
+	[o]=𝔬
+	[p]=𝔭
+	[q]=𝔮
+	[r]=𝔯
+	[s]=𝔰
+	[t]=𝔱
+	[u]=𝔲
+	[v]=𝔳
+	[w]=𝔴
+	[x]=𝔵
+	[y]=𝔶
+	[z]=𝔷
+#Bold Fraktur symbols
+	[𝐀̱]=𝕬
+	[𝐁̱]=𝕭
+	[𝐂̱]=𝕮
+	[𝐃̱]=𝕯
+	[𝐄̱]=𝕰
+	[𝐅̱]=𝕱
+	[𝐆̱]=𝕲
+	[𝐇̱]=𝕳
+	[𝐈̱]=𝕴
+	[𝐉̱]=𝕵
+	[𝐊̱]=𝕶
+	[𝐋̱]=𝕷
+	[𝐌̱]=𝕸
+	[𝐍̱]=𝕹
+	[𝐎̱]=𝕺
+	[𝐏̱]=𝕻
+	[𝐐̱]=𝕼
+	[𝐑̱]=𝕽
+	[𝐒̱]=𝕾
+	[𝐓̱]=𝕿
+	[𝐔̱]=𝖀
+	[𝐕̱]=𝖁
+	[𝐖̱]=𝖂
+	[𝐗̱]=𝖃
+	[𝐘̱]=𝖄
+	[𝐙]=𝖅
+	[𝐚̱]=𝖆
+	[𝐛̱]=𝖇
+	[𝐜̱]=𝖈
+	[𝐝̱]=𝖉
+	[𝐞̱]=𝖊
+	[𝐟̱]=𝖋
+	[𝐠̱]=𝖌
+	[𝐡̱]=𝖍
+	[𝐢̱]=𝖎
+	[𝐣̱]=𝖏
+	[𝐤̱]=𝖐
+	[𝐥̱]=𝖑
+	[𝐦̱]=𝖒
+	[𝐧̱]=𝖓
+	[𝐨̱]=𝖔
+	[𝐩̱]=𝖕
+	[𝐪̱]=𝖖
+	[𝐫̱]=𝖗
+	[𝐬̱]=𝖘
+	[𝐭̱]=𝖙
+	[𝐮̱]=𝖚
+	[𝐯̱]=𝖛
+	[𝐰̱]=𝖜
+	[𝐱̱]=𝖝
+	[𝐲̱]=𝖞
+	[𝐳]=𝖟
+)
+
+while IFS= read -r line
+do
+	replacement=""
+	for i in $(seq 0 "$((${#line}-1))")
+	do
+		c=${line:$i:1}
+		replacement+=${f[$c]:-$c}
+	done
+	echo "$replacement"
+done
-- 
cgit v1.2.3