--Funciones para el Splash para SceneryBeta2009
splash = Image.load("Imagenes/Splash.png")
PSPCleanerSplash = Image.load("Imagenes/PSPCleanerSplash.png")
 
nueva = Image.createEmpty(480,272)
 
transparencia = 255
 
nuevocolor = Color.new(0,0,0,transparencia)
 
nueva:clear(nuevocolor)
 
screen.startDraw()
 
while true do
screen.startDraw()
screen.clear(0)
 
Image.blit(0,0,PSPCleanerSplash)
 
Image.blit(0,0,nueva)
 
if transparencia > 0 then
      transparencia = transparencia - 8
             else
        break
end
 
nuevocolor = Color.new(0,0,0,transparencia)
 
nueva:clear(nuevocolor)
 
screen.waitVblankStart()
 
screen.flipscreen()
 
end
 
screen.waitVblankStart(180) 
 
while true do
 
screen.clear(0)
 
Image.blit(0,0,PSPCleanerSplash)
 
Image.blit(0,0,nueva)
 
if transparencia < 255 then
      transparencia = transparencia + 8
             else
        break
end
 
nuevocolor = Color.new(0,0,0,transparencia)
 
nueva:clear(nuevocolor)
 
screen.waitVblankStart()
 
screen.flipscreen()
 
end
 
 while true do
 
screen.clear(0)
 
Image.blit(0,0,splash)
 
Image.blit(0,0,nueva)
 
if transparencia > 0 then
transparencia = transparencia - 8
else
break
end
 
collectgarbage("collect")
System.memclean()
 
nuevocolor = Color.new(0,0,0,transparencia)
 
nueva:clear(nuevocolor)
 
screen.waitVblankStart()
 
screen.flipscreen()
 
end
 
screen.waitVblankStart(180) 
 
while true do
 
screen.clear(0)
 
Image.blit(0,0,splash)
 
Image.blit(0,0,nueva)
 
if transparencia < 255 then
      transparencia = transparencia + 8
             else
        break
end
 
nuevocolor = Color.new(0,0,0,transparencia)
 
nueva:clear(nuevocolor)
 
screen.waitVblankStart()
 
screen.flipscreen()
screen.endDraw()
end
 
while true do
collectgarbage("collect")
System.memclean()
dofile("Eligejuego2.lua")
 
end