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

first attempt at an intro screen.

Browse Source
This commit is contained in:
Remington Covert
2015-02-07 11:24:36 -08:00
parent 41e75513f5
commit e7b2e13f4a
6 changed files with 86 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
desktop/src-common/advent/core.clj
View File

@@ -5,6 +5,7 @@
[play-clj.g2d :refer :all]
[advent.screens.scene :as scene]
[advent.screens.dialogue :as dialogue]
[advent.screens.title :as title]
[advent.screens.inventory :as inventory]
[advent.screens.safe :as safe]
[clojure.pprint]
@@ -17,8 +18,8 @@
(defgame advent
:on-create
(fn [this]
(set-screen! this scene/scene dialogue/talking-screen dialogue/choice-screen inventory/inventory-screen safe/safe-screen)))
(set-screen! this title/title-screen)))
(defn reload []
(on-gl (set-screen! advent scene/scene dialogue/talking-screen dialogue/choice-screen inventory/inventory-screen safe/safe-screen)))
(on-gl (set-screen! advent title/title-screen)))