switch to nata
This commit is contained in:
parent
e7197f93fc
commit
0a1d655267
4 changed files with 588 additions and 51 deletions
|
|
@ -10,7 +10,7 @@
|
|||
; (utils.debug-print assets)
|
||||
; (local network (require "network.fnl"))
|
||||
|
||||
(var world nil)
|
||||
(var pool nil)
|
||||
|
||||
;; global vars
|
||||
; (var level-key "tutorial")
|
||||
|
|
@ -174,8 +174,8 @@
|
|||
(fn love.load []
|
||||
(love.window.setMode screen.screen-w screen.screen-h)
|
||||
; (tset screen :canvas (love.graphics.newCanvas screen.canvas-w screen.canvas-h))
|
||||
(set world (tutorial.load screen))
|
||||
(utils.debug-print world)
|
||||
(set pool (tutorial.load screen))
|
||||
; (utils.debug-print world)
|
||||
; (load-assets)
|
||||
; (load-level :tutorial)
|
||||
;; Initialize network
|
||||
|
|
@ -203,9 +203,8 @@ while 1 do love.event.push('stdin', io.read('*line')) end") :start))
|
|||
|
||||
|
||||
(fn love.update [dt]
|
||||
(let [filter (tiny.requireAll :update)]
|
||||
; (utils.debug-print filter)
|
||||
(tiny.update world dt filter)))
|
||||
(pool:flush)
|
||||
(pool:emit :update dt))
|
||||
|
||||
; (fn love.update [dt]
|
||||
; (each [_ obj (pairs objects.list)]
|
||||
|
|
@ -317,11 +316,10 @@ while 1 do love.event.push('stdin', io.read('*line')) end") :start))
|
|||
; ; (print (fennel.view obj))
|
||||
; (obj:draw)))
|
||||
|
||||
(fn love.draw [dt]
|
||||
(tiny.update world dt (tiny.requireAll :pre-draw))
|
||||
(tiny.update world dt (tiny.requireAll :draw))
|
||||
; (world:update dt (tiny.requireAll "post-draw"))
|
||||
)
|
||||
(fn love.draw []
|
||||
(pool:emit :pre-draw)
|
||||
(pool:emit :draw)
|
||||
(pool:emit :post-draw))
|
||||
; (fn love.draw []
|
||||
; (love.graphics.setCanvas screen.canvas)
|
||||
; (love.graphics.clear)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue