   (hook-clear @player :on-collision-exit)
   (hook+ @player :update #'game.core/handle-input)
   (hook+ @player :on-collision-enter #(do %1 %2 (reset! TOUCHING true)))
-  (hook+ @player :on-collision-exit #(do %1 %2 (reset! TOUCHING false)))
-  (clone! :EventSystem)
-  (clone! :Canvas))
+  (hook+ @player :on-collision-exit #(do %1 %2 (reset! TOUCHING false))))
 
 
 


(defn make-level []
  (clear-cloned!)
  (make-park park-size park-size)
  (reset! player (make-player 
    (v3 (* park-size park-scale)

  (wait 0.1)
  #(do (message "brb   7min") nil))

(make-level)

