采用cocos2d－x lua 制作数字滚动效果样例

require "Cocos2d"

require "Cocos2dConstants"

local testscene = class("testscene",function()

return cc.Scene:create()

end)

function testscene:create()

local scene = testscene.new()

return scene

end

--默认函数

function testscene:ctor()

--创建层-将层加入场景中

local layer = cc.Layer:create()

self:addChild(layer)

--创建节点-将节点加入层中

local node = cc.Sprite:create("res/land.png")

node:setPosition(240,160)

node:setAnchorPoint(0.5,0.5)

layer:addChild(node,2)

local size = node:getContentSize()

_beginNum = 200

--创建文本-将文本加入节点中

txt = cc.LabelTTF:create(tostring(_beginNum),"Marker Felt",24)

txt:setColor(cc.c4b(20,25,255,255))

txt:setPosition(size.width/2,size.height/2)

txt:setAnchorPoint(0.5,0.5)

node:addChild(txt)

local taction = {}

--延迟

local delay =cc.DelayTime:create(0.01)

table.insert(taction,delay)

--扩大

local scale = cc.ScaleTo:create(0.2,2)

local scale2 = cc.ScaleTo:create(0.2,1)

table.insert(taction,scale)

table.insert(taction,scale2)

-- 数值改变

_endNum =10000

math.randomseed(3000)

_dis = math.random(5000,10000)

print(_dis)

local rtime = (_endNum-_beginNum)/_dis

print(rtime)

function chagenum()

if (_beginNum < _endNum) then

_beginNum= _beginNum +_dis

txt:setString(_beginNum)

elseif (_beginNum == _endNum) then

txt:setString( _endNum)

end

end

local seq = cc.Sequence:create(delay,cc.CallFunc:create(chagenum))

--数字翻滚

local X = size.width/2

local Y = size.height/2

local UPY = 2*Y

local DownY = 0

local move1 = cc.MoveTo:create(0.05,cc.p(X,UPY))

local move2 = cc.MoveTo:create(0.05,cc.p(X,DownY))

local move3 = cc.MoveTo:create(0.05,cc.p(X,Y))

local scale1 = cc.ScaleTo:create(0.05,1,0.001)

local scale2 = cc.ScaleTo:create(0.05,1,1)

local UP = cc.Sequence:create(move1,scale1)

local Down = cc.Sequence:create(move2,scale1,scale2,move3)

local spawn = cc.Spawn:create(UP,seq,Down)

local rep = cc.Repeat:create(spawn,rtime)

--设置真值

local function setnum()

_beginNum = _endNum

txt:setString(_beginNum)

end

local call = cc.CallFunc:create(setnum)

local seq2 = cc.Sequence:create(rep,delay,call)

table.insert(taction,seq2)

table.insert(taction,scale)

table.insert(taction,scale2)

local seqaction = cc.Sequence:create(taction)

txt:runAction(seqaction)

return layer

end

return testscene