35 lines
602 B
Plaintext
35 lines
602 B
Plaintext
|
(
|
||
|
defsrc
|
||
|
a s d f
|
||
|
j k l ;
|
||
|
)
|
||
|
|
||
|
(
|
||
|
defvar
|
||
|
tap-time 150
|
||
|
hold-time 250
|
||
|
)
|
||
|
|
||
|
(
|
||
|
defalias
|
||
|
a-mod (tap-hold $tap-time $hold-time a lmet)
|
||
|
s-mod (tap-hold $tap-time $hold-time s lalt)
|
||
|
d-mod (tap-hold $tap-time $hold-time d lsft)
|
||
|
f-mod (tap-hold $tap-time $hold-time f lctl)
|
||
|
j-mod (tap-hold $tap-time $hold-time j lctl)
|
||
|
k-mod (tap-hold $tap-time $hold-time k lsft)
|
||
|
l-mod (tap-hold $tap-time $hold-time l lalt)
|
||
|
;-mod (tap-hold $tap-time $hold-time ; lmet)
|
||
|
)
|
||
|
|
||
|
(
|
||
|
deflayer base
|
||
|
@a-mod @s-mod @d-mod @f-mod
|
||
|
@j-mod @k-mod @l-mod @;-mod
|
||
|
)
|
||
|
|
||
|
;; Local Variables:
|
||
|
;; mode: lisp
|
||
|
;; apheleia-mode: nil
|
||
|
;; End:
|