Buenas programadores, estoy intentando hacer un juego basado en el jump duck link, un juego saltando pero este se llamara Kakashi adventures, bueno mi problemas es que esta muy lento y ya he dado valor nil a las variables e imagenes y he puesto la funcion collectgarbage() para que recolecte la basura, pero aun asi esta muy lento, quiero que alguien me ayude si es tan amable por favor.

Aqui les dejo mi codigo. quiero que se fijen en la ultima parte que es en donde intento limpiar la memoria, espero su ayuda.

sc1 = Image.load("correr/C1.png")
sc2 = Image.load("correr/C2.png")
sc3 = Image.load("correr/C3.png")
sc4 = Image.load("correr/C4.png")
sc5 = Image.load("correr/C5.png")
sc6 = Image.load("correr/C6.png")

fondo = Image.load("IMG/fondo.png")
terreno = Image.load("IMG/Terreno.png")
nube = Image.load("IMG/nube.png")
fortaleza = Image.load("IMG/vida.png")

--sonidos
System.oaenable()
vida = Sound.load("Sonidos/vida.wav")
score = Sound.load("Sonidos/score.wav")

piso = { x = 0, y = 260, img = terreno}

nub = {}
nub[1] = { x = 300, y = 60, img = nube }
nub[2] = { x = 450, y = 10, img = nube }
nub[3] = { x = 200, y = -10, img = nube }

vid = { x = math.random(480,1000), y = math.random(-6,210), ancho = 40, alto = 42, img = fortaleza }

--arrays
jugador = {
img = sc1,
gravedad = 190,
estadoSalto = "suelo",
velocidadSalto = 11,
y = 190,
x = 100,
ancho = 70,
alto = 87,
paso = 0,
puntuacion = 0,
vida = 100,
}

function Salto()

if pad:cross() and oldpad:cross() ~=pad:cross() and jugador.estadoSalto == "suelo" then
jugador.estadoSalto = "saltando"
end

if jugador.estadoSalto == "saltando" then
jugador.img = sc3
jugador.velocidadSalto = jugador.velocidadSalto - 0.3
jugador.gravedad = jugador.gravedad - jugador.velocidadSalto
end

if jugador.velocidadSalto < 0 then
jugador.estadoSalto = "cayendo"
end

if jugador.gravedad < 190 and jugador.estadoSalto == "cayendo" then
jugador.img = sc4
jugador.velocidadSalto = jugador.velocidadSalto + 0.3
jugador.gravedad = jugador.gravedad + jugador.velocidadSalto
end

if jugador.gravedad == 190 then
jugador.velocidadSalto = 11
jugador.estadoSalto = "suelo"
jugador.img = sc1
end

if jugador.gravedad > 190 then
jugador.gravedad = 190
end
jugador.y = jugador.gravedad
end

function paso_automatico()

if jugador.paso >= 1 and jugador.paso <= 5 and jugador.estadoSalto == "suelo" then
jugador.img = sc1
elseif jugador.paso >= 5 and jugador.paso <= 10 and jugador.estadoSalto == "suelo" then
jugador.img = sc2
elseif jugador.paso >= 10 and jugador.paso <= 15 and jugador.estadoSalto == "suelo" then
jugador.img = sc3
elseif jugador.paso >= 15 and jugador.paso <= 20 and jugador.estadoSalto == "suelo" then
jugador.img = sc4
elseif jugador.paso >= 20 and jugador.paso <= 25 and jugador.estadoSalto == "suelo" then
jugador.img = sc5
elseif jugador.paso >= 25 and jugador.paso <= 30 and jugador.estadoSalto == "suelo" then
jugador.img = sc6
end
if jugador.paso >= 30 then
jugador.paso = 1
end
end

function mov()
jugador.paso = jugador.paso + 1
piso.x = piso.x - 1.5
if piso.x < -480 then
piso. x = 0
end
end

function movNube()
for a = 1,3 do
screen:blit(nub[a].x,nub[a].y,nub[a].img)
nub[a].x = nub[a].x - 0.8
if nub[a].x < -490 then
nub[a].x = 490
end
end
end

function movVida()
vid.x = vid.x - 2
if vid.x  < -20 then
vid.x = math.random(480,1000)
end
end

function colisionVida()

if (jugador.x + jugador.ancho > vid.x) and (jugador.x < vid.x + vid.ancho) and (jugador.y + jugador.alto > vid.y) and (jugador.y < vid.y + vid.alto) then
vida:play()
jugador.puntuacion = jugador.puntuacion + 40
vid.x = math.random(480,1000)
vid.y = math.random(-6,210)
end
end

oldpad=Controls.read()

while true do
screen:clear()
pad = Controls.read()

if pad:start() then
break
end

Salto()
paso_automatico()
mov()
movVida()
colisionVida()

screen:blit(0,0,fondo)
screen:blit(piso.x, piso.y, piso.img)
screen:blit(piso.x + 480, piso.y, piso.img)
movNube()
screen:blit(jugador.x,jugador.y, jugador.img)
screen:blit(vid.x,vid.y,vid.img)

screen:print(390,10,"score: "..jugador.puntuacion,rojo)

screen.waitVblankStart()
screen.flip()
oldpad = pad
end

fondo = nil
terreno = nil
nube = nil
sc1=nil
sc2=nil
sc3=nil
sc4=nil
sc5=nil
sc6=nil
fortaleza = nil
salto = nil
mov = nil
movVida = nil
colisionVida = nil
movNube()
nube = nil
vida = nil
collectgarbage(); System.sleep(100)