       (assoc event
         dim-index-kw i
         dim (nth dim-vals i)))
-    events))
+    (map #(assoc % dim-index-kw 0) events)))
 
 (defn create-loops [dimensions]
   (reduce #(apply (partial nest-loop %1) %2) [{:task :snap}] dimensions))

      (process-channel-skip-frames)
      (process-use-autofocus use-autofocus autofocus-skip)
      (process-wait-time interval-ms)
      (fill-in-missing-indices))))

; Testing:


        (assoc e2 :wait-time-ms interval-ms)
        e2))))

(defn generate-acq-sequence [settings]
  (let [{:keys [slices keep-shutter-open-channels keep-shutter-open-slices
         use-autofocus autofocus-skip interval-ms]} settings]
