mirror of
https://codeberg.org/unspeaker/tek.git
synced 2025-12-06 19:56:42 +01:00
unspeaker
3c8616deba
Some checks failed
/ build (push) Has been cancelled
the definitions are unified alright. it's just not supported yet :D the idea being that tek offers to write out the default configs to ~/.config/tek-v0 where the user can customize them.
167 lines
4.7 KiB
Clojure
167 lines
4.7 KiB
Clojure
(module :global
|
|
(@esc dialog/hide)
|
|
(@f1 dialog/show :dialog/help)
|
|
(@f6 dialog/show :dialog/save)
|
|
(@f8 dialog/show :dialog/options)
|
|
(@f9 dialog/show :dialog/load)
|
|
(@f10 dialog/show :dialog/quit)
|
|
(@u history/undo 1)
|
|
(@r history/redo 1))
|
|
|
|
(module :clock
|
|
(@space clock/toggle 0)
|
|
(@shift/space clock/toggle 0))
|
|
|
|
(module :arranger
|
|
(@c color)
|
|
(@q launch)
|
|
(@tab project/edit)
|
|
(@enter project/edit)
|
|
(@escape project/home)
|
|
(@shift/I project/input/add)
|
|
(@shift/O project/output/add)
|
|
(@shift/S project/scene/add)
|
|
(@shift/T project/track/add)
|
|
(@shift/D dialog/show :dialog/device)
|
|
(@up select :select/scene/prev)
|
|
(@down select :select/scene/next)
|
|
(@left select :select/track/prev)
|
|
(@right select :select/track/next)
|
|
(@t select :select/track)
|
|
(@s select :select/scene))
|
|
|
|
(module :track
|
|
(@delete track/delete :track)
|
|
(@q track/launch :track)
|
|
(@c track/color :track)
|
|
(@comma track/prev)
|
|
(@period track/next)
|
|
(@lt track/swap/prev)
|
|
(@gt track/swap/next)
|
|
(@r track/rec)
|
|
(@m track/mon)
|
|
(@p track/play)
|
|
(@P track/solo))
|
|
|
|
(module :scene
|
|
(@delete scene/delete :scene)
|
|
(@q scene/launch :scene)
|
|
(@c scene/color :scene)
|
|
(@comma scene/prev)
|
|
(@period scene/next)
|
|
(@lt scene/swap/prev)
|
|
(@gt scene/swap/next))
|
|
|
|
(module :clip
|
|
(@g clip/get)
|
|
(@p clip/put)
|
|
(@delete clip/del)
|
|
(@comma clip/prev)
|
|
(@period clip/next)
|
|
(@lt clip/swap/prev)
|
|
(@gt clip/swap/next)
|
|
(@l clip/loop/toggle))
|
|
|
|
(module :browser
|
|
(@escape browser/cancel)
|
|
(@return browser/confirm)
|
|
(@up browser/cursor/set :browser/cursor/prev)
|
|
(@down browser/cursor/set :browser/cursor/next)
|
|
(@right browser/address/set :browser/address/selected)
|
|
(@left browser/address/set :browser/address/parent)
|
|
(:char browser/filter/append :char)
|
|
(@backspace browser/filter/delete :last))
|
|
|
|
(module :device/add
|
|
(@up dialog :dialog/device/prev)
|
|
(@down dialog :dialog/device/next))
|
|
|
|
(module :editor
|
|
(@left editor/time/set :time/pos/prev)
|
|
(@shift/left editor/time/set :time/pos/prev/fine)
|
|
(@right editor/time/set :time/pos/next)
|
|
(@shift/right editor/time/set :time/pos/next/fine)
|
|
(@equal editor/zoom/set :time/zoom/prev)
|
|
(@minus editor/zoom/set :time/zoom/next)
|
|
(@plus editor/zoom/set :time/zoom/next/fine)
|
|
(@underscore editor/zoom/set :time/zoom/prev/fine)
|
|
(@z editor/lock/set)
|
|
(@comma editor/length/set :note/len/prev)
|
|
(@period editor/length/set :note/len/next)
|
|
(@lt editor/length/set :note/len/prev)
|
|
(@gt editor/length/set :note/len/next)
|
|
(@up editor/pitch/set :note/pos/next)
|
|
(@down editor/pitch/set :note/pos/prev)
|
|
(@pgup editor/pitch/set :note/pos/next/octave)
|
|
(@pgdn editor/pitch/set :note/pos/prev/octave)
|
|
(@a editor/append :true)
|
|
(@enter editor/append :false)
|
|
(@del editor/delete/note)
|
|
(@shift/del editor/delete/note))
|
|
|
|
(module :groovebox
|
|
(@r sampler/record/toggle :sample)
|
|
(@tab focus/next)
|
|
(@shift/tab focus/prev))
|
|
|
|
(module :length
|
|
(@up inc)
|
|
(@down dec)
|
|
(@right next)
|
|
(@left prev)
|
|
(@return set :length)
|
|
(@escape cancel))
|
|
|
|
(module :message
|
|
(@esc message/dismiss)
|
|
(@enter message/dismiss))
|
|
|
|
(module :pool
|
|
(@n rename/begin)
|
|
(@t length/begin)
|
|
(@m import/begin)
|
|
(@x export/begin)
|
|
(@c clip/color :clip :random/color)
|
|
(@openbracket select :clip/prev)
|
|
(@closebracket select :clip/next)
|
|
(@lt swap :clip :clip/prev)
|
|
(@gt swap :clip :clip/next)
|
|
(@delete clip/delete :clip)
|
|
(@shift/A clip/add :after :new/clip)
|
|
(@shift/D clip/add :after :cloned/clip))
|
|
|
|
(module :pool/file
|
|
(@up select :prev)
|
|
(@down select :next)
|
|
(@right chdir :selected)
|
|
(@left chdir :parent)
|
|
(@return confirm)
|
|
(@escape cancel)
|
|
(:char append :char)
|
|
(@backspace delete :last))
|
|
|
|
(module :rename
|
|
(:char append :char)
|
|
(@backspace delete :last)
|
|
(@return confirm)
|
|
(@escape cancel))
|
|
|
|
(module :sampler
|
|
(@up sampler/select :sample/above)
|
|
(@down sampler/select :sample/below)
|
|
(@left sampler/select :sample/to/left)
|
|
(@right sampler/select :sample/to/right)
|
|
|
|
(@r sampler/record/toggle :sample/selected)
|
|
(@shift/R sampler/record/cancel)
|
|
(@p sampler/play/sample :sample/selected)
|
|
(@P sampler/stop/sample :sample/selected)
|
|
|
|
(@shift/f6 dialog :dialog/export/sample)
|
|
(@shift/f9 dialog :dialog/import/sample))
|
|
|
|
(module :sequencer
|
|
(@c color)
|
|
(@q launch)
|
|
(@shift/I input/add)
|
|
(@shift/O output/add))
|