      wrap-label!)
    :width tile-size
    :height tile-size
-   :pad pad-space pad-space pad-space pad-space])
+   :pad pad-small pad-small pad-small pad-small])
 
 (defn set-visible!
   [entity show?]

    (height! screen height)
    (for [e entities]
      (case (:id e)
        :menu (assoc e :y (- height (vertical! e :get-height) pad-space))
        :menu-keys (assoc e :y (- height (vertical! e :get-height) pad-space))
        :text (assoc e :width width :height (- height (* 2 (:y e))))
        e)))
  

(declare nightmod main-screen blank-screen overlay-screen)

(def ^:const text-height 40)
(def ^:const pad-small 5.0)
(def ^:const pad-large 20.0)
(def ^:const tile-size 250)

(def templates ["arcade"
