Изменение сцены, скользя пальцем по экрану в Corona

Question

Я пытаюсь изменить сцены с режиссером, скользя пальцем по экрану. Однако он работает неправильно. Сцены не приходят в порядок. Можете ли вы, пожалуйста, изучить мой код и сказать мне, если я что-то пропущу? Я попытался напечатать currentNumberNo для отладки и выяснил, что он меняет дважды, когда я нажимаю мой курсор один раз. В чем причина?

main.lua

local director = require "director" 
--GLOBALS-- 
W = display.contentWidth 
H = display.contentHeight 
room={"kitchen", "bedroom", "bathroom"} 
currentRoomNo = 1 

director:changeScene("kitchen") 

kitchen.lua:

module(..., package.seeall) 
local director = require "director" 

function new() 

group = display.newGroup() 

local bg = display.newRect(0,0,W,H); bg:setFillColor(255,250,30) 
group:insert(bg) 

---[[ 
local function slide(event) 
if event.phase == "ended" or event.phase == "cancelled" then 
    local dif = event.xStart-event.x 
    if dif> 30 then 
     if currentRoomNo==#room then 
      currentRoomNo = 1 
     else 
      currentRoomNo = currentRoomNo + 1 
     end 
    director:changeScene(room[currentRoomNo]) 
    elseif dif< -30 then 
     if currentRoomNo==1 then 
      currentRoomNo = #room 
     else 
      currentRoomNo = currentRoomNo - 1 
     end 
    director:changeScene(room[currentRoomNo]) 
    end 
end 
return true 
end 

Runtime:addEventListener("touch", slide) 
--]] 
return group 

end 

Answer 1

Попробуйте это:

module(..., package.seeall) 
local director = require "director" 

function new() 
local isChanging = false 
group = display.newGroup() 

local bg = display.newRect(0,0,W,H); bg:setFillColor(255,250,30) 
group:insert(bg) 

---[[ 
local function slide(event) 
if (event.phase == "ended" or event.phase == "cancelled") and isChanging == false then 
    local dif = event.xStart-event.x 
    if dif> 30 then 
     if currentRoomNo==#room then 
      currentRoomNo = 1 
     else 
      currentRoomNo = currentRoomNo + 1 
     end 
    director:changeScene(room[currentRoomNo]) 
    isChanging = true 
    elseif dif< -30 then 
     if currentRoomNo==1 then 
      currentRoomNo = #room 
     else 
      currentRoomNo = currentRoomNo - 1 
     end 
    director:changeScene(room[currentRoomNo]) 
    isChanging = true 
    end 
end 
return true 
end 

Runtime:addEventListener("touch", slide) 
--]] 
return group 

end