summaryrefslogtreecommitdiff
path: root/textpre.awk
diff options
context:
space:
mode:
Diffstat (limited to 'textpre.awk')
-rw-r--r--textpre.awk12
1 files changed, 12 insertions, 0 deletions
diff --git a/textpre.awk b/textpre.awk
index eea16c63..5518591e 100644
--- a/textpre.awk
+++ b/textpre.awk
@@ -67,8 +67,10 @@ char["-"] = "$E3"
char["?"] = "$E6"
char["!"] = "$E7"
char["."] = "$E8"
+char["♂"] = "$EF"
char["/"] = "$F3"
char[","] = "$F4"
+char["♀"] = "$F5"
char["0"] = "$F6"
char["1"] = "$F7"
char["2"] = "$F8"
@@ -98,6 +100,16 @@ else {
while (f != "") {
c = substr(f,1,1)
f = substr(f,2,length(f) - 1)
+ if (c > "𐀀") { # U+10000
+ c = c substr(f,1,3)
+ f = substr(f,4,length(f) - 3)
+ } else if (c > "ࠀ") { # U+0800
+ c = c substr(f,1,2)
+ f = substr(f,3,length(f) - 2)
+ } else if (c > "€") { # U+0080
+ c = c sustr(f,1,1)
+ f = substr(f,2,length(f) - 1)
+ }
print char[c]
if (length(f))
print ","