mirror of
https://codeberg.org/unspeaker/tek.git
synced 2025-12-06 19:56:42 +01:00
22 lines
843 B
Clojure
22 lines
843 B
Clojure
(name "Arranger")
|
|
|
|
(info "A sequencer with built-in sampler.")
|
|
|
|
(view
|
|
(bsp/a :modal
|
|
(bsp/s (fixed/y 1 :transport)
|
|
(bsp/n (fixed/y 1 :status)
|
|
(bsp/n (fixed/y 5 :sample-viewer)
|
|
(bsp/w (fixed/x :w-sidebar :pool)
|
|
(bsp/e :samples-keys
|
|
(fill/y :editor))))))))
|
|
|
|
(keys
|
|
(layer-if :mode-pool-import "./keys_pool_file.edn")
|
|
(layer-if :mode-pool-export "./keys_pool_file.edn")
|
|
(layer-if :mode-pool-rename "./keys_clip_rename.edn")
|
|
(layer-if :mode-pool-length "./keys_clip_length.edn")
|
|
(layer "./keys_global.edn")
|
|
(layer-if :mode-editor "./keys_editor.edn")
|
|
(layer "./keys_clock.edn")
|
|
(layer "./keys_arranger.edn"))
|