keyspos.inc.pl

   1 use strict;
   2 use warnings;
   3 use utf8;
   4 +{
   5         TLDE => ["`", "~"],
   6         AE01 => ['1', "!"],
   7         AE02 => ['2', "\@"],
   8         AE03 => ['3', "#"],
   9         AE04 => ['4', "\$"],
  10         AE05 => ['5', "%"],
  11         AE06 => ['6', "^"],
  12         AE07 => ['7', "&"],
  13         AE08 => ['8', "*"],
  14         AE09 => ['9', "("],
  15         AE10 => ['0', ")"],
  16         AE11 => ["-", "_"],
  17         AE12 => ["=", "+"],
  18
  19         AD01 => ["q", "Q"],
  20         AD02 => ["w", "W"],
  21         AD03 => ["e", "E"],
  22         AD04 => ["r", "R"],
  23         AD05 => ["t", "T"],
  24         AD06 => ["y", "Y"],
  25         AD07 => ["u", "U"],
  26         AD08 => ["i", "I"],
  27         AD09 => ["o", "O"],
  28         AD10 => ["p", "P"],
  29         AD11 => ["[", "{"],
  30         AD12 => ["]", "}"],
  31
  32         AC01 => ["a", "A"],
  33         AC02 => ["s", "S"],
  34         AC03 => ["d", "D"],
  35         AC04 => ["f", "F"],
  36         AC05 => ["g", "G"],
  37         AC06 => ["h", "H"],
  38         AC07 => ["j", "J"],
  39         AC08 => ["k", "K"],
  40         AC09 => ["l", "L"],
  41         AC10 => [";", ":"],
  42         AC11 => ["'", '"'],
  43
  44         LSGT => ["§", "±"], # mac
  45         AB01 => ["z", "Z"],
  46         AB02 => ["x", "X"],
  47         AB03 => ["c", "C"],
  48         AB04 => ["v", "V"],
  49         AB05 => ["b", "B"],
  50         AB06 => ["n", "N"],
  51         AB07 => ["m", "M"],
  52         AB08 => [",", "<"],
  53         AB09 => [".", ">"],
  54         AB10 => ["/", "?"],
  55         BKSL => ["\\","|"],
  56 }