;; Engram (v2025.10.31) for Kanata
;; Generated by Layouts.Wiki.
;; Run with: kanata --cfg path/to/this-file.kbd

(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 rmet rctl
)

(deflayer engram-v2025-10-31
  [ @1 @2 @3 @4 @5 @6 @7 @8 @9 @0 ] @/ bspc
  tab b y o u @' @S-' d n g v q @S-3 @S-2
  caps h i a e @, @. t r s c z ret
  lsft k j x w - @S-1 m l f p rsft
  lctl lmet lalt spc ralt rmet rctl
)

(defalias
  1 (fork 1 S-\ (lsft rsft))  ;; Shift + 1 -> |
  2 (fork 2 = (lsft rsft))  ;; Shift + 2 -> =
  3 (fork 3 S-grv (lsft rsft))  ;; Shift + 3 -> ~
  4 (fork 4 S-= (lsft rsft))  ;; Shift + 4 -> +
  5 (fork 5 S-, (lsft rsft))  ;; Shift + 5 -> <
  6 (fork 6 S-. (lsft rsft))  ;; Shift + 6 -> >
  7 (fork 7 S-6 (lsft rsft))  ;; Shift + 7 -> ^
  8 (fork 8 S-7 (lsft rsft))  ;; Shift + 8 -> &
  9 (fork 9 S-5 (lsft rsft))  ;; Shift + 9 -> %
  0 (fork 0 S-8 (lsft rsft))  ;; Shift + 0 -> *
  / (fork / \ (lsft rsft))  ;; Shift + / -> \
  ' (fork ' S-9 (lsft rsft))  ;; Shift + ' -> (
  S-' (fork S-' S-0 (lsft rsft))  ;; Shift + " -> )
  S-3 (fork S-3 S-4 (lsft rsft))  ;; Shift + # -> $
  S-2 (fork S-2 grv (lsft rsft))  ;; Shift + @ -> `
  , (fork , ; (lsft rsft))  ;; Shift + , -> ;
  . (fork . S-; (lsft rsft))  ;; Shift + . -> :
  S-1 (fork S-1 S-/ (lsft rsft))  ;; Shift + ! -> ?
)