;; Engram (v2.0) 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-v2-0
  [ @key0 @key1 @key2 @key3 @key4 @key5 @key6 @key7 @key8 @key9 ] @key10 bspc
  tab b y o u @key11 @key12 l d w v z @key13 @key14
  caps c i e a @key15 @key16 h t n s q ret
  lsft g x j k - @key17 r m f p rsft
  lctl lmet lalt spc ralt rmet rctl
)

(defalias
  key0 (fork 1 S-\ (lsft rsft))  ;; Shift + 1 -> |
  key1 (fork 2 = (lsft rsft))  ;; Shift + 2 -> =
  key2 (fork 3 S-grv (lsft rsft))  ;; Shift + 3 -> ~
  key3 (fork 4 S-= (lsft rsft))  ;; Shift + 4 -> +
  key4 (fork 5 S-, (lsft rsft))  ;; Shift + 5 -> <
  key5 (fork 6 S-. (lsft rsft))  ;; Shift + 6 -> >
  key6 (fork 7 S-6 (lsft rsft))  ;; Shift + 7 -> ^
  key7 (fork 8 S-7 (lsft rsft))  ;; Shift + 8 -> &
  key8 (fork 9 S-5 (lsft rsft))  ;; Shift + 9 -> %
  key9 (fork 0 S-8 (lsft rsft))  ;; Shift + 0 -> *
  key10 (fork / \ (lsft rsft))  ;; Shift + / -> \
  key11 (fork ' S-9 (lsft rsft))  ;; Shift + ' -> (
  key12 (fork S-' S-0 (lsft rsft))  ;; Shift + " -> )
  key13 (fork S-3 S-4 (lsft rsft))  ;; Shift + # -> $
  key14 (fork S-2 grv (lsft rsft))  ;; Shift + @ -> `
  key15 (fork , ; (lsft rsft))  ;; Shift + , -> ;
  key16 (fork . S-; (lsft rsft))  ;; Shift + . -> :
  key17 (fork S-1 S-/ (lsft rsft))  ;; Shift + ! -> ?
)
