X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/6adafc2d07e60402e44069421a9313a51d711c0b..8ed7634d0fa3b7154275c14477b361b358ee783f:/writing-latn.inc.pl diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl index 7ed03ed..806bff2 100644 --- a/writing-latn.inc.pl +++ b/writing-latn.inc.pl @@ -151,7 +151,23 @@ sub disphues { ); } -( ++{ +default => [qw( written sign digital touch tactile sound games semaphore barcode personal )], +written => [qw( uppercase lowercase suetterlin roman )], +digital => [qw( stroke ita2 )], +stroke => [qw( graffiti unistrokes edgewrite )], +touch => [qw( moon braille )], +sign => ['sutton'], +sound => [qw( morse tap shorttap )], +games => [qw( domino tetromino cards )], +semaphore => [qw( maritime flag chappe prussian )], +barcode => [qw( rm4scc code39 code93 code128 )], +personal => [qw( rgbmap cmymap dni pigpen nyctographs chromacons )], + +order => { + name => '#', + list => [1 .. 26], +}, uppercase => { list => [qw{ 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 }], }, @@ -166,6 +182,7 @@ suetterlin => { src: url("/suetterlin.ttf"); }', 'td { font-family: Suetterlin }', + 'td:hover::first-letter { text-transform: uppercase }', ], list => [qw{ 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 }], }, @@ -241,8 +258,9 @@ unistrokes => { list => [ map { ''.$_.'' } map { - sprintf('', m/\AM(\d+),(\d+)(.?)/) . # start point - (!!$3 && qq()) + my ($x, $y, $next) = m/\AM(\d+),(\d+)(.)?/; + sprintf('', $x, $y) . # start point + (defined $next && qq()) } 'M3,8 V0', 'M0,0 6,4 0,8', @@ -389,6 +407,10 @@ shorttap => { }, domino => { name => 'Domino tiles', + style => [ + # enlarge single tile height to span full vertical combinations + 'td { font-size: 200%; line-height: .6; padding: 0 0 .3ex }', + ], list => [map { dispdomino($_) } qw{ 10 11 20 21 22 30 31 32 33 40 41 42 43 44 50 51 52 53 54 55 60 61 62 63 64 65 @@ -777,4 +799,4 @@ chromacons => { } ], }, -); +};