(defn make-map-console [gamemap]
  "Makes a map console, which redraws the map every time it is repainted,
    and has a default black background."
  (doto (proxy [JPanel] []
             (paintComponent [g]
               (proxy-super paintComponent g)
               (doto g
                 (.setFont *font*)
                 (.setColor Color/white)
                 (.darwString "bla" 10 10))))
    (.setBackground Color/black)))