1
0

Compare commits

..

2 Commits

Author SHA1 Message Date
Matthieu Dubuget
5b57d66a2d Essai dead key sur « ' » 2025-05-11 07:10:42 +02:00
Matthieu Dubuget
0e667cd428 Some more shortcuts 2025-05-11 05:24:56 +02:00

60
mdt.kbd
View File

@@ -1,4 +1,5 @@
;; Matt's config ;; Matt's config
;;
;; Meant to work with a BÉPO layout: officially available both on Linux and ;; Meant to work with a BÉPO layout: officially available both on Linux and
;; Windows® and gives access to enough characters for my own use, and beyond. ;; Windows® and gives access to enough characters for my own use, and beyond.
@@ -6,7 +7,7 @@
(defcfg (defcfg
process-unmapped-keys yes process-unmapped-keys yes
tray-icon kanata-icon.svg ;; used on windows tray-icon kanata-icon.svg ;; used on windows
linux-dev /dev/input/by-path/platform-i8042-serio-0-event-kbd ;; Only apply to my notebook internal keyboard linux-dev /dev/input/by-path/platform-i8042-serio-0-event-kbd
) )
(defvar tap-time 300 hold-time 300) (defvar tap-time 300 hold-time 300)
@@ -16,14 +17,13 @@
;; - finish the ' dead key, ;; - finish the ' dead key,
(defalias (defalias
;; m apo m apo
;; z 【 z 【
;; w 】 w 】
ç \ ç \
fn (tap-hold $tap-time $hold-time ␣ (layer-while-held fn)) fn (tap-hold $tap-time $hold-time ␣ (layer-while-held fn))
é (tap-hold $tap-time $hold-time w ralt) é (tap-hold $tap-time $hold-time @m ralt)
l (tap-hold $tap-time $hold-time o ralt) l (tap-hold $tap-time $hold-time o ralt)
a (tap-hold $tap-time $hold-time a lmet) a (tap-hold $tap-time $hold-time a lmet)
u (tap-hold $tap-time $hold-time s lalt) u (tap-hold $tap-time $hold-time s lalt)
@@ -33,12 +33,10 @@
s (tap-hold $tap-time $hold-time k rctl) s (tap-hold $tap-time $hold-time k rctl)
r (tap-hold $tap-time $hold-time l lalt) r (tap-hold $tap-time $hold-time l lalt)
n (tap-hold $tap-time $hold-time ; lmet) n (tap-hold $tap-time $hold-time ; lmet)
x (tap-hold $tap-time $hold-time c (layer-while-held numeric))
(tap-hold $tap-time $hold-time (layer-while-held numeric)) g (tap-hold $tap-time $hold-time , (layer-while-held numeric))
⏎ (tap-hold $tap-time $hold-time ⏎ (layer-while-held numeric))
. (tap-hold $tap-time $hold-time v (layer-while-held symbol)) . (tap-hold $tap-time $hold-time v (layer-while-held symbol))
q (tap-hold $tap-time $hold-time m (layer-while-held symbol)) q (tap-hold $tap-time $hold-time m (layer-while-held symbol))
^ RA-6 ^ RA-6
< RA-2 < RA-2
> RA-3 > RA-3
@@ -60,48 +58,38 @@
' (macro sldr 10 n) ' (macro sldr 10 n)
) )
;; SRC dun qwerty
;; (defsrc
;; ` 1 2 3 4 5 6 7 8 9 0 - = ⌫
;; ⭾ q w e r t y u i o p [ ] \
;; ⇪ a s d f g h j k l ; ' ⏎
;; ‹⇧ z x c v b n m , . / ⇧›
;; ‹⎈ ‹⌘ ‹⌥ ␣ ⌥› ⌘› ⎈›
;; )
;; Je mintéresse à un sous-ensemble:
(defsrc (defsrc
q w e r t y u i o p [ q w e r t y u i o p
a s d f g h j k l ; ' a s d f g h j k l ;
‹⇧ < z x c v b n m , . / ⇧› 102d z x c v b n m , . /
‹⌥ ␣ ⌥› ‹⌥ ␣ ⌥›
) )
(deflayer (base 🖻 kanata-icon.svg) (deflayer (base 🖻 kanata-icon.svg)
_ @é _ _ _ _ _ _ @l _ ] _ @é _ _ @w @z _ _ @l _
@a @u @i @e _ _ @t @s @r @n _ _ @a @u @i @e _ _ @t @s @r @n
z x c @. b < _ @q _ _ _ [ z x @x @. b 102d @' @q @g _ _
@⌫ @fn @ ⌫ @fn ⏎
) )
(deflayer (numeric 🖻 numeric.png) (deflayer (numeric 🖻 numeric.png)
⭾ ↖ ▲ ↘ ⇞ kp/ kp7 kp8 kp9 kp* ⭾ ↖ ▲ ↘ ⇞ kp/ kp7 kp8 kp9 kp*
⎋ ⇪ ◀ ▼ ▶ ⇟ kp- kp4 kp5 kp6 kp0 7 ⎋ ⇪ ◀ ▼ ▶ ⇟ kp- kp4 kp5 kp6 kp0
2 3 _ _ _ _ kp. kp1 kp2 kp3 v _ 2 3 _ _ _ _ kp. kp1 kp2 kp3 v
_ _ _ _ _ _
) )
(deflayer symbol (deflayer symbol
@^ @< @> @$ = 6 @& 0 n S-= _ @^ @< @> @$ = 6 @& 0 n S-=
@{ 4 5 @} - @\ 7 8 9 1 _ _ @{ 4 5 @} - @\ 7 8 9 1
@~ @[ @] @_ @# _ @| @! S-g @: @? _ @~ @[ @] @_ @# _ @| @! S-g @: @?
_ _ _ _ _ _
) )
(deflayer fn (deflayer fn
🔇 f1 f2 f3 f4 f5 f6 f7 f8 f9 f10 _ f1 f2 f3 f4 f5 f6 f7 f8 f9 f10
🔊 ⎀ ⎙ ⇳🔒 _ 🔆 _ _ _ _ _ _ _ ⭾ ⎋ ⎀ _ @⎙ _ @m @z @w @ç
🔉 2 3 f11 f12 🔅 _ _ _ _ _ _ _ _ _ f11 f12 _ _ _ _ _ _ _
⌦ _ ⎋ ⌦ _ ⎋
) )