bloque1 = Image.load ("RUTA DE IMAGEN")
 
ferrari = Image.load ("RUTA DE IMAGEN")
 
--Coordenadas Personaje--
 
auto = {}
auto[1]={x=50,y=198}
sprite=ferrari
 
--Altura, Anchura del personaje--
 
personajeAltura = 61
personajeAnchura = 42
 
-------_______Bloques y colisiones_______-------
 
Bloque = {}
Bloque[1] = { x = 120, y = -200, Altura = 61, Anchura = 42 }
Bloque[2] = { x = 300, y = -400, Altura = 61, Anchura = 42 }
Bloque[3] = { x = 200, y = -570,Altura = 61, Anchura = 42 }
Bloque[4] = { x = 250, y = -620, Altura = 61, Anchura = 42 }
Bloque[5] = { x = 128, y = -770, Altura =61, Anchura = 42 }
Bloque[6] = { x = 216, y = -900, Altura =61, Anchura = 42 }
Bloque[7] = { x = 258, y = -1035, Altura =61, Anchura = 42 }
Bloque[8] = { x = 286, y = -1255, Altura =61, Anchura = 42 }
Bloque[9] = { x = 184, y = -1370, Altura =61, Anchura = 42 }
Bloque[10] = { x = 135, y = -1460, Altura =61, Anchura = 42 }
Bloque[11] = { x = 290, y = -1460, Altura =61, Anchura = 42 }
Bloque[12] = { x = 142, y = -1690, Altura =61, Anchura = 42 }
Bloque[13] = { x = 284, y= -1760, Altura =61, Anchura = 42 }
Bloque[14] = { x = 185, y = -1841, Altura =61, Anchura = 42 }
Bloque[15] = { x = 125, y = -2141, Altura =61, Anchura = 42 }
Bloque[16] = { x = 300, y = -2275, Altura =61, Anchura = 42 }
Bloque[17] = { x = 270, y = -2455, Altura =61, Anchura = 42 }
Bloque[18] = { x = 129, y = -2643, Altura =61, Anchura = 42 }
Bloque[19] = { x = 240, y = -2672, Altura =61, Anchura = 42 }
Bloque[20] = { x = 180, y = -2776, Altura =61, Anchura = 42 }
Bloque[21] = { x = 300, y = -2942, Altura =61, Anchura = 42 }
 
 
-------_______Bloque colision AUTO_______-------
 
 
-------_______Comprobacion De Colision_______-------
 
 
function comprobarColision(object)
   if (auto[1].x + personajeAnchura > object.x) and 
(auto[1].x < object.x + object.Anchura) and    
(auto[1].y + personajeAltura > object.y) and 
(auto[1].y < object.y + object.Altura) then
      auto[1].x = oldx
      auto[1].y = oldy
   end
end
 
 
 
--Bucle Principal
while true do
oldx = auto[1].x
oldy = auto[1].y
 
screen:clear()
 
 
-------_______Comprobacion De Colision_______-------
 
comprobarColision(Bloque[1])
comprobarColision(Bloque[2])
comprobarColision(Bloque[3])
comprobarColision(Bloque[4])
comprobarColision(Bloque[5])
comprobarColision(Bloque[6])
comprobarColision(Bloque[7])
comprobarColision(Bloque[8])
comprobarColision(Bloque[9])
comprobarColision(Bloque[10])
comprobarColision(Bloque[11])
comprobarColision(Bloque[12])
comprobarColision(Bloque[13])
comprobarColision(Bloque[14])
comprobarColision(Bloque[15])
comprobarColision(Bloque[16])
comprobarColision(Bloque[17])
comprobarColision(Bloque[18])
comprobarColision(Bloque[19])
comprobarColision(Bloque[20])
comprobarColision(Bloque[21])
 
pad = Controls.read()
 
for a = 1,21 do
screen:blit(Bloque[a].x,Bloque[a].y,bloque1)
end
 
screen:blit(auto[1].x,auto[1].y,sprite)
 
oldpad = pad
screen.waitVblankStart()
screen.flip()
end