                                                  (params/build-color-param :s 100 :l 50 :h hue-z-gradient)
                                                  :include-color-wheels? true))
                              :short-name "Z Rainbow Grid"))
-    (show/set-cue! (+ x-base 6) (inc y-base)
-                   (let [color-param (params/build-color-param :s :rainbow-saturation :l 50 :h hue-bar)]
-                     (cues/cue :all-color (fn [_] (fx/scene "Rainbow with laser" (global-color-effect color-param)
-                                                          (beyond/laser-color-effect laser-show color-param)))
-                               :color-fn (cues/color-fn-from-param color-param)
-                               :short-name "Rainbow with Laser"
-                               :variables [{:key :rainbow-saturation :name "Saturatn" :min 0 :max 100 :start 100
-                                            :type :integer}])))
+    (when add-beyond?
+      (show/set-cue! (+ x-base 6) (inc y-base)
+                     (let [color-param (params/build-color-param :s :rainbow-saturation :l 50 :h hue-bar)]
+                       (cues/cue :all-color (fn [_] (fx/scene "Rainbow with laser" (global-color-effect color-param)
+                                                              (beyond/laser-color-effect laser-show color-param)))
+                                 :color-fn (cues/color-fn-from-param color-param)
+                                 :short-name "Rainbow with Laser"
+                                 :variables [{:key :rainbow-saturation :name "Saturatn" :min 0 :max 100 :start 100
+                                              :type :integer}]))))
     (show/set-cue! (+ x-base 7) (inc y-base)
                    (let [color-param (params/build-color-param :s 100 :l 50 :h hue-gradient
                                                                :adjust-hue hue-bar)]

(defn make-main-color-dimmer-cues
  "Creates a page of cues that assign dimmers and colors to the
  lights. This is probably going to be assigned as the first page, but
  can be moved by passing non-zero values for `page-x` and `page-y`."
  [page-x page-y]
  (let [x-base (* page-x 8)
        y-base (* page-y 8)
        rig-left (:x (first (show/fixtures-named :hex-2)))

  (clear-osc-cue-bindings)

  ;; Fill in some cue pages
  (make-main-color-dimmer-cues 0 0 add-beyond?)  ; Creates a sigle 8x8 page at the origin
  (make-torrent-cues 0 2)  ; Creates 2 8x8 pages: two pages up from the origin, and the next page to the right
  (make-ambient-cues 1 0)  ; Creates a single 8x8 page to the right of the origin
  (make-movement-cues 0 1)  ; Creates an 8x8 page above the origin
