 (ns pain-tetris.core
   (:require [quil.core :as q :include-macros true]
             [quil.middleware :as m]
+            [pain-tetris.movement :as mo]
             [pain-tetris.pieces :as p]
             [pain-tetris.util :as util]
             [pain-tetris.movement :as mo]

  []
  (swap! t/timer js/clearInterval))

(q/defsketch canvas
  :host "canvas"
  :size (d/canvas-size t/grid-dims)

  :update update-state
  :draw draw-state
  :key-pressed t/key-pressed
  :mouse-pressed mouse-pressed
  :middleware [m/fun-mode]
  :features [:global-key-events]
  :settings q/smooth)
