asrael/pxl8
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add stats with f4 toggle

Browse source
This commit is contained in:
asrael 2026-02-06 00:35:52 -06:00
parent a29a6018b8
commit 8c0777b547
7 changed files with 88 additions and 36 deletions
Download patch file Download diff file Expand all files Collapse all files

20
demo/mod/first_person3d.fnl
View file

@ -39,8 +39,6 @@
(var camera nil)
(var ceiling-tex nil)
(var floor-tex nil)
(var fps-avg 0)
(var fps-sample-count 0)
(var grounded true)
(var land-squash 0)
(var last-dt 0.016)
@ -178,14 +176,6 @@
(fn update [dt]
(set last-dt dt)
(let [fps (pxl8.get_fps)]
(set fps-sample-count (+ fps-sample-count 1))
(set fps-avg (+ (* fps-avg (/ (- fps-sample-count 1) fps-sample-count))
(/ fps fps-sample-count)))
(when (>= fps-sample-count 120)
(set fps-sample-count 0)
(set fps-avg 0)))
(setup-materials)
(when (> portal-cooldown 0)
@ -380,15 +370,9 @@
(let [cx (/ (pxl8.get_width) 2)
cy (/ (pxl8.get_height) 2)
crosshair-size 4
crosshair-color 240
text-color 251]
crosshair-color 240]
(pxl8.line (- cx crosshair-size) cy (+ cx crosshair-size) cy crosshair-color)
(pxl8.line cx (- cy crosshair-size) cx (+ cy crosshair-size) crosshair-color)
(pxl8.text (.. "fps: " (string.format "%.0f" fps-avg)) 5 5 text-color)
(pxl8.text (.. "pos: " (string.format "%.0f" cam-x) ","
(string.format "%.0f" cam-y) ","
(string.format "%.0f" cam-z)) 5 15 text-color))
(pxl8.line cx (- cy crosshair-size) cx (+ cy crosshair-size) crosshair-color))
(pxl8.pop_target)))))
{:preload preload