       :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)
  )
)


;(midi-help "automap")

(defn set-hue
  "Set main hue"
  [hue]
  (afterglow.show/set-variable! :main-hue hue)
)

(set-hue 0)

; Max lightness in the show
(afterglow.show/set-variable! :max-lightness 50)

(defn light-sawtooth
  "Change light according to sawtooth osc"


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

