axmol/samples/Lua/TestLua/Resources/luaScript/MotionStreakTest/MotionStreakTest.lua

local streak = nil
local titleLabel = nil
local subtitleLabel = nil

local s = CCDirector:sharedDirector():getWinSize()
local scheduler = CCDirector:sharedDirector():getScheduler()

local firstTick = nil

local function modeCallback(sender)
	fastMode = streak:isFastMode()
	if fastMode == true then
		streak:setFastMode(false)
	else
		streak:setFastMode(true)
	end
end

local function getBaseLayer()
	local layer = CCLayer:create()

    local itemMode = CCMenuItemToggle:create(CCMenuItemFont:create("Use High Quality Mode"))
	itemMode:addSubItem(CCMenuItemFont:create("Use Fast Mode"))
	itemMode:registerScriptTapHandler(modeCallback)
    local menuMode = CCMenu:create()
	menuMode:addChild(itemMode)
    menuMode:setPosition(ccp(s.width / 2, s.height / 4))
    layer:addChild(menuMode)

    Helper.initWithLayer(layer)

	return layer
end

-----------------------------------
--  MotionStreakTest1
-----------------------------------
local root = nil
local target = nil

local MotionStreakTest1_entry = nil

local function MotionStreakTest1_update(dt)
	if firstTick == true then
		firstTick = false
		return
	end

	streak:setPosition(target:convertToWorldSpace(ccp(0, 0)))
end

local function MotionStreakTest1_onEnterOrExit(tag)
	if tag == "enter" then
		MotionStreakTest1_entry = scheduler:scheduleScriptFunc(MotionStreakTest1_update, 0, false)
	elseif tag == "exit" then
		scheduler:unscheduleScriptEntry(MotionStreakTest1_entry)
	end
end

local function MotionStreakTest1()
	local layer = getBaseLayer()

	root = CCSprite:create(s_pPathR1)
    layer:addChild(root, 1)
    root:setPosition(ccp(s.width / 2, s.height / 2))

    target = CCSprite:create(s_pPathR1)
    root:addChild(target)
    target:setPosition(ccp(s.width / 4, 0))

    streak = CCMotionStreak:create(2, 3, 32, ccc3(0, 255, 0), s_streak)
    layer:addChild(streak)

    local a1 = CCRotateBy:create(2, 360)

    local action1 = CCRepeatForever:create(a1)
    local motion = CCMoveBy:create(2, CCPointMake(100,0))
    root:runAction(CCRepeatForever:create(CCSequence:createWithTwoActions(motion, motion:reverse())))
    root:runAction(action1)

	local array = CCArray:create()
	array:addObject(CCTintTo:create(0.2, 255, 0, 0))
	array:addObject(CCTintTo:create(0.2, 0, 255, 0))
	array:addObject(CCTintTo:create(0.2, 0, 0, 255))
	array:addObject(CCTintTo:create(0.2, 0, 255, 255))
	array:addObject(CCTintTo:create(0.2, 255, 255, 0))
	array:addObject(CCTintTo:create(0.2, 255, 255, 255))
    local colorAction = CCRepeatForever:create(CCSequence:create(array))

    streak:runAction(colorAction)

	firstTick = true
	layer:registerScriptHandler(MotionStreakTest1_onEnterOrExit)

	Helper.titleLabel:setString("MotionStreak test 1")
	return layer
end

-----------------------------------
--  MotionStreakTest2
-----------------------------------
local function MotionStreakTest2()
	local layer = getBaseLayer()

    streak = CCMotionStreak:create(3, 3, 64, ccc3(255, 255, 255), s_streak)
    layer:addChild(streak)

    streak:setPosition(CCPointMake(s.width / 2, s.height / 2))

	local function onTouchMoved(x, y)
		if firstTick == true then
			firstTick = false
			return
		end

		streak:setPosition(ccp(x, y))
    end

    local function onTouch(eventType, x, y)
		if eventType == "began" then
			return true
        elseif eventType == "moved" then
            return onTouchMoved(x, y)
        end
    end

	firstTick = true
	layer:setTouchEnabled(true)
    layer:registerScriptTouchHandler(onTouch)

	Helper.titleLabel:setString("MotionStreak test")
	return layer
end

-----------------------------------
--  Issue1358
-----------------------------------
local Issue1358_entry = nil

local center = nil
local fAngle = nil
local fRadius = nil

local function Issue1358_update(dt)
	if firstTick == true then
		firstTick = false
		return
	end
	fAngle = fAngle + 1.0
    streak:setPosition(
		ccp(center.x + math.cos(fAngle / 180 * math.pi) * fRadius, center.y + math.sin(fAngle/ 180 * math.pi) * fRadius))
end

local function Issue1358_onEnterOrExit(tag)
	if tag == "enter" then
		Issue1358_entry = scheduler:scheduleScriptFunc(Issue1358_update, 0, false)
	elseif tag == "exit" then
		scheduler:unscheduleScriptEntry(Issue1358_entry)
	end
end

local function Issue1358()
	local layer = getBaseLayer()

	streak = CCMotionStreak:create(2.0, 1.0, 50.0, ccc3(255, 255, 0), "Images/Icon.png")
    layer:addChild(streak)

    center = ccp(s.width / 2, s.height / 2)
    fRadius = s.width / 3
    fAngle = 0

	firstTick = true
	layer:registerScriptHandler(Issue1358_onEnterOrExit)

	Helper.titleLabel:setString("Issue 1358")
	Helper.subtitleLabel:setString("The tail should use the texture")
	return layer
end

function MotionStreakTest()
	local scene = CCScene:create()

    Helper.createFunctionTable = {
        MotionStreakTest1,
        MotionStreakTest2,
        Issue1358
    }

	scene:addChild(MotionStreakTest1())
	scene:addChild(CreateBackMenuItem())

	return scene
end