kmonad: Add thinkpad.kbd

2024-03-15 15:23:22 +09:00 · 2024-03-15 15:23:22 +09:00 · 020e96ab15
commit 020e96ab15
parent dd4e485642
1 changed files with 87 additions and 0 deletions
--- a/dot_config/kmonad/thinkpad.kbd
+++ b/dot_config/kmonad/thinkpad.kbd
@ -0,0 +1,87 @@
+(defcfg
+  ;; For Linux
+  input  (device-file "/dev/input/by-path/platform-i8042-serio-0-event-kbd")
+  output (uinput-sink "My KMonad output")
+
+  ;; Comment this if you want unhandled events not to be emitted
+  fallthrough true
+
+  ;; Set this to false to disable any command-execution in KMonad
+  allow-cmd true
+)
+
+(defsrc
+  grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
+  tab  q    w    e    r    t    y    u    i    o    p    [    ]    \
+  caps a    s    d    f    g    h    j    k    l    ;    '    ret
+  lsft z    x    c    v    b    n    m    ,    .    /    rsft
+  lctl lmet lalt           spc            ralt prnt rctl
+)
+
+(defalias
+  f1  KeyF1
+  f2  KeyF2
+  f3  KeyF3
+  f4  KeyF4
+  f5  KeyF5
+  f6  KeyF6
+  f7  KeyF7
+  f8  KeyF8
+  f9  KeyF9
+  f10 KeyF10
+  f11 KeyF11
+  f12 KeyF12
+  f13 KeyF13
+  f14 KeyF14
+  f15 KeyF15
+)
+
+(defalias
+  cle C-left
+  cri C-rght
+  s13 S-KeyF13
+  c13 C-KeyF13
+  low (tap-hold-next-release 150 spc (layer-toggle lower))
+  upp (tap-hold-next-release 150 ret (layer-toggle upper))
+  uti (layer-toggle util)
+  esc #(esc C-KeyF13)
+  ssf (sticky-key 750 lsft)
+  sal (sticky-key 750 lalt)
+  sct (sticky-key 750 lctl)
+  sme (sticky-key 750 lmet)
+  ar  A-ret
+  ctl (tap-hold-next-release 500 S-KeyF13 lctl)
+  met (tap-hold-next-release 500 C-KeyF13 lmet)
+)
+
+(deflayer qwerty
+  grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
+  tab  q    w    e    r    t    y    u    i    o    p    [    ]    \
+  lctl a    s    d    f    g    h    j    k    l    ;    '    ret
+  lsft z    x    c    v    b    n    m    ,    .    /    rsft
+  lctl lalt @met           @low           @upp _    bspc
+)
+
+(deflayer lower
+  grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
+  tab  @esc tab  end  r    C-t  @cle pgdn pgup @cri @esc [    ]    \
+  lctl home @ssf del  tab  @sme left down up   rght :    "    ret
+  lsft C-z  C-x  @sct @sal @s13 bspc @ar  <    >    ?    rsft
+  lctl lalt @met           @low           @uti _    bspc
+)
+
+(deflayer upper
+  grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
+  tab  !    @    #    $    %    ^    &    \(   \)   *    [    ]    \
+  lctl 1    2    3    4    5    -    =    [    ]    |    grv  @ar
+  lsft 6    7    8    9    0    \_   +    {    }    \    rsft
+  lctl lalt @met           @uti          @upp  _    bspc
+)
+
+(deflayer util
+  grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
+  tab  f11  f12  f13  f14  f15  ^    &    \(   \)   *    [    ]    \
+  lctl f1   f2   f3   f4   f5   -    =    [    ]    |    grv  @ar
+  lsft f6   f7   f8   f9   f10  _    +    {    }    \    rsft
+  lctl lalt @met           _              _    _    _
+)