os.luadevsplash()
dofile("SplashLib.lua")
splash("Imagenes/splashpsp2011.png",3500,5,"fade")
 
sabion1=image.load("Imagenes/sabion1.png")
sabion2=image.load("Imagenes/sabion2.png")
sabion3=image.load("Imagenes/sabion3.png")
sabion4=image.load("Imagenes/sabion4.png")
sabion5=image.load("Imagenes/sabion5.png")
 
tiempo = timer.new()
tiempo:start()
 
--- variables
cuenta_atras = 10 --segundos
 
while true do
 image.blit(0,0,sabion1)
	tiempo_en_segundos = math.floor( tiempo:time() / 1000) 
		if tiempo_en_segundos >= 8 then 
			image.blit(0,0,sabion2)
end
				if tiempo_en_segundos >= 6 then
					image.blit(0,0,sabion3)
end
						if tiempo_en_segundos >= 4 then
							image.blit(0,0,sabion4)
end
								if tiempo_en_segundos >= 2 then
									image.blit(0,0,sabion5)
end
										if tiempo_en_segundos >= cuenta_atras then
											os.exit()										
end