             [Hud {:game-state game-state}]
             [MapUI {:game-state game-state}]]]]]]])))
 
-#_(defn render-enter-name [state]
-  (let [screen (state :screen)
-        player-name (get-in state [:world :player :name])]
-    (clear (state :screen))
-    (put-string screen :ui 30 5 "Robinson")
-    (put-string screen :ui 20 7 "Name:___________________")
-    (put-string screen :ui 25 7 (str player-name "\u2592"))
-    (refresh screen)))
-
 (def loading-index (atom 0))
 (def loading-tidbits
   ["rat swarm"

(zc/def-component Craft
  [this]
  (let [{:keys [game-state]} (zc/props this)]
    (zc/csx [zcui/Popup {:style {:position :fixed :top 1
                                 :color (rcolor/color->rgb :black)
                                 :background-color (rcolor/color->rgb :white)}} [
                [MultiSelect {:title "Craft"
                              :items [{:name "Weapons" :hotkey \w}

(zc/def-component CraftWeapon
  [this]
  (let [{:keys [game-state]} (zc/props this)]
    (zc/csx [zcui/Popup {:style {:margin-top 5
                                 :color (rcolor/color->rgb :black)
                                 :background-color (rcolor/color->rgb :white)}} [
              [:text {:style {:bottom 1}} ["| Craft Weapon |"]]
