             "\u2584"
             "\u2592"
             "\u2648"
-            "\u2665")
+            "\u2665"
+            "\u1D16"
+            "\u255a"
+            "\u2550"
+            "\u255d"
+            "\u2551"
+            "\u2554"
+            "\u2557"
+            "\u00B0")
        c (concat (map vector c (repeat false))
                  (map vector c (repeat true)))]
     c))

                        :mv-matrix-buffer (position-matrix-buffer [(- (/ screen-width 2)) (- (/ screen-height 2)) -1.0 0.0])
                        :char-width char-width
                        :char-height char-height
                        :buffers {:vao-id vao-id
                                  :vertices-vbo-id vertices-vbo-id
                                  :vertices-count vertices-count
                                  :texture-coords-vbo-id texture-coords-vbo-id}
                        :textures {:glyph-texture glyph-texture

  (let [terminal (make-terminal (format "Robinson - %s@%s" "demo" "glterminal")
                                80 24 [255 255 255] [5 5 8] nil
                                "Courier New" "fonts/Boxy/Boxy.ttf" 16 true)
        last-key (atom nil)
          input-chan (go-loop []
                       (reset! last-key (async/<!! (rat/get-key-chan terminal)))
                       (log/info "got key" (or (str @last-key) "nil"))
                       (recur))]
    ;; get key presses in fg thread
    (loop []
      (when (not (Display/isCloseRequested))
        (let [key-in (or @last-key \?)]
          (dosync
            (rat/clear! terminal)
            (put-string terminal 0 0 "Hello world 0 0")
            (put-string terminal 0 1 "abcdefghijklmno")
            (doseq [[i c] (take 23 (map-indexed (fn [i c] [i (char c)]) (range (int \a) (int \z))))]
              (put-string terminal 0 i (str c) [128 (+ i 100) 0] [0 0 50]))
            (put-string terminal 60 0 "Hello world 60 0" [128 0 0] [0 0 128])
            (put-string terminal 0 19 "Hello world 60 19" [0 128 0] [128 0 0])
            (put-string terminal 60 19 "Hello world 0 19" [0 0 128] [0 128 0])
            (put-string terminal 5 10 (str key-in))
            (rat/refresh! terminal)))
        (recur)))
    (locking terminal
      (log/info "shutting down")
      (async/close! input-chan)
      (Display/makeCurrent)
      (Display/destroy)))
  (System/exit 0))