-- Juego
blanco = color.new(255,255,255)
fondo = image.load("fondo.png")
punt={img=image.load("menu/puntero.png"),x=30,y=26,w=20,h=20}
select={
{x=8,y=123,w=20,h=20},
{x=8,y=159,w=20,h=20},
{x=8,y=198,w=20,h=20},
}
select.img=image.load("menu/logo.png")
select2 = image.load("menu/lng.png")
select2_t={x=8,y=234,w=20,h=20}
brad={img= image.load("actores/brad.png"),x=250,y=116,w=216,h=140}
function colision(objeto1,objeto2)
if objeto1.x+objeto1.w >= objeto2.x and 
	objeto1.x <= objeto2.x +objeto2.w and 
	objeto1.y + objeto1.h >= objeto1.y and 
	objeto1.y <= objeto2.y + objeto2.h then 
	return true
else return false
end
end
function colision2(objeto1,objeto2)
if controls.press("cross") then
if objeto1.x+objeto1.w >= objeto2.x and 
	objeto1.x <= objeto2.x +objeto2.w and 
	objeto1.y + objeto1.h >= objeto1.y and 
	objeto1.y <= objeto2.y + objeto2.h then 
os.message("Incorrecto")
dofile("script.lua")
end
end
end
function ganadas()
	ini.write("scores.ini","puntos",puntos)
end
temporizador = timer.new()
temporizador:start()
puntos = 10
while true do
select2:blit(select2_t.x,select2_t.y)
controls.read()
fondo:blit(0,0)
 
screen.print(285,61,"Puntos = "..puntos,1,blanco,0x0)
 
select2:blit(select2_t.x,select2_t.y)
for i=1,#select do
select.img:blit(select[i].x,select[i].y)
if controls.press("cross") and colision(punt,select[i]) then
	if i==1 then ganadas()
		os.message("Correcto")
		puntos = puntos + 10
		dofile("niveles/nivel2.lua")
	else os.message("Incorrecto")
		dofile("script.lua")
	end
end
end
 
punt.img:blit(punt.x,punt.y)
brad.img:blit(brad.x,brad.y)
screen.print(30,127,"Brad Pitt",1,blanco,0x0)
screen.print(30,164,"Bruce Willis",1,blanco,0x0)
screen.print(30,203,"Tom Cruise",1,blanco,0x0)
screen.print(30,241,"Nicolas cage",1,blanco,0x0)
screen.print(284,25,"Tiempo = " .. math.floor(temporizador:time() /1000),1,blanco,0x0)
screen.print(30,36,"Actores",2,blanco,0x0)
 
if temporizador:time() >= 15000 then
	temporizador:reset()
	temporizador:stop()
	os.message("Se te acabo el tiempo")
	dofile("script.lua")
end
colision2(punt,select2_t)
if math.abs(controls.analogy())>20 then punt.y = punt.y + controls.analogy()/30 end
if math.abs(controls.analogx())>20 then punt.x = punt.x + controls.analogx()/30 end
if controls.press("l") then
dofile("puto")
end
for i=1,#select do
select.img:blit(select[i].x,select[i].y)
if controls.press("cross") and colision(punt,select[i]) then
	if i==1 then ganadas()
		os.message("Correcto")
		puntos = puntos + 10
		dofile("niveles/nivel2.lua")
	else os.message("Incorrecto")
		dofile("script.lua")
	end
end
end
screen.flip()
end