keyboard/altgr/weur.eng.inc.pl

   1 use utf8;
   2 use strict;
   3 use warnings;
   4 use Shiar_Sheet::KeyboardChars 'kbmodes';
   5
   6 my %rows = (
   7         '' => {
   8                 '!'  => "\N{COMBINING DOT ABOVE}",
   9                 '"'  => "\N{COMBINING DIAERESIS}",
  10                 '#'  => "\N{COMBINING MACRON}",
  11                 '$'  => '¥',
  12                 '%'  => '£',
  13                 '&'  => '‚',
  14                 "'"  => "\N{COMBINING ACUTE ACCENT}",
  15                 '('  => '‘',
  16                 ')'  => '’',
  17                 '*'  => 'µ',
  18                 '+'  => "\N{COMBINING RING ABOVE}",
  19                 ','  => "\N{COMBINING CEDILLA}",
  20                 '-'  => '–',
  21                 '.'  => 'œ',
  22                 '/'  => '¿',
  23                 '0'  => '”',
  24                 '1'  => '¡',
  25                 '2'  => '²',
  26                 '3'  => '³',
  27                 '4'  => '¢',
  28                 '5'  => '€',
  29                 '6'  => "\N{COMBINING CIRCUMFLEX ACCENT}",
  30                 '7'  => '„',
  31                 '8'  => 'ß',
  32                 '9'  => '“',
  33                 ':'  => 'Ô',
  34                 ';'  => 'ô',
  35                 '<'  => "\N{COMBINING OGONEK}",
  36                 '='  => '°',
  37                 '>'  => 'Œ',
  38                 '?'  => "\N{COMBINING SHORT STROKE OVERLAY}",
  39                 '@'  => "\N{COMBINING DOUBLE ACUTE ACCENT}",
  40                 '['  => '«',
  41                 "\\" => 'ĳ',
  42                 ']'  => '»',
  43                 '^'  => "\N{COMBINING CARON}",
  44                 '_'  => '—',
  45                 '`'  => "\N{COMBINING GRAVE ACCENT}",
  46                 'a'  => 'ä',
  47                 'A'  => 'Ä',
  48                 'B'  => 'Õ',
  49                 'b'  => 'õ',
  50                 'C'  => 'Ç',
  51                 'c'  => 'ç',
  52                 'D'  => 'É',
  53                 'd'  => 'é',
  54                 'e'  => 'ë',
  55                 'E'  => 'Ë',
  56                 'F'  => 'Ê',
  57                 'f'  => 'ê',
  58                 'G'  => 'Î',
  59                 'g'  => 'î',
  60                 'h'  => 'û',
  61                 'H'  => 'Û',
  62                 'I'  => 'Ï',
  63                 'i'  => 'ï',
  64                 'j'  => 'ú',
  65                 'J'  => 'Ú',
  66                 'k'  => 'í',
  67                 'K'  => 'Í',
  68                 'L'  => 'Ó',
  69                 'l'  => 'ó',
  70                 'm'  => 'ì',
  71                 'M'  => 'Ì',
  72                 'n'  => 'ñ',
  73                 'N'  => 'Ñ',
  74                 'o'  => 'ö',
  75                 'O'  => 'Ö',
  76                 'P'  => 'Ò',
  77                 'p'  => 'ò',
  78                 'Q'  => 'Å',
  79                 'q'  => 'å',
  80                 'R'  => 'È',
  81                 'r'  => 'è',
  82                 'S'  => 'À',
  83                 's'  => 'à',
  84                 'T'  => 'Ø',
  85                 't'  => 'ø',
  86                 'u'  => 'ü',
  87                 'U'  => 'Ü',
  88                 'v'  => 'ã',
  89                 'V'  => 'Ã',
  90                 'W'  => 'Æ',
  91                 'w'  => 'æ',
  92                 'x'  => 'â',
  93                 'X'  => 'Â',
  94                 'Y'  => 'Ù',
  95                 'y'  => 'ù',
  96                 'z'  => 'á',
  97                 'Z'  => 'Á',
  98                 '{'  => '‹',
  99                 '|'  => 'Ĳ',
 100                 '}'  => '›',
 101                 '~'  => "\N{COMBINING TILDE}",
 102         },
 103         '*' => {
 104                 # dead_greek digraphs from data/xorg-compose
 105                 'A' => 'Α',
 106                 'a' => 'α',
 107                 'B' => 'Β',
 108                 'b' => 'β',
 109                 'D' => 'Δ',
 110                 'd' => 'δ',
 111                 'E' => 'Ε',
 112                 'e' => 'ε',
 113                 'F' => 'Φ',
 114                 'f' => 'φ',
 115                 'G' => 'Γ',
 116                 'g' => 'γ',
 117                 'H' => 'Η',
 118                 'h' => 'η',
 119                 'I' => 'Ι',
 120                 'i' => 'ι',
 121                 'J' => 'Θ',
 122                 'j' => 'θ',
 123                 'K' => 'Κ',
 124                 'k' => 'κ',
 125                 'L' => 'Λ',
 126                 'l' => 'λ',
 127                 'M' => 'Μ',
 128                 'm' => 'μ',
 129                 'N' => 'Ν',
 130                 'n' => 'ν',
 131                 'O' => 'Ο',
 132                 'o' => 'ο',
 133                 'P' => 'Π',
 134                 'p' => 'π',
 135                 'Q' => 'Χ',
 136                 'q' => 'χ',
 137                 'R' => 'Ρ',
 138                 'r' => 'ρ',
 139                 'S' => 'Σ',
 140                 's' => 'σ',
 141                 'T' => 'Τ',
 142                 't' => 'τ',
 143                 'U' => 'Υ',
 144                 'u' => 'υ',
 145                 'W' => 'Ω',
 146                 'w' => 'ω',
 147                 'X' => 'Ξ',
 148                 'x' => 'ξ',
 149                 'Y' => 'Ψ',
 150                 'y' => 'ψ',
 151                 'Z' => 'Ζ',
 152                 'z' => 'ζ',
 153                 '*' => 'µ', # MICRO SIGN at space and double mode
 154         },
 155 );
 156
 157 +{
 158         %{ kbmodes(\%rows) },
 159         mode => {
 160                 ''  => 'altgr-shifted ⌥',
 161                 '*' => 'greek mode ⌥*',
 162         },
 163         version => '1.0', # upstream v2.0 2021/04/12
 164         title => 'Western European',
 165         category => 'latin/thirdparty/xorg',
 166         intro => join("\n",
 167                 'Layout (<a href="https://altgr-weur.eu/" target=_blank>available</a> for major OSes)',
 168                 'to provide all accented characters commonly used',
 169                 'in 10 Western European languages available through one AltGr keystroke.',
 170         ),
 171         description => [
 172                 "QWERTY for Western European languages",
 173         ],
 174 }