Gideros Forum

require "icade"
icade = iCade.new()
icade:start()
 
icade:addEventListener(ICADE.LEFTPAD_EVENT, leftJoy, self)
icade:addEventListener(ICADE.BUTTON7_EVENT, fire, self)
icade:addEventListener(ICADE.BUTTON8_EVENT, protection, self)

local timeVirtualPadLastUsed
 
local function preventVirtualPadICadeSimultaneousUsage(e)
	if e.data.icade == true then
		-- It's the iCade, make sure the virtual pad wasn't used in the last second
		if os.difftime( os.time(), timeVirtualPadLastUsed ) >= 1 then
			return true
		else
			return false
		end
	else
		-- It's the virtual pad
		timeVirtualPadLastUsed = os.time()
		return true
	end
 
end
 
local function leftJoy(e)
	if preventVirtualPadICadeSimultaneousUsage(e) then
		if e.data.power > 0.2 then
			textfield:setText("Power: "..tostring(e.data.power).." Angle: "..tostring(e.data.angle))
			biPlane:move(e.data.angle, (e.data.power*150)*e.data.deltaTime)
		end
	end
end
 
local function fire(e)
	if preventVirtualPadICadeSimultaneousUsage(e) then
		if e.data.state == PAD.STATE_BEGIN then
			local fire = CLASS_fire.new(biPlane.xPos, biPlane.yPos-20)
			stage:addChild(fire)
		end
	end
end
 
local function protection(e)
	if preventVirtualPadICadeSimultaneousUsage(e) then
		if e.data.state == PAD.STATE_DOWN then
			biPlane.protection:setVisible(true)
		else
			biPlane.protection:setVisible(false)
		end
	else
		-- reset everything to defaults to since an iCade button release will now be ignored and could leave the protection on forever
		biPlane.protection:setVisible(false)
	end
end

function CTNTVirtualPad:setICade(onOff)
function CTNTVirtualPad:getICadeUse()