       :short-name "MIDI"
       )
     )
+  (ct/set-cue! (:cue-grid *show*) 7 0
+    (cues/cue :set-main-hue (fn [_] (var-fx/variable-effect @var-binder :use-hue-chase true))
+      :short-name "Change every phrase +30"
+      )
+    )
 )
 
 (new-cues)

      ; Reset beat mapping from MIDI button to a cue
      (show/add-midi-control-to-cue-mapping "Automap MIDI" 10 :control 58 7 7)

      ; Defaults
      (afterglow.show/set-variable! :sparkle-chance 0.1)
      (afterglow.show/set-variable! :sparkle-fade 100)
      (afterglow.show/set-variable! :lightness-min-general 0)
      (afterglow.show/set-variable! :lightness-max-front 50)
      (afterglow.show/set-variable! :lightness-max-general 50)
      (afterglow.show/set-variable! :lightness-max-general-percent 1)
      (afterglow.show/set-variable! :lightness-max-front-percent 1)
    )
  )


; Reset dimmers to full brightness
(show/add-effect! :dimmers (global-dimmer-effect 255))

; 2DO rewrite to connect multiple devices
(defn midi-help
  "Bind MIDI devices"
