(name "Arranger")

(info "A session grid.")

(keys
  (layer-if :focus-message     "./keys_message.edn")
  (layer-if :focus-device-add  "./keys_device_add.edn")
  (layer-if :focus-browser     "./keys_browser.edn")
  (layer-if :focus-pool-rename "./keys_rename.edn")
  (layer-if :focus-pool-length "./keys_length.edn")
  (layer-if :focus-editor      "./keys_editor.edn")
  (layer-if :focus-clip        "./keys_clip.edn")
  (layer-if :focus-track       "./keys_track.edn")
  (layer-if :focus-scene       "./keys_scene.edn")
  (layer-if :focus-mix         "./keys_mix.edn")
  (layer                       "./keys_clock.edn")
  (layer                       "./keys_arranger.edn")
  (layer                       "./keys_global.edn"))

(view (bsp/a :view-dialog
  (bsp/s
    (fixed/y 8 (bsp/e
      (fixed/x 20 (fill/y (align/n (bsp/s :view-status-v
        (bsp/s (bsp/s :view-audio-ins-status :view-audio-outs-status)
          :view-editor-status)))))
      (fill/xy (align/n (bsp/s :view-arranger-track-names
        (bsp/s :view-arranger-track-outputs
          (bsp/s :view-arranger-track-devices :view-arranger-track-inputs)))))))
    (fill/xy (align/w (bsp/e
      (align/w (fixed/x 20 (fill/xy (align/nw :view-arranger-scenes-names))))
      (align/w (fill/xy (align/nw :view-arranger-scenes-clips)))))))))