unspeaker/tek
1
0
Fork 0
mirror of https://codeberg.org/unspeaker/tek.git synced 2026-08-28 12:56:57 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

rework command/namespace dispatch

Browse source
This commit is contained in:
i do not exist 2026-08-12 11:32:51 +03:00
parent def7a1b210
commit 406aabde6e
15 changed files with 586 additions and 374 deletions
Download patch file Download diff file Expand all files Collapse all files

75
src/tek.edn
View file

@ -18,10 +18,13 @@
(align/s (bsp/e :ports/out (bsp/e :transport :ports/in)))
(align/c (bsp/s (align/x (bg (g 36) :logo)) (bg (g 24) :dialog/menu))))))
(keys :back (@escape (back)))
(keys :confirm (@enter (dialog confirm)))
(keys :axis/y (@up (axis (dec :y)))
(@down (axis (inc :y))))
(mode :arranger (name Arranger) (info Launch grid.)
(keys (see :clock :color :launch :scenes :tracks :global)
(@tab project/edit) (@shift/I project/input/add) (@shift/O project/output/add)
(@shift/D dialog/show :dialog/device))
(keys :clock :color :launch :scenes :tracks :global)
(mode :editor (keys :editor))
(mode :dialog (keys :dialog))
(mode :message (keys :message))
@ -46,6 +49,27 @@
(bg (g 80) (bsp/s :scenes/names :editor))
(bg (g 90) :scenes))))))))))))))
(keys :clock (@space clock/toggle 0)
(@shift/space clock/toggle 0))
(keys :color (@c color))
(keys :launch (@q launch))
(keys :scenes (@s (select :select/scene))
(@shift/S (scenes add))
(@up (select :select/scene/dec))
(@down (select :select/scene/inc)))
(keys :tracks (@t (select :select/track))
(@shift/T (tracks add))
(@left (select :select/track/dec))
(@right (select :select/track/inc)))
(keys :global (see :history :saveload)
(@f8 dialog :options)
(@f10 dialog :quit))
(view :ports/out
(bsp/s (align/w (text L-AUDIO-OUT))
(bsp/e (text MIDI-OUT)
@ -86,18 +110,24 @@
(view :groove/sequence (bsp/e (fill/y (align/n (bsp/s :status/v :editor-status))) (bsp/e :samples/keys :editor)))
(keys :back (@escape back))
(keys :confirm (@enter confirm))
(keys :axis/x (@left app/dec :x) (@right app/inc :x))
(keys :axis/x2 (@shift/left app/dec :x2) (@shift/right app/inc :x2))
(keys :axis/y (@up app/dec :y) (@down app/inc :y))
(keys :axis/y2 (@shift/up app/dec :y2) (@shift/down app/inc :y2))
(keys :axis/z (@minus app/dec :z) (@equal app/inc :z))
(keys :axis/z2 (@underscore app/dec :z2) (@plus app/inc :z2))
(keys :axis/i (@comma app/dec :i) (@period app/inc :z))
(keys :axis/i2 (@lt app/dec :i2) (@gt app/inc :z2))
(keys :axis/w (@openbracket app/dec :w) (@closebracket app/inc :w))
(keys :axis/w2 (@openbrace app/dec :w2) (@closebrace app/inc :w2))
(keys :axis/x (@left dec :x)
(@right inc :x))
(keys :axis/x2 (@shift/left dec :x2)
(@shift/right inc :x2))
(keys :axis/y2 (@shift/up dec :y2)
(@shift/down inc :y2))
(keys :axis/z (@minus dec :z)
(@equal inc :z))
(keys :axis/z2 (@underscore dec :z2)
(@plus inc :z2))
(keys :axis/i (@comma dec :i)
(@period inc :z))
(keys :axis/i2 (@lt dec :i2)
(@gt inc :z2))
(keys :axis/w (@openbracket dec :w)
(@closebracket inc :w))
(keys :axis/w2 (@openbrace dec :w2)
(@closebrace inc :w2))
(keys :focus)
(keys :editor (see :axis/i :axis/i2 :axis/y
:page :editor/view :editor/add :editor/del))
@ -117,19 +147,11 @@
(@down sampler/select :sample/below)
(@left sampler/select :sample/to/left)
(@right sampler/select :sample/to/right))
(keys :tracks (@t select :select/track)
(@shift/T project/track/add)
(@left select :select/track/dec)
(@right select :select/track/inc))
(keys :track (see :color :launch :axis/z :axis/z2 :delete)
(@r toggle :rec)
(@m toggle :mon)
(@p toggle :play)
(@P toggle :solo))
(keys :scenes (@s select :select/scene)
(@shift/S project/scene/add)
(@up select :select/scene/dec)
(@down select :select/scene/inc))
(keys :scene (see :color :launch :axis/z :axis/z2 :delete))
(keys :help (@f1 dialog :help))
(keys :page (@pgup page/up)
@ -144,13 +166,6 @@
(@r redo 1))
(keys :saveload (@f6 dialog :save)
(@f9 dialog :load))
(keys :color (@c color))
(keys :launch (@q launch))
(keys :clock (@space clock/toggle 0)
(@shift/space clock/toggle 0))
(keys :global (see :history :saveload)
(@f8 dialog :options)
(@f10 dialog :quit))
(keys :clip (see :color :launch :axis/z :axis/z2 :delete)
(@l toggle :loop))
(keys :sequencer (see :color :launch)