 (defn -nextWakeTime [this]
   (or (:next-wake-time @(.state this)) -1))
 
-(defn -acquireSingle [this]
-  (prepare-state this)
-  (let [out-queue (GentleLinkedBlockingQueue.)
-        event {:close-shutter true, :frame-index 0, :position-index 0,
-               :autofocus false, :channel-index 0, :slice-index 0,
-               :exposure nil, :relative-z true, :task :snap, :z-drive "Z",
-               :wait-time-ms 0}]
-    (execute (make-event-fns event out-queue))
-    (cleanup)))
-
 ;; testing
 
 (defn create-acq-eng []

                :snap (collect-snap-image)
                :init-burst (collect-burst-image)
                :collect-burst (collect-burst-image))]
    (.put out-queue (annotate-image image event @state))))

(defn compute-z-position [event]
  (if-let [z-drive (:z-drive event)]

       "UUID" (UUID/randomUUID)
       "Width"  (state :init-width)
       "ZPositionUm" (state :last-z-position)
      })})

(defn make-TaggedImage [annotated-img]
  (TaggedImage. (:pix annotated-img) (JSONObject. (:tags annotated-img))))

;; acq-engine

