--Función de los creditos de PSPCleaner.
--Les recuerdo que programo en LuaHMv2.
 
function PSPCleaner.Credits2(y, text, size, color, colorfondo)
screen.startDraw()
 
    local length = string.len(text)
    local x = 240 - ((length*8)/2)
    --screen.print(x, y+1, text, size, color, colorfondo, 0)
    --screen.print(x+1, y, text, size, color, colorfondo, 0)
    screen.print(x+1, y+1, text, size, color, colorfondo, 0)
    --screen.print(x, y, text, size, color, colorfondo, 0)
screen.endDraw()
end

morado = Color.new(138, 18, 255,255)
rojo = Color.new(255, 0, 0,255)
blanco = Color.new(255,255,255,255)
silver = Color.new(192,192,192,255)
 
y = {}
y[1] = 300
y[2] = 330
y[3] = 360
y[4] = 390
y[5] = 405
y[6] = 420
y[7] = 435
y[8] = 465
y[9] = 495
y[10] = 525
y[11] = 555
y[12] = 570
y[13] = 600
y[14] = 630
y[15] = 660
y[16] = 690
y[17] = 720
 
nombre = 0
 
minuteur = Timer.new()
minuteur:start()
 
dofile("./system/PSPCleanerLib.lua")
 
while true do
 
	currentTime = minuteur:time()
 
	PSPCleaner.Credits2(y[1],"PSPCleaner 1.6", 0.7, morado, blanco, 0)
	PSPCleaner.Credits2(y[2],"**************", 0.7, morado, blanco, 0)
	PSPCleaner.Credits2(y[3],"Developer :", 0.7, morado, blanco, 0)
	PSPCleaner.Credits2(y[4],"Migueliziosop", 0.7, blanco, rojo, 0)
	PSPCleaner.Credits2(y[5],"Grafistas :", 0.7, morado, blanco, 0)
	PSPCleaner.Credits2(y[6],"Germax", 0.7, blanco, rojo, 0)
	PSPCleaner.Credits2(y[7],"RubenGamer", 0.7, blanco, rojo, 0)
	PSPCleaner.Credits2(y[8],"Betatesters :", 0.7, morado, blanco, 0)
	PSPCleaner.Credits2(y[9],"Germax", 0.7, blanco, rojo, 0)
	PSPCleaner.Credits2(y[10],"Dannysbkn", 0.7, blanco, rojo, 0)
	PSPCleaner.Credits2(y[11],"Buscando..", 0.7, blanco, rojo, 0)
	PSPCleaner.Credits2(y[12],"Buscando..", 0.7, blanco, rojo, 0)
	PSPCleaner.Credits2(y[13],"Pagina Oficial :", 0.7, morado, blanco, 0)
	PSPCleaner.Credits2(y[14],"www.Migueliziosop.Foroactivo.org", 0.7, blanco, rojo, 0)
    PSPCleaner.Credits2(y[15],"[email protected]", 0.7, blanco, rojo, 0)
    PSPCleaner.Credits2(y[16],"Lalalala :", 0.7, morado, blanco, 0)
    PSPCleaner.Credits2(y[17],"Unico que se ve en pantalla!", 0.7, blanco, rojo, 0)
 
 
	for n = 1,17 do
		if currentTime > 300 then
			y[n] = y[n] - 0.7
		end
	end
 
	if y[17] < - 5 then
dofile("ms0:/PSP/GAME/PSPCleaner/System/PSPCleanerMenu.lua")
	end
 
 
	screen.waitVblankStart()
	screen.flipscreen()
end