mirror of
https://codeberg.org/unspeaker/tek.git
synced 2025-12-06 03:36:41 +01:00
20 lines
666 B
Clojure
20 lines
666 B
Clojure
(name "Sequencer")
|
|
|
|
(info "A MIDI sequencer.")
|
|
|
|
(view
|
|
(bsp/a :view-dialog
|
|
(bsp/s (fixed/y 1 :view-transport)
|
|
(bsp/n (fixed/y 1 :view-status)
|
|
(fill/xy (bsp/a
|
|
(fill/xy (align/e :view-pool))
|
|
:view-editor)))))
|
|
|
|
(keys
|
|
(layer-if :focus-browser "./keys_browser")
|
|
(layer-if :mode-pool-rename "./keys_rename.edn")
|
|
(layer-if :mode-pool-length "./keys_length.edn")
|
|
(layer "./keys_global.edn")
|
|
(layer "./keys_editor.edn")
|
|
(layer "./keys_clock.edn")
|
|
(layer "./keys_arranger.edn"))
|