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

  (ct/set-cue! (:cue-grid *show*) 0 0
    (cues/cue :set-main-hue (fn [_] (var-fx/variable-effect @var-binder :main-hue 0)) 
      :short-name "Red"

    (cues/cue :color  (fn [_] (afterglow.effects/scene
      "Sawtooth All"
      (let [light-param (params/build-oscillated-param
        (oscillators/sawtooth :interval :beat :interval-ratio :osc-beat-ratio :down? true) :min :lightness-min-general :max :lightness-max-general)]
        (global-color-effect (params/build-color-param :h :main-hue :s 100 :l light-param))
      )
    ))))
