keyboard/altgr/index: move ctrl rows to distinct inventory mode
[sheet.git] / keyboard / altgr / ukext.eng.inc.pl
1 use utf8;
2 use strict;
3 use warnings;
4 use Shiar_Sheet::KeyboardChars 'kbchars';
5
6 my %win = (
7         '`' => '¦',
8         '~' => "\N{COMBINING GRAVE ACCENT}", # uk ¬ originally unshifted
9         '2' => "\N{COMBINING DIAERESIS}",
10         '4' => '€',
11         '6' => "\N{COMBINING CIRCUMFLEX ACCENT}",
12         'W' => 'Ẃ',
13         'w' => 'ẃ',
14         'E' => 'É',
15         'e' => 'é',
16         'Y' => 'Ý',
17         'y' => 'ý',
18         'U' => 'Ú',
19         'u' => 'ú',
20         'I' => 'Í',
21         'i' => 'í',
22         'O' => 'Ó',
23         'o' => 'ó',
24         'A' => 'Á',
25         'a' => 'á',
26         #'"' => '`',
27         "'" => "\N{COMBINING ACUTE ACCENT}",
28         '\\'=> "\N{COMBINING TILDE}", # uk #
29         'C' => 'Ç',
30         'c' => 'ç',
31 );
32
33 my %dup = (
34         # aliases to unmodified keys
35         '7' => '{',
36         '8' => '[',
37         '9' => ']',
38         '0' => '}',
39         '-' => '\\',
40         'q' => '@',
41         'K' => '&',
42 );
43
44 my %rows = (%win, %dup,
45         '!' => '¡',
46         '1' => '¹',
47         '@' => '½', # uk "
48         '#' => '⅓', # uk £
49         '3' => '³',
50         '$' => '¼',
51         '%' => '⅜',
52         '5' => \'@',
53         '^' => '⅝',
54         '&' => '⅞',
55         '*' => '™',
56         '(' => '±',
57         ')' => '°',
58         '_' => '¿',
59         '+' => "\N{COMBINING OGONEK}",
60         '=' => "\N{COMBINING CEDILLA}",
61         'Q' => 'Ω',
62         'R' => '®',
63         'r' => '¶',
64         'T' => 'Ŧ',
65         't' => 'ŧ',
66         'P' => 'Þ',
67         'p' => 'þ',
68         '{' => "\N{COMBINING RING ABOVE}",
69         '}' => "\N{COMBINING MACRON}", # originally |
70         '[' => \'2',
71         ']' => \'\\',
72         'S' => '§',
73         's' => 'ß',
74         'D' => 'Ð',
75         'd' => 'ð',
76         'F' => 'ª',
77         'f' => 'đ',
78         'G' => 'Ŋ',
79         'g' => 'ŋ',
80         'H' => 'Ħ',
81         'h' => 'ħ',
82         'J' => "\N{COMBINING HORN}",
83         'j' => "\N{COMBINING HOOK ABOVE}",
84         'k' => 'ĸ',
85         'L' => 'Ł',
86         'l' => 'ł',
87         ':' => "\N{COMBINING DOUBLE ACUTE ACCENT}",
88         ';' => \"'",
89         '"' => "\N{COMBINING CARON}", # uk @
90         '|' => "\N{COMBINING BREVE}", # uk ~ originally \
91         'Z' => '‹',
92         'z' => '«',
93         'X' => '›',
94         'x' => '»',
95         'V' => '‘',
96         'v' => '“',
97         'B' => '’',
98         'b' => '”',
99         #'N'=> 'N',
100         #'n'=> 'n',
101         'M' => 'º',
102         'm' => 'µ',
103         '<' => '×',
104         ',' => '─',
105         '>' => '÷',
106         '.' => '·',
107         '?' => "\N{COMBINING DOT ABOVE}",
108         '/' => "\N{COMBINING DOT BELOW}",
109 );
110
111 my $groups = kbchars(\%rows);
112
113 $_->[0] .= ' ext'  for @{ $groups->{def}{''} }{keys %dup};
114 $_->[0] .= ' more' for @{ $groups->{def}{''} }{keys %win};
115 $groups->{flag}{more} = ['windows', "only a small subset is present on Microsoft's layout"];
116
117 +{
118         %{$groups},
119         title => 'UK-extended',
120         category => 'latin/thirdparty',
121         version => '1.1',
122         intro => join("\n",
123                 "A Chrome OS extension and Xorg option",
124                 "expanding on Windows' UK Extended QWERTY keyboard.",
125                 'Distinct from the <a href="/keyboard/altgr/windows">US international</a> variant.',
126         ),
127         description => [
128                 "Google UK-Extended keyboard layout table for Chrome OS",
129                 "with the AltGr modifier key.",
130         ],
131         image => 'data/keyboard/thumb/chromebook-hp11.jpg',
132         imagealt => 'AltGr key on a HP Chromebook 11 G2',
133 }