blanco = Color.new(255,255,255)
 
grande = font.createProportional()
grande:setPixelSizes(0,20)
 
imagenN = 1
 
oldpad = Controls.read()
 
partida = io.open("./System/progress.txt", "r+") --Esto es para abrir la partida guardada
tope = partida:read("*n") --para que como mucho puedas elegir el nivel donde te quedaste
 
function opcionMenu(a)
	screen:blit(a, 0, fondoMenu)
	screen:blit(a+20, 40, preview .. imagenN)
	screen:fontPrint(grande, 100, 10, "Nivel " .. imagenN, blanco)
end
 
function cambiarOpcionMenuR()
	for a=480, 0, -1 do
		opcionMenu(a)
	end
end
 
function cambiarOpcionMenuL()
	for a =-480, 0, 1 do
		opcionMenu(a)
	end
end
 
while true do
	pad = Controls.read()
 
	opcionMenu(0)
 
	if pad:right() and not oldpad:right() and imagenN<=tope then
		imagenN = imagenN + 1
		cambiarOpcionMenuR()
	elseif pad:r() and not oldpad:r() and imagenN<=tope then
		imagenN = imagenN + 1
		cambiarOpcionMenuR()
	end
 
	if pad:left() and not oldpad:left() and imagenN>=1 then
		imagenN = imagenN - 1
		cambiarOpcionMenuL()
	elseif pad:l() and not oldpad:l() and imagenN>=1 then
		imagenN = imagenN - 1
		cambiarOpcionMenuL()
	end
 
	if pad:cross() and  not oldpad:cross() and type(imagenN)=="number" then
		dofile("./Niveles/" .. imagenN .. ".lua")
	end
 
	screen.waitVblankStart()
	screen.flip()
end