                                                     0 :linear-dimming 26 :fade-step-increase
                                                     51 :color-macros 91 :color-fade-in-out
                                                     131 :color-snap 171 :color-fade
-                                                    211 :auto 251 :sound-active)]}
+                                                    211 :auto 251 :sound-active)]
+                         :heads [{:channels [(chan/color 6 :red) (chan/color 7 :green)
+                                              (chan/color 8 :blue) (chan/color 9 :white)]
+                                   :y hung}]}
             :11-channel {:channels [(chan/pan 1 3) (chan/tilt 2 4)
                                     (chan/fine-channel :movement-speed 5
                                                        :function-name "Movement Speed (fast->slow)")
-                                    (chan/color 6 :red) (chan/color 7 :green)
-                                    (chan/color 8 :blue) (chan/color 9 :white)
-                                    (chan/dimmer 10) (chan/fine-channel :custom-color 11)]})
+                                    (chan/dimmer 10) (chan/fine-channel :custom-color 11)]
+                         :heads [{:channels [(chan/color 6 :red) (chan/color 7 :green)
+                                              (chan/color 8 :blue) (chan/color 9 :white)]
+                                   :y hung}]})
           :name "Blizzard Blade RGBW"
           :mode mode
           :pan-center pan-center :pan-half-circle pan-half-circle

  using optional keyword arguments following the `mode` value."
  ([]
   (blade-rgbw :15-channel))
  ([mode & {:keys [pan-center pan-half-circle tilt-center tilt-half-circle]
            :or {pan-center 84 pan-half-circle 84 tilt-center 8 tilt-half-circle -214}}]
   (assoc (case mode
            :15-channel {:channels [(chan/pan 1 3) (chan/tilt 2 4)
                                    (chan/fine-channel :movement-speed 5
                                                       :function-name "Movement Speed (fast->slow)")
                                    (chan/color 6 :red) (chan/color 7 :green)
                                    (chan/color 8 :blue) (chan/color 9 :white)
                                    (chan/fine-channel :custom-color 10)
                                    (chan/functions :strobe 11 0 nil
                                                    1 {:type :strobe

          :name "Blizzard Puck Fab5"
          :mode mode)))

(def ^:private ws-head-offsets
  "The X-axis positions of the eight weather system heads"
  [-0.406 -0.305 -0.191 -0.083 0.083 0.191 0.305 0.406])

(defn- ws-head
  "Creates a head definition for one head of the Weather System"
  [index]
  {:channels [(chan/color (+ 2 (* 3 index)) :red)
              (chan/color (+ 3 (* 3 index)) :green)
              (chan/color (+ 4 (* 3 index)) :blue)]
   :x (get ws-head-offsets index)})

(defn weather-system
  "[Weather
  System](http://www.blizzardlighting.com/products/all-in-one-lighting-systems/item/209-weather-system)
