            (count-mini-ships screen)
            (render! screen))))
 
-  ;Called by the main_screen, passing in :score
+                                        ;Called by the main_screen, passing in :score
   :on-update-score
   (fn [screen entities]
     (let [score (:p1-score screen)
           high-score (:high-score screen)]
-      (update! screen :p1-score score :high-score high-score)
-      ;(prn :score score)
-      )
+      (update! screen :p1-score score :high-score high-score))
     nil)
 
   :on-update-lives

(def ^:const high-score-label-x (/ 472.0 2.0)) ;(* 3 224)
(def ^:const high-score-x (/ 472.0 2.0))

(defscreen hud-screen
  :on-show
  (fn [screen entities]

(defn add-mini-ships [n entities]
  (let [ships (for [ship (range n)
                    :let [x (- 600 (* ship 32))]]
                (assoc @mini-ships-texture
                       :width 32 :height 32
                       :x x :y 5
                       :id :pixel-ship :mini-ship? true))]
    (flatten (conj entities ships))))

(defn pad-score [score]
