JosephFerano/flan
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

sand.flan speaks the prefixed enum keywords

Browse Source
This commit is contained in:
Joseph Ferano 2026-09-20 21:55:23 +07:00
parent 86091541d4
commit 612696d880
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
sand.flan
View File

@ -92,12 +92,12 @@
h)) h))
(defn game-update [] () (defn game-update [] ()
(when (rl/key-pressed? :r) (clear-grid)) (when (rl/key-pressed? :key-r) (clear-grid))
(when (rl/mouse-button-down? :left) (when (rl/mouse-button-down? :mouse-left)
(let [m (rl/get-mouse-position)] (let [m (rl/get-mouse-position)]
(paint-at (/ (i32 (.y m)) cell-size) (paint-at (/ (i32 (.y m)) cell-size)
(/ (i32 (.x m)) cell-size)))) (/ (i32 (.x m)) cell-size))))
(when (rl/mouse-button-released? :left) (next-color)) (when (rl/mouse-button-released? :mouse-left) (next-color))
(step)) (step))
(defn game-draw [] () (defn game-draw [] ()