   (when-let [next-tile (next-tile @screen-state-atom
                                   acquired-images)]
     (add-tiles-at memory-tiles-atom next-tile affine acquired-images
-                  (@screen-state-atom :tile-dimensions))
+                  (@screen-state-atom :tile-dimensions)
+                  (@screen-state-atom :acq-settings))
     next-tile))
 
 (def explore-executor (Executors/newFixedThreadPool 1))

          [screen-state memory-tiles panel] (show dir acquired-images settings)]
      (when new?
        (core waitForDevice (core getXYStageDevice))
        (let [affine-stage-to-pixel (origin-here-stage-to-pixel-transform)
              first-seq (acquire-at (inverse-transform (Point. 0 0) affine-stage-to-pixel))
              explore-fn #(explore memory-tiles screen-state acquired-images
                                   affine-stage-to-pixel)
              stage (core getXYStageDevice)]


(def image-processing-executor (Executors/newFixedThreadPool 1))
 
(defn add-tiles-at [memory-tiles [nx ny] affine-stage-to-pixel acquired-images tile-dimensions
                    settings]
  (swap! acquired-images conj [nx ny])
  (let [[tile-width tile-height] tile-dimensions]
    (doseq [image (doall (acquire-at (inverse-transform
                                       (Point. (* tile-width nx)
                                               (* tile-height ny))
                                       affine-stage-to-pixel)
                                     settings))]
      (let [indices {:nx nx
                     :ny ny
                     :nz (get-in image [:tags "SliceIndex"])
