感谢@Vald 和@Egor 的评论。似乎问题是由于“协程太长”无法在 PICO-8 循环中完成造成的。所以解决方案是我将未完成的协程存储在一个表中,如果未完成则恢复它们。但不知何故,动作发生了变化,有点像“丢帧”。
这是我编辑的代码:
function _init()
-- code
cors={}
end
function _update()
for i=1,#boids do
local co=cocreate(move_boid)
local c=boids[i]
add(cors,co)
coresume(co,c)
end
for co in all(cors) do
if (co and costatus(co)!="dead") then
coresume(co)
else
del(cors,co)
end
end
end
并且还修改了计算函数,中间增加了一行:
function move_boid(c)
-- code
yield()
-- code
end
只是为了在它完成之前屈服。
更新:另一种方法是重用协程。
function _init()
-- code
-- create coroutines
cors={}
for i=1,#boids do
local co=cocreate(move_boid)
local c=boids[i]
add(cors,co)
coresume(co,c)
end
end
function _update()
foreach(cors,coresume)
end
-- and wrap the move function with a loop
function move_boid(c)
while true do
-- code
yield()
-- code
yield()
end
end