                           :ticks 0
                           :p1-level-score 0
                           :high-score 0
-                          :p1-lives 3
+                          :p1-lives 0;3
                           :game-state :attract-mode
                           :formation-expand? false
                           :wave-respawning? false

                    (conj entities (enemy/create-enemies screen)))
      :post-game-over (do
                        (update! screen :p1-level-score 0
                                 :p1-lives 3
                                 :game-state :attract-mode)
                        (conj entities (ship/create-ship-entity! screen)))
      ;default
      nil))


    ))

(defn on-new-game [screen entities]
  (update! screen
           :ticks 0
           :p1-level-score 0
           :p1-lives 3
           :game-state :in-game
           :formation-expand? false
           :wave-respawning? false)
  (prn :on-new-game)
  (remove #(:enemy? %) (conj entities (ship/create-ship-entity! screen))))

(defn handle-all-entities [screen entities]
  (->> entities
