       \j (move-down state)
       \k (move-up state)
       \l (move-right state)
+      \i (toggle-inventory state)
       \o (set-last-command state :open)
       \c (set-last-command state :close)
       state)))

          (assoc-in state [:world :places place target-y target-x :type] :door-closed))
        state))))

  
  
(defn update-state [state keyin]

(defn init-world []
  {:places {:0 (init-place-0)}
   :current-place :0
   :show-inventory? false
   :last-command nil
   :player {:hp 10
            :max-hp 10
            :$ 0
            :xp 0
            :level 0
            :sym "@"
            :pos {:x 2 :y 1}
            :inventory []}})

(defn current-place [state]
  (let [current-place (-> state :world :current-place)]
