         y (range height)]
     (make-block x y)))
 
-(defonce setup
+(defonce setup-term
   (do
     (.applicationKeypad term)
     (.hideCursor term)))

(ns hello-world.show-screen
  (:require [cljs.nodejs :as nodejs]))

(def term
  (.-terminal (nodejs/require "terminal-kit")))

(.grabInput term #js { :mouse 'button' :focus true })

            :solid false
            })

(def dudeX  (atom 40))
(def dudeY  (atom 20))

(def width  60)
(def height 30)

(defn keyHandler [key matches data]
  (case key
    "UP"    (swap! dudeY dec)
    "DOWN"  (swap! dudeY inc)
    "LEFT"  (swap! dudeX dec)
    "RIGHT" (swap! dudeX inc)
    "ESCAPE" (.exit js/process)
    "meh")
  (.moveTo      term @dudeX @dudeY "@"))

(defn teardown []
  (.off term "key" keyHandler))

(defn setup []
  (.on term "key" keyHandler))

(defn make-block [x y]
  (let [solid (> (rand) 0.9)]
