notid/gitea-docker
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

moved to latest version.

Browse Source
This commit is contained in:
Bryce Covert
2021-01-18 08:23:13 -08:00
parent 818dfaabb8
commit 7c6b1d7d94
7 changed files with 46 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
desktop/src/advent/core/desktop_launcher.clj
View File

@@ -3,9 +3,10 @@
[advent.utils :as utils]
[play-clj.core :refer :all]
[clojure.tools.logging :as log])
(:import [com.badlogic.gdx.backends.lwjgl LwjglApplication LwjglApplicationConfiguration]
[org.lwjgl.input Keyboard]
[com.badlogic.gdx Gdx Files$FileType])
(:import [com.badlogic.gdx.backends.lwjgl3 Lwjgl3Application Lwjgl3ApplicationConfiguration Lwjgl3ApplicationConfiguration$HdpiMode]
#_[org.lwjgl.input Keyboard]
[com.badlogic.gdx Gdx Files$FileType]
[com.badlogic.gdx.graphics.glutils ])
(:gen-class))
@@ -23,21 +24,30 @@
(eval `(play-clj-nrepl.core/start-nrepl advent.core/advent ~port)))
(let [cfg (LwjglApplicationConfiguration.)]
(.addIcon cfg "icon/icon_128x128.png" Files$FileType/Classpath)
(.addIcon cfg "icon/icon_32x32.png" Files$FileType/Classpath)
(.addIcon cfg "icon/icon_16x16.png" Files$FileType/Classpath)
(let [cfg (Lwjgl3ApplicationConfiguration.)]
#_(.addIcon cfg "icon/icon_128x128.png" Files$FileType/Classpath)
#_(.addIcon cfg "icon/icon_32x32.png" Files$FileType/Classpath)
#_(.addIcon cfg "icon/icon_16x16.png" Files$FileType/Classpath)
(set! (.title cfg) "Tick's Tales: Up All Knight")
(set! (.foregroundFPS cfg) 60)
(set! (.backgroundFPS cfg) 60)
#_(set! (.title cfg) "Tick's Tales: Up All Knight")
(doto cfg
#_(.setBackgroundFPS 60)
#_(.setForegroundFPS 60)
(.setHdpiMode Lwjgl3ApplicationConfiguration$HdpiMode/Pixels)
(.setTitle "Tick's Tales: Up All Knight")
(.setWindowIcon (into-array ["icon/icon128x128.png"
"icon/icon32x32.png"
"icon/icon16x16.png"])))
#_(set! (.foregroundFPS cfg) 60)
#_(set! (.backgroundFPS cfg) 60)
(System/setProperty "org.lwjgl.opengl.Display.enableHighDPI" "false")
(System/setProperty "org.lwjgl.opengl.Display.disableOSXFullscreenModeAPI" "true")
#_(System/setProperty "org.lwjgl.opengl.Window.undecorated", "true")
(log/info "Starting game")
(let [app (LwjglApplication. advent cfg)]
(let [app (Lwjgl3Application. advent cfg)]
(when (utils/has-saved-settings?)
(utils/load-settings!))
(utils/set-fullscreen! (:fullscreen @utils/settings))
@@ -46,4 +56,4 @@
(Keyboard/enableRepeatEvents true))
#_(Keyboard/enableRepeatEvents true))