keyboard/altgr/drix.eng.inc.pl

   1 use utf8;
   2 use strict;
   3 use warnings;
   4 use Shiar_Sheet::KeyboardChars 'kbchars';
   5
   6 my %rows = (
   7         '!' => "\N{COMBINING GRAVE ACCENT}",
   8         '#' => "\N{COMBINING CIRCUMFLEX ACCENT}",
   9         '$' => "\N{COMBINING DIAERESIS}",
  10         '%' => "\N{COMBINING RING ABOVE}",
  11         '&' => "\N{COMBINING CEDILLA}",
  12         '~' => "\N{COMBINING TILDE}",
  13         '(' => "\N{COMBINING CARON}",
  14         ')' => "\N{COMBINING DOUBLE ACUTE ACCENT}",
  15         '*' => "\N{COMBINING OGONEK}",
  16         '+' => "\x{2260}",
  17         '-' => "\"",
  18         '0' => "\x{2070}",
  19         '1' => "\xB9",
  20         '2' => "\xB2",
  21         '3' => "\xB3",
  22         '4' => "\x{2074}",
  23         '5' => "\x{2075}",
  24         '6' => "\x{2076}",
  25         '7' => "\x{2077}",
  26         '8' => "\x{2078}",
  27         '9' => "\x{2079}",
  28         '=' => "'",
  29         '@' => "\N{COMBINING ACUTE ACCENT}",
  30         '[' => "{",
  31         ']' => "}",
  32         '^' => "\N{COMBINING MACRON}",
  33         '_' => "\xB1",
  34         '`' => "\xA3",
  35         'A' => "\x{2190}",
  36         'a' => "\xE6",
  37         'B' => "\x{20bf}",
  38         'b' => "\x{2642}",
  39         'c' => "\xA9",
  40         'C' => "\xA2",
  41         'd' => "\x{394}",
  42         'D' => "\x{2192}",
  43         'e' => "\x{20AC}",
  44         'E' => "\x{20AC}",
  45         'f' => "\x{192}",
  46         'F' => "\x{191}",
  47         #'g' => "g",
  48         #'G' => "G",
  49         #'H' => "H",
  50         #'h' => "h",
  51         'i' => "\x{2018}",
  52         'I' => "\x{2019}",
  53         'j' => "\x{201C}",
  54         'J' => "\x{201D}",
  55         'k' => "\x{201A}",
  56         'K' => "\x{201E}",
  57         'L' => "\x{3BB}",
  58         'l' => "\xA3",
  59         #'M' => "M",   # at :
  60         'm' => "\xB5", # at ;
  61         #'N' => "N",
  62         'n' => "\x{26a5}",
  63         'o' => "\x{153}",
  64         'O' => "\x{3A9}",
  65         'P' => "\x{20b1}",
  66         'p' => "\x{3C0}",
  67         'q' => "\xF8",
  68         'Q' => "\xD8",
  69         'R' => "\x{20bd}",
  70         'r' => "\xAE",
  71         's' => "\xDF",
  72         'S' => "\x{2193}",
  73         'T' => "\x{3C4}",
  74         't' => "\x{2122}",
  75         #'u' => "u",
  76         #'U' => "U",
  77         #'V' => "V",
  78         'v' => "\x{2640}",
  79         'W' => "\x{2191}",
  80         #'w' => "w",
  81         'x' => "\xD7",
  82         'X' => "\xF7",
  83         'y' => "\xA5",
  84         'Y' => "\xA5",
  85         'z' => "\xA7",
  86         'Z' => "\xB6",
  87         '{' => "\xAB",
  88         '}' => "\xBB",
  89
  90         '"' => "\x{2030}", # unshifted %
  91         "'" => "~",        # unshifted #
  92         #'|' => '×',       # unshifted & at BKSL same as x
  93         #'\\'=> '$',       # unshifted * at bksl
  94         '|' => "≤",        # unshifted < at LSGT
  95         '\\'=> "≥",        # unshifted > at lsgt
  96         '<' => "\xB7",     # unshifted ,
  97         ',' => "\x{2026}", # unshifted .
  98         '>' => "\xB4",     # unshifted ;
  99         '.' => "`",        # unshifted :
 100         '?' => "\xA6",     # unshifted \
 101         '/' => "|",
 102         ':' => "\xBF",     # unshifted ? at M
 103         ';' => "\xA1",     # unshifted ! at m
 104 );
 105
 106 my $groups = kbchars(\%rows);
 107 $groups->{def}{''}{$_} .= ' ext' for qw( ` E Y );
 108
 109 +{
 110         %{$groups},
 111         version => '1.0',
 112         title => 'Drix',
 113         category => 'latin/xorg',
 114         intro => join("\n",
 115                 "European Latin layout version 3.1 providing",
 116                 '<a href="/unicode">Unicode</a> characters while pressing AltGr,',
 117                 'developed by Jerome Leclanche',
 118                 'for <abbr title="distributed with X since 2019">Linux</abbr>.',
 119         ),
 120         description => [
 121                 "Drix EU Latin keyboard layout table",
 122                 "with the AltGr modifier key: provides miscellaneous symbols",
 123                 "and accents for some European languages.",
 124         ],
 125 }