                                                            (show/fixtures-named "torrent")
                                                            :effect-name "Torrent Dimmers"))
                            :variables [{:key "level" :min 0 :max 255 :start 255 :name "Level"}]
-                           :color :orange :end-keys [:dimmers]))
+                           :color :yellow :end-keys [:dimmers]))
     (ct/set-cue! (:cue-grid *show*) 2 2
                  (cues/cue :blade-dimmers (fn [var-map] (dimmer-effect
                                                          (params/bind-keyword-param (:level var-map 255) Number 255)
                                                          (show/fixtures-named "blade")
                                                          :effect-name "Blade Dimmers"))
                            :variables [{:key "level" :min 0 :max 255 :start 255 :name "Level"}]
-                           :color :orange :end-keys [:dimmers]))
+                           :color :yellow :end-keys [:dimmers]))
     (ct/set-cue! (:cue-grid *show*) 3 2
                  (cues/cue :ws-dimmers (fn [var-map] (dimmer-effect
                                                       (params/bind-keyword-param (:level var-map 255) Number 255)
                                                       (show/fixtures-named "ws")
                                                       :effect-name "Weather System Dimmers"))
                            :variables [{:key "level" :min 0 :max 255 :start 255 :name "Level"}]
-                           :color :orange :end-keys [:dimmers]))
+                           :color :yellow :end-keys [:dimmers]))
 
     (ct/set-cue! (:cue-grid *show*) 4 2
                  (cues/cue :hex-dimmers (fn [var-map] (dimmer-effect

                                       {:key "lightness" :min 0 :max 100 :name "Lightness" :velocity true}
                                       color-var]))))

(defn x-phase
  "Return a value that ranges from zero for the leftmost fixture in a
  show to 1 for the rightmost, for staggering the phase of an

  (show/patch-fixture! :snowball (blizzard/snowball) universe 33 :x (tf/inches -76) :y (tf/inches 32)
                       :z (tf/inches 164.5))
  (show/patch-fixture! :hyp-rgb (adj/hypnotic-rgb) universe 45)

  (reset! var-binder (var-fx/create-for-show *show*))
  '*show*)


