 (defn blink [terminal state blinks]
   ;(prinln (format "drawing %d blinks" (count blinks)))
   (doseq [blink blinks]
-    (println @frame-count (mod @frame-count 15))
+    #_(println @frame-count (mod @frame-count 15))
     (when (< (mod @frame-count 15) 7)
       (let [[vx vy] (get blink :xy)]
-          (println "drawing * @ " vx vy)
+          #_(println "drawing * @ " vx vy)
           (zat/set-fx-char! terminal :fx vx vy \space)))))
 
 (defrecord BlinkEffect

;; util/helper fns
(defn nil-grid [terminal]
  (let [[vw vh] (size terminal)]
    (println "vw vh" vw vh)
    (repeat vh (vec (repeat vw nil)))))

(defn lantern-flicker [opts x y fg]

    (zat/clear-fx! terminal)
    (doseq [effect @effects]
      (zaat/apply-effect! effect terminal))
    #_(log/info "done applying effects")
    (zat/refresh! terminal))
  (clear! [this]
    (reset! opts (nil-grid terminal))
