       (when up     (.fill g (swing/->shape w2 h6 (* 4 w6) (* 2 h6) (* 2 w6) (* 2 h6))))
       (when down   (.fill g (swing/->shape w2 (* 5 h6) (* 4 w6) (* 4 h6) (* 2 w6) (* 4 h6))))
       (when space  (.fill g (swing/->shape 50 (- h 40) (- w 50) (- h 40) (- w 50) (- h 10) 50 (- h 10)))))
-    
+
     ; draw grid
     ;(.setColor g hud-lo-color)
     ;(doseq [x (range (/ w 10) w (/ w 10))] (.drawLine g x 0 x h))
     ;(doseq [y (range (/ h 10) h (/ h 10))] (.drawLine g 0 y w y))
-    
+
     ; draw zero axis
     (.setColor g hud-color)
     (.drawLine g w2 0 w2 h)

    (.createBufferStrategy canvas 2)
    (->Frame frame canvas)))

;; 
;; =================================================================================
;; Lifecycle:
;; =================================================================================


    ; setup
    (.setRenderingHint g RenderingHints/KEY_ANTIALIASING RenderingHints/VALUE_ANTIALIAS_ON)

    ; video feed
    (if image
      (doto g
