Essai dead key sur « ' »

.#mdt.kbd

@@ -1 +0,0 @@
-matt@xps.2790:1746930093

mdt.kbd

@@ -1,5 +1,8 @@
-;; Basic home row mods example using QWERTY
+;; Matt's config
-;; And approximation for a numeric keypad
+;;
+
+;; 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.
 
 (defcfg
   process-unmapped-keys yes
@@ -9,9 +12,18 @@
 
 (defvar tap-time 300 hold-time 300)
 
+;; TODO:
+;; - advanced home row mode,
+;; - finish the ' dead key,
+
 (defalias
+  m apo
+	z 【
+  w 】
+	ç \
+	
   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)
   a (tap-hold $tap-time $hold-time a lmet)
   u (tap-hold $tap-time $hold-time s lalt)
@@ -42,11 +54,8 @@
 	! S-y
 	: S-v
 	? S-n
-  m apo
-	z 【
-  w 】
-	ç \
 	⎙ prnt
+	' (macro sldr 10 n)
 )
 
 (defsrc
@@ -57,9 +66,9 @@
 )
 
 (deflayer (base 🖻 kanata-icon.svg)
-   _   @é  _   _   _        _   _   _   @l  _
+   _   @é  _   _   @w       @z  _   _   @l  _
 _  @a  @u  @i  @e  _        _   @t  @s  @r  @n
-   z   x   @x  @.  b  102d  _   @q  @g  _   _
+   z   x   @x  @.  b  102d  @'  @q  @g  _   _
            ⌫   @fn  ⏎
 )
 
@@ -84,7 +93,30 @@ _	⭾ ⎋ ⎀ _ @⎙     _ @m @z @w @ç
       ⌦ _ ⎋
 )
 
+(deffakekeys
+  è t	È S-t
+	ê	(macro y 10 f) Ê (macro y 10 S-f)
+  é w É S-w
+  à z	À S-z
+	â (macro y 10 a) Â (macro y 10 S-a)
+  ù RA-s Ù S-RA-s
+  ç \ Ç S-\
+	ß RA-k ẞ RA-S-k
+  quote (macro n))
+
+(defseq
+  è (n f)	È (n S-f)
+	é (n d)	É (n S-d)
+	ê (n g) Ê (n S-g)
+	à (n a)	À (n S-a)
+	â (n q) Â (n S-q)
+	ù (n s) Ù (n S-s)
+	ç (n h) Ç (n S-h)
+	ß (n k) ẞ (n S-k)
+  quote (n ␣))
+
 ;; ⇪ ⎋ ‹⇧ ⇧› ‹⌥ ⌥› ⌫ ⌦   ▶ ▼ ▲ ◀ 【 】 ⎀ ⎙
 ;; https://dev.to/shanu-kumawat/how-to-set-up-kanata-on-nixos-a-step-by-step-guide-1jk#roc
 ;; https://github.com/jtroo/kanata/blob/main/parser/src/keys/mod.rs
 
+