   ;; And record the new state for next time
   (reset! (:last-text-buttons controller) @(:next-text-buttons controller)))
 
-(defn- ^:deprecated get-safe-text-byte
-  "Converts a character to be displayed to a byte, but if it is
-  outside the range that can be displayed by the Push, like Unicode,
-  then change it to a byte representing an ellipsis."
-  [c]
-  (let [i (int c)]
-    (if (> i 127)
-      0
-      i)))
-
-(defn ^:deprecated write-display-text
-  "Update a batch of characters within the display to be rendered on
-  the next update."
-  [controller row start text]
-  {:pre [(<= 0 row 3) (<= 0 start 67)]}
-  #_(let [bytes (map get-safe-text-byte text)]
-    (doseq [[i val] (map-indexed vector bytes)]
-      (aset (get (:next-display controller) row) (+ start i) (util/ubyte val)))))
-
-(defn- ^:deprecated write-display-cell
-  "Update a single text cell (of which there are four per row) in the
-  display to be rendered on the next update."
-  [controller row cell text]
-  {:pre [(<= 0 row 3) (<= 0 cell 3)]}
-  #_(let [bytes (take 17 (concat (map get-safe-text-byte text) (repeat 32)))]
-    (doseq [[i val] (map-indexed vector bytes)]
-      (aset (get (:next-display controller) row) (+ (* cell 17) i) (util/ubyte val)))))
-
 (def button-cell-width
   "The number of pixels allocated to each button above or below the
   graphical display."

  [note]
  (+ note 71))

(defn- ^:deprecated draw-variable-gauge
  "Display the value of a variable being adjusted in the effect list."
  [controller cell width offset cue v effect-id]
  (let [value (or (cues/get-cue-variable cue v :show (:show controller) :when-id effect-id) 0)
        low (min value (:min v))  ; In case user set "out of bounds".
        high (max value (:max v))
        gauge (if (:centered v)
                (make-pan-gauge value :lowest low :highest high :width width)
                (make-gauge value :lowest low :highest high :width width))]
    (write-display-text controller 0 (+ offset (* cell 17)) gauge)))

(defn- adjust-variable-value
  "Handle a control change from turning an encoder associated with a
  variable being adjusted in the effect list."

  [controller x color]
  (set-button-color controller (get control-buttons (keyword (str "encoder-pad-" x))) color))

(def touch-strip-mode-flags
  "The values which are combined to set the touch strip into
  particular modes."
