From 34f934d6e2f2ad9f5c78c884d7e50d451bc6a7d1 Mon Sep 17 00:00:00 2001
From: Mattias Andrée <maandree@operamail.com>
Date: Thu, 14 Aug 2014 13:16:42 +0200
Subject: compose table: enclosed alphanumerics
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Mattias Andrée <maandree@operamail.com>
---
 res/compose | 41 +++++++++++++++++++++++++++++++++++++++--
 1 file changed, 39 insertions(+), 2 deletions(-)

(limited to 'res/compose')

diff --git a/res/compose b/res/compose
index b28ebc7..e512170 100644
--- a/res/compose
+++ b/res/compose
@@ -365,7 +365,45 @@ dead_ascii("ˇ")
 # TODO Miscellaneous Technical
 # TODO Control Pictures
 # TODO Optical Character Recognition
-# TODO Enclosed Alphanumerics
+
+# Enclosed Alphanumerics:
+for "1" to "9" as \1
+  <compose> "(" "\1" ")"             : "\add(\u2460 \sub(\1 "1"))"
+  <compose> "(" " " "\1" [" " .] ")" : "\add(\u2474 \sub(\1 "1"))"
+  <compose> "(" "\1" " " ")"         : "\add(\u2474 \sub(\1 "1"))"
+  <compose> "\1" "."                 : "\add(\u2488 \sub(\1 "1"))"
+end for
+for "0" to "9" as \1
+  <compose> "(" "1" "\1" ")"             : "\add(\u2469 \sub(\1 "0"))"
+  <compose> "(" " " "1" "\1" [" " .] ")" : "\add(\u247D \sub(\1 "0"))"
+  <compose> "(" "1" "\1" " " ")"         : "\add(\u247D \sub(\1 "0"))"
+  <compose> "1" "\1" "."                 : "\add(\u2491 \sub(\1 "0"))"
+end for
+<compose> "(" "2" "0" ")"             : "\u2473"
+<compose> "(" " " "2" "0" [" " .] ")" : "\u2487"
+<compose> "(" "2" "0" " " ")"         : "\u2473"
+<compose> "2" "0" "."                 : "\u2498"
+for "a" to "z" as \1
+  <compose> "(" " " "\1" [" " .] ")" : "\add(\u249C \sub(\1 "a"))"
+  <compose> "(" "\1" " " ")"         : "\add(\u249C \sub(\1 "a"))"
+end for
+for "A" to "Z" as \1
+  <compose> "(" "\1" ")" : "\add(\u24B6 \sub(\1 "A"))"
+end for
+for "a" to "z" as \1
+  <compose> "(" "\1" ")" : "\add(\u24D0 \sub(\1 "a"))"
+end for
+<compose> "(" "0" ")" : "\u24EA"
+for "1" to "9" as \1
+  <compose> "(" "(" "(" "1" "\1" ")" ")" ")" : "\add(\u24EB \sub(\1 "1"))"
+end for
+<compose> "(" "(" "(" "2" "0" ")" ")" ")" : "\u24F4"
+for "1" to "9" as \1
+  <compose> "(" "(" "\1" ")" ")" : "\add(\u24F5 \sub(\1 "1"))"
+end for
+<compose> "(" "(" "1" "0" ")" ")" : "\u24FE"
+<compose> "(" "(" "(" "0" ")" ")" ")" : "\u24FF"
+
 # TODO Box Drawing
 # TODO Block Elements
 # TODO Geometric Shapes
@@ -420,7 +458,6 @@ for "\u2800" to "\u28FF" as \1
   end for
 end for
 
-
 # TODO Supplemental Arrows-B
 # TODO Miscellaneous Mathematical Symbols-B
 # TODO Supplemental Mathematical Operators
-- 
cgit v1.2.3-70-g09d2