mina86

// Polish Programmer Dvorak keymap
// by Michal Nazarewicz <mina86@mina86.com>
// With some modifications
partial alphanumeric_keys
xkb_symbols "dvp" {
    include "us(dvp)"

    name[Group1] = "Poland - Programmer Dvorak";

    //             Unmodified    Shift           AltGr            Shift+AltGr
    // symbols row, left side
    key <TLDE> { [ dollar,       asciitilde,     dead_tilde                  ] };
    key <AE01> { [ ampersand,    percent,        doublelowquotemark, rightdoublequotemark ] };
    key <AE02> { [ bracketleft,  7,              currency                    ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE03> { [ braceleft,    5,              cent                        ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE04> { [ braceright,   3,              yen                         ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE05> { [ parenleft,    1,              EuroSign                    ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE06> { [ equal,        9,              sterling                    ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };

    // symbols row, right side
    key <AE07> { [ asterisk,     0                                           ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE08> { [ parenright,   2,              onehalf                     ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE09> { [ plus,         4                                           ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE10> { [ bracketright, 6                                           ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE11> { [ exclam,       8,              exclamdown                  ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <AE12> { [ numbersign,   grave,          dead_grave                  ] };
    key <BKSP> { [ BackSpace                                                 ] };

    // upper row, left side
    key <AD01> { [ semicolon,    colon,          U2260,           U2260      ] };
    key <AD02> { [ comma,        less,           U2264,           U2264      ] };
    key <AD03> { [ period,       greater,        U2265,           U2260      ] };
    key <AD04> { [ p,            P,              paragraph,       section    ] };
    key <AD05> { [ y,            Y,              udiaeresis,      Udiaeresis ] };
    key <AD06> { [ f,            F                                           ] };

    // // upper row, right side
    key <AD07> { [ g,            G                                           ] };
    key <AD08> { [ c,            C,              cacute,          Cacute     ] };
    key <AD09> { [ r,            R,              registered,      trademark  ] };
    key <AD10> { [ l,            L,              lstroke,         Lstroke    ] };
    key <AD11> { [ slash,        question,       questiondown                ] };
    key <AD12> { [ at,           asciicircum,    dead_circumflex, dead_caron ] };

    // home row, left side
    key <AC01> { [ a,            A,              aogonek,         Aogonek    ], type[Group1] = "EIGHT_LEVEL_ALPHABETIC" };
    key <AC02> { [ o,            O,              oacute,          Oacute     ] };
    key <AC03> { [ e,            E,              eogonek,         Eogonek    ] };
    key <AC04> { [ u,            U,              eacute,          Eacute     ] };
    key <AC05> { [ i,            I                                           ] };

    // home row, right side
    key <AC06> { [ d,            D,              eth,             ETH        ] };
    key <AC07> { [ h,            H,              dead_acute                  ] };
    key <AC08> { [ t,            T,              thorn,           THORN      ] };
    key <AC09> { [ n,            N,              nacute,          Nacute     ] };
    key <AC10> { [ s,            S,              sacute,          Sacute     ] };
    key <AC11> { [ minus,        underscore,     hyphen                      ], type[Group1] = "FOUR_LEVEL_ALPHABETIC" };
    key <BKSL> { [ backslash,    bar                                         ] };

    // lower row, left side
    key <AB01> { [ apostrophe,   quotedbl,       doublelowquotemark, rightdoublequotemark ] };
    key <AB02> { [ q,            Q                                           ] };
    key <AB03> { [ j,            J                                           ] };
    key <AB04> { [ k,            K                                           ] };
    key <AB05> { [ x,            X,              zacute,          Zacute     ] };
    key <AB06> { [ b,            B                                           ] };
    key <AB07> { [ m,            M                                           ] };
    key <AB08> { [ w,            W                                           ] };
    key <AB09> { [ v,            V,              zacute,          Zacute     ] };
    key <AB10> { [ z,            Z,              zabovedot,       Zabovedot  ] };

    include "kpdl(comma)"

    // this to allow writing ALL CAPS with a Shift key
    include "level3(ralt_switch)"

    // use one of compose:* options to choose Multi_key, if you will,
    // or layout +level3(ralt_switch_multikey) to revert standard behaviour
};