文档章节

用协程手动控制基于Lua的两种框架:Codea和Love2D的流程

FreeBlues
 FreeBlues
发布于 2017/07/06 01:16
字数 821
阅读 49
收藏 0

用协程手动控制基于Lua的两种框架:Codea和Love2D的流程

问题来源

最近在 Codea 官网社区看到有人提问如何在 Codea 中实现暂停, 这个帖子 Triggering the pause function Codea has _ FIXED wrote some Lua code

在 Codea 中通过宿主 Objective-C 来控制

最有效的办法当然是通过修改 Lua 的宿主语言 C 来挂起整个虚拟机, 具体方法如下:

Codea 导出的 XCode 项目中打开包含 StandaloneViewController.m 文件, 然后修改这个:

StandaloneViewController *cc=self.viewController

把视图控制器保存到变量 cc 中, 那么暂停只需执行如下语句

cc.paused=YES;

恢复只需执行如下语句:

cc.paused=NO;

这应该是一种比较彻底的解决方法, 不过显然无法在 Lua 中来执行, 在 Lua 中它只能暂停, 无法恢复.

在 Codea 中通过 debug 函数来控制

也有人提出用利用 debug 函数的钩子来实现, 代码如下:

function setup()
    x=10
    y=400
    xv=1
    yv=1
    cnt=0
    sec=10
    debug.sethook(loop,"l")
end

function loop()
    while pause do
        ct=os.time()
        if ct>st+sec then
            pause=false
        end  
    end
end

function draw()
    background(40, 40, 50)
    fill(255)
    text("tap screen to pause for "..sec.." seconds.",WIDTH/2,HEIGHT/2)
    x=x+xv
    if x>WIDTH or x<0 then
        xv=xv*-1
    end
    y=y+yv
    if y>HEIGHT or y<0 then
        yv=yv*-1
    end
    ellipse(x,y,20)
    cnt=cnt+1
    text(cnt,WIDTH/2,HEIGHT-50)
end

function touched(t)
    if t.state==BEGAN then
        st=os.time()
        pause=true
    end
end

这种办法可以在 Codea 内暂停/恢复, 唯一的问题是没办法精确控制, 只能用定时器.

在 Codea 中通过协程来控制

我想到的就是用协程来控制流程, 代码如下:

function setup()
    pause = false
    -- Create a new coroutine for the function f
    co = coroutine.create(f)

    box = { x = 10, y = 10,
            width = 20, height = 20,
            fillColor = color(24, 28, 202, 255) }

    -- Here we can not use tween.
    -- t = tween(10, box, {x = 1000, y = 1000})
end

-- Put all your draw code in f
function f()
    while not pause do

        background()
        fontSize(40)
        fill(0,255,0)
        text(os.time(),WIDTH/2,HEIGHT/2)

        fill(box.fillColor)
        box.x, box.y = box.x+1,box.y+1
        rect(box.x,box.y,box.width,box.height)

        coroutine.yield()
    end
end

function draw()
    if not pause then
        coroutine.resume(co)
    end
end

function touched(t)
    -- Click left screen to pause, click right screen to resume
    if t.state == BEGAN and t.x >=WIDTH/2 then
        pause = false
    elseif t.state == BEGAN and t.x <WIDTH/2 then
        pause = true
    end
end

用协程的优点是可以精确地控制流程, 缺点是所有的地方都要考虑到, 另外一个问题就是可能带来性能损失.

在 Love2D 中通过协程来控制

上面的代码稍作修改就可以用在 Love2D 中, 修改后的代码如下:


function love.load()
	canvas = love.graphics.newCanvas(800, 600)
	
	love.graphics.setBackgroundColor(0, 0, 0)
    pause = false
    -- Create a new coroutine for the function f
    co = coroutine.create(f)

    box = { x = 10, y = 10, width = 20, height = 20}
end

function f()
    while not pause do
    	--love.graphics.setCanvas(canvas)
    	love.graphics.setBlendMode("alpha")
		love.graphics.setColor(255, 255, 0)
		love.graphics.print(os.time(), 300,400)
        love.graphics.setColor(0, 255, 0)
        box.x, box.y = box.x+1,box.y+1
        love.graphics.rectangle("fill", box.x, box.y, box.width, box.height)
        --love.graphics.setCanvas()
        
        love.graphics.setBlendMode("alpha")

		--love.graphics.draw(canvas)
        coroutine.yield()
    end
