I've changed a few things in your code and managed to get it working without lag. I don't really know why you have such a complicated system set up: it's unnecessary. I can understand the temptation to mimic classes and use that to simplify certain things, but events and key input is really not something that needs it.
In your Moving_Sprites program, I changed the while loop to this:
while(running == true) do
-- Get input
local e = {os.pullEvent()}
if e[1] == "key" then
if e[2] == keys.p then
s3.visible = false --I have no idea what s3.visible does, but I left it in anyway
os.pullEvent("key")
timer = os.startTimer(0.05)
end
elseif e[1] == "timer" and e[2] == timer then
-- Move your sprites
if (s1.y > device2d.backbuffer.height - s1.image.height) then
s1state = 1
elseif (s1.y == 1) then
s1state = 0
end
if (s1state == 0) then
s1.y = s1.y + 1
else
s1.y = s1.y - 1
end
if (s2.x > device2d.backbuffer.width - s2.image.width) then
s2state = 1
elseif (s2.x == 1) then
s2state = 0
end
if (s2state == 0) then
s2.x = s2.x + 1
else
s2.x = s2.x - 1
end
timer = os.startTimer(0.05)
end
-- First clear the backbuffer to the fill then draw.
device2d:clearBackbuffer()
ss:draw(device2d.backbuffer)
-- Swap the frontbuffer with the backbuffer.
device2d:swapBuffer()
device2d:render()
end
It's not as "pretty" as your code, but it's functional. I don't know the inner details of your rendering system and I don't really feel like trying to mess with them either, but this does the job. If you feel it absolutely necessary to prettify things with an api, do something more like this:
local timer = false
function eventListen(opt)
timer = os.startTimer(0.05)
while true do
local e = {os.pullEvent()}
if e[1] == "timer" and e[2] == timer then
return
elseif e[1] == "key" then
if opt[e[2]] then
opt[e[2]]()
return
end
end
end
end
Then use it like so:
--Your main game loop
while true do
input.eventListen({
[keys.p] = function()
os.pullEvent("key") --My version of pausing the program: perhaps not how you want to go about it, but it's functional
end;
[keys.enter] = function()
running = false
end;
})
--Handle GUI updates here.
end
