get player rendering

This commit is contained in:
Travis Shears 2026-04-23 22:24:39 +02:00
parent c4c33e4726
commit c577295c3e
Signed by: travisshears
GPG key ID: CB9BF1910F3F7469
3 changed files with 51 additions and 27 deletions

View file

@ -175,7 +175,9 @@
(love.window.setMode screen.screen-w screen.screen-h)
; (tset screen :canvas (love.graphics.newCanvas screen.canvas-w screen.canvas-h))
(set pool (tutorial.load screen))
(pool:flush)
(pool:emit :load :tutorial)
; (utils.debug-print pool)
; (utils.debug-print world)
; (load-assets)
; (load-level :tutorial)
@ -299,9 +301,10 @@ while 1 do love.event.push('stdin', io.read('*line')) end") :start))
; (obj:draw)))
(fn love.draw []
(pool:emit :pre-draw)
(pool:emit :draw)
(pool:emit :post-draw))
(for [i 1 99 1]
(let [draw-trigger (.. "draw" i)]
(pool:emit draw-trigger))))
; (fn love.draw []
; (love.graphics.setCanvas screen.canvas)
; (love.graphics.clear)