latin: code39 bar code row (unicode)

[sheet.git] / writing-latn.inc.pl

diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl
index 70a479a2e1f68eca98839dbf627cb6b7b22e771b..eebe155793890177d21b3f7512e70bcab9a29a50 100644 (file)
--- a/writing-latn.inc.pl
+++ b/writing-latn.inc.pl
@@ -148,6 +148,11 @@ sem => [
                24 25 26 27 34  35 47 56 57 36  67
        )
 ],
+code39 => [map { tr/012/ ❘❙/r } qw{
+       211012 121012 221011 112012 212011 122011 111022 211021 121021 112021
+       211102 121102 221101 112102 212101 122101 111202 211201 121201 112201
+       201112 102112 202111 101212 201211 102211
+}],
 rm4scc => [
        map { sprintf
                '<svg width="20" height="20" viewBox="0 0 8 6">'