mirror of
https://codeberg.org/unspeaker/tek.git
synced 2026-04-04 05:10:44 +02:00
17 lines
509 B
Clojure
17 lines
509 B
Clojure
(bsp/s
|
|
(fill/x (fixed/y 2 (bsp/a
|
|
(align/x :transport)
|
|
(bsp/a
|
|
(align/w :input-meter-l)
|
|
(align/e :input-meter-r)))))
|
|
(bsp/n
|
|
(bsp/e :clip-play (bsp/e :clip-next (bsp/e :clip-edit :edit-stat)))
|
|
(bsp/n
|
|
(max/y :sample-h (fill/xy :sample-view))
|
|
(bsp/n
|
|
(align/w (fixed/y 1 :sample-stat))
|
|
(bsp/n
|
|
(fixed/x :pool-w :pool-view)
|
|
(fill/xy (bsp/e
|
|
(fixed/x :samples-w (push/y :samples-y :samples-view))
|
|
:midi-view)))))))
|