working mobile close.

This commit is contained in:
Bryce Covert
2017-03-16 23:00:05 -07:00
parent 406eb76467
commit 365cb205d6
6 changed files with 100 additions and 48 deletions

View File

@@ -32,10 +32,11 @@
(def ui-scale (Double/parseDouble (str (or (System/getProperty "ui_scale") 1.5))))
(def button-scale (+ 1 (* (- ui-scale 1.0) 2.0)))
(def mobile? (= 1.5 ui-scale))
(def max-zoom (if mobile? 0.5 0.75))
(def min-zoom 0.95)
(def button-font-scale (if mobile? 1.0 0.5))
(def button-font-scale (if mobile? 0.75 0.5))
(def title-label-scale (if mobile? 0.5 0.25))
(defn clear-stage [{:keys [^Stage renderer]}]