     (size! screen width height))
   :on-touch-down
   (fn [{:keys [x y] :as screen} entities]
-    (conj entities (create-box! screen (get-material) (get-attrs)))))
+    (conj entities (create-box! screen))))
 
 (defscreen text-screen
   :on-show

                                            :set-gravity (vector-3 0 -10 0))
                          :attributes env
                          :camera cam)]
      [(doto (create-sphere! screen (get-material) (get-attrs))
         (body-position! 0 5 5))
       (doto (create-box! screen (get-material) (get-attrs))
         (body-position! 0 5 0))]))
  :on-render
  (fn [screen entities]

         (add-body! screen))))

(defn create-sphere!
  [screen]
  (-> (model-builder)
      (model-builder! :create-sphere 4 4 4 24 24 (get-material) (get-attrs))
      model
      (assoc :body (create-sphere-body! screen))))

