bin/frakture


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
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