end

function love.draw()
	if not pause then
        coroutine.resume(co)
    end
end

function love.update(delta)	
	if love.keyboard.isDown("p") then
		pause = true
	elseif love.keyboard.isDown("s") then
		pause = false
	end	
end

唯一的问题就是每当暂停时, 屏幕就不显示任何内容了, 这种情况显然是因为我对 Love2D 的处理机制理解存在一些小问题, 有时间了再慢慢分析.

© 著作权归作者所有

共有 人打赏支持
FreeBlues
粉丝 94
博文 278
码字总数 487443
作品 0
其它
程序员
用 Lua 的协程 coroutine 控制 Codea 屏幕刷新速度

用 Lua 的协程 coroutine 控制 Codea 屏幕刷新速度 概述 在 中, 函数 缺省每秒执行 次, 我们希望能修改一下它的刷新速度, 于是想到了 的一个特性:, 希望试着用它来控制程序执行的节奏, 不过目...

FreeBlues
2016/06/14
23
0
从零开始写一个武侠冒险游戏-5-使用协程

从零开始写一个武侠冒险游戏-5-使用协程 ---- 用协程实现控制权灵活切换 概述 因为我们的地图类是可以自己控制大小的, 在无意中用了一个比较大的数字 后, 结果花了挺长时间来生成地图, 而在这...

FreeBlues
2016/06/15
61
0
从零开始写一个武侠冒险游戏-0-开发框架Codea简介

从零开始写一个武侠冒险游戏-0-开发框架Codea简介 概述 本游戏全程使用一款运行于 上的开发工具类 -- 来开发, 是一款 + 的开发工具, 它既是一个: - 也是一个: - 还是一个: - 更是一个: - , 可...

FreeBlues
2016/06/21
69
0
用 Lua 的协程 coroutine 在 Codea 上实现一个多任务调度类

用 Lua 的协程 coroutine 在 Codea 上实现一个多任务调度类 概述 问题描述 在 中调试程序时发现一个问题: 如果在 中执行了比较耗时的语句, 比如地图生成, 资源下载等操作, 那么在该这些操作没...

FreeBlues
2016/06/15
29
0
python 高性能编程之协程

用 greenlet 协程处理异步事件 自从 PyCon 2011 协程成为热点话题以来,我一直对此有着浓厚的兴趣。为了异步,我们曾使用多线程编程。然而线程在有着 GIL 的 Python 中带来的性能瓶颈和多线程...

passionfly
2015/05/07
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

深夜胡思乱想

魔兽世界 最近魔兽世界出了新版本, 周末两天升到了满级,比之前的版本体验好很多,做任务不用抢怪了,不用组队打怪也是共享拾取的。技能简化了很多,哪个亮按哪个。 运维 服务器 产品 之间的...

Firxiao
14分钟前
0
0
MySQL 8 在 Windows 下安装及使用

MySQL 8 带来了全新的体验,比如支持 NoSQL、JSON 等,拥有比 MySQL 5.7 两倍以上的性能提升。本文讲解如何在 Windows 下安装 MySQL 8,以及基本的 MySQL 用法。 下载 下载地址 https://dev....

waylau
48分钟前
0
0
微信第三方平台 access_token is invalid or not latest

微信第三方开发平台code换session_key说的特别容易,但是我一使用就带来无穷无尽的烦恼,搞了一整天也无济于事. 现在记录一下解决问题的过程,方便后来人参考. 我遇到的这个问题搜索了整个网络也...

自由的开源
今天
0
0
openJDK之sun.misc.Unsafe类CAS底层实现

注:这篇文章参考了https://www.cnblogs.com/snowater/p/8303698.html 1.sun.misc.Unsafe中CAS方法 在sun.misc.Unsafe中CAS方法如下: compareAndSwapObject(java.lang.Object arg0, long a......

汉斯-冯-拉特
今天
2
0
设计模式之五 责任链模式(Chain of Responsibility)

一. 场景 相信我们都有过这样的经历; 我们去职能部门办理一个事情,先去了A部门,到了地方被告知这件事情由B部门处理; 当我们到了B部门的时候,又被告知这件事情已经移交给了C部门处理; ...

JackieRiver
今天
1
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部