X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/5629239957347a7ee23955ca39ba1f021db6d2bc..8a9cbb6cf4c047d3f7a1ce28268927ebe6aaeb4a:/writing-latn.inc.pl
diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl
index 8cace93..bfb14de 100644
--- a/writing-latn.inc.pl
+++ b/writing-latn.inc.pl
@@ -27,6 +27,21 @@ my %C = qw(red #EC1C24 blue #3953A3 yellow #F9EC31 black #231F20);
806a9c 89Aa9c 800a9c945aaa
}],
'Braille' => [qw{ â â â â â â â â â â â
â â â â â â â â â â ¥ â § â º â â ½ â µ }],
+'5-point Tactile' => [
+ map { '' }
+ map {
+ join '', map { sprintf '',
+ !$_ ? 9 : $_ & 1 ? 4 : 14,
+ !$_ ? 12 : $_ < 3 ? 4 : 20,
+ } split //
+ }
+ qw{
+ 4 234 012 14 0 014 023 12
+ 02 024 0134 23 013 03 01 123
+ 0124 13 04 1 34 0123 134 0234
+ 034 124
+ }
+],
'Morse' => [map {tr/.-/â§â/r} qw{
.- -... -.-. -.. . ..-. --. .... .. .--- -.- .-.. --
-. --- .--. --.- .-. ... - ..- ...- .-- -..- -.-- --..
@@ -41,7 +56,7 @@ my %C = qw(red #EC1C24 blue #3953A3 yellow #F9EC31 black #231F20);
})],
'Maritime flags' => [
# International Code of Signals, SVG fills
- map { '' }
+ map { '' }
split /\n\n/, qq{
@@ -83,7 +98,6 @@ my %C = qw(red #EC1C24 blue #3953A3 yellow #F9EC31 black #231F20);
